Re: roten und blauen Plot

["Udo und Susanne Krause" <su.krause@XXXXXXX.ch>]

Liebe Freundinnen und Freunde der Syntax,

ohne Evaluate[] schreibt sich dies

In[28]:= Plot[#, {x, 0, 3}, PlotStyle -> {Red, Blue}]&[Sin[x^2 Range[2]]]
In[44]:= Plot[#, {x, 0, 3}]&[Transpose[{{Red, Blue}, Sin[x^2 Range[2]]}]]
In[47]:= X[Sin[x^2 Range[2]], {x, 0, 3}, PlotStyle -> {Red, Blue}] /. X ->  
Plot
In[48]:= (Inner[7, {Red, Blue}, Sin[x^2 Range[2]], 7] ~ 8 ~ {x, 0, 3}) /.  
{7 -> List, 8 -> Plot}
In[53]:= Plot @@ {Sin[x^2 Range[2]], {x, 0, 3}, PlotStyle -> {Red, Blue}}

Ziel ist wie gesagt, die Liste parat zu haben, bevor Plot[] die Farben  
zuordnet. Wenn sich das Argument erst im Lauf der Arbeit von Plot[] als  
Liste erweist, werden die Farben nicht mehr zugeordnet und der Plot bleibt  
bestenfalls einfarbig.

Gruss
Udo.