Here I get both curves in different colours.
In[]:=
Plot[{Sin[x],Cos[x]},{x,0,2π}]
Out[]=
1
2
3
4
5
6
-1.0
-0.5
0.5
1.0
Here it also works!
In[]:=
key="one";​​Switch[key,"one",{Sin[x],Cos[x]},"zwei",{-Sin[x],-Cos[x]}]
Out[]=
{Sin[x],Cos[x]}
In[]:=
Plot[%,{x,0,2π}]
Out[]=
1
2
3
4
5
6
-1.0
-0.5
0.5
1.0
But here it does not! Why? And how can I change it?
In[]:=
Plot[Switch[key,"one",{Sin[x],Cos[x]},"two",{-Sin[x],-Cos[x]}],{x,0,2π}]
Out[]=
1
2
3
4
5
6
-1.0
-0.5
0.5
1.0
In[]:=
Plot[Switch[key,"one",{Sin[x],Cos[x]},"two",{-Sin[x],-Cos[x]}],{x,0,2π},PlotStyle{Red,Green}]
Out[]=
1
2
3
4
5
6
-1.0
-0.5
0.5
1.0