Angeben der Farbreihenfolge in ListPlot

Question

Ich versuche herauszufinden, wie Mathematicas Farbschemata mit diskreten Daten verwendet werden. Zum Beispiel habe ich eine Liste von Zeitreihen im Formular

s={{{1946,1},{1947,2},{1948,3}},{{1946,-2},{1947,-1.8}}} 

und so weiter; es gibt etwa 30 Serien unterschiedlicher Länge. Wenn ich diese Serien unter Verwendung ListPlot plotte/verbinde/überlagere, gibt es eine Weise, Mathematica anzuweisen, Farben für jedes Diagramm auszuwählen, indem man gleichmäßig beabstandete Farben von einem ColorFunction nimmt, das von ColorData (z. B. "Rainbow") zurückgegeben wird?

Wie würde ich dies mit einer Direktive kombinieren, um jedes Diagramm Thick zu machen?

ListPlot[s,Joined->True,PlotStyle->{Thick,???}] 

Answer 1

Stellen Sie sich Ihre Daten - eine zerlumpte Liste von 30 Listen unterschiedlicher Länge:

data = Table[.5 k + RandomReal[1, RandomInteger[{8, 14}]], {k, 30}]; 

Ist es das, was Sie brauchen?

ListPlot[data, Joined -> True, 
     PlotStyle -> Thread@{Thick, ColorData["Rainbow"] /@ Range[0, 1, 1/29]}]