Hello everybody, I want to plot many series of data on the same graph and I am using a as legend a Checkboxbar to be able to switch some data series on and off on the graph. The problem is that the colors in Legend are not corresponding to the ones from graph (curves)! It seems that each time I switch on additional data series, the new curves are getting randomly new colors, while the colors in Legend are staying the same (the "Legend" is shown permanently, regardless the on or off state of a data set). Is there a way to "connect" the curves displayed to the colors from Legend?
Manipulate[
ListPlot[projects[[project]], Joined -> True,
PlotRange -> {{-80, 0}, {0, 80}},
GridLines -> {{-10, -20, -30, -40, -50, -60, -70}, {10, 20, 30, 40,
50, 60, 70}}, AxesLabel -> {x, z}, PlotLabel -> "My Data Sets",
ImageSize -> Large], {{project, {1}},
Thread[Range[Length@projects] ->
MapThread[
Row[{Pane@
Graphics[{#1, Rectangle[{0, 0}, {10, 1}]}, ImageSize -> 50],
" " <> prjnames[[#2]]},
BaselinePosition -> Center] &, {ColorData[97] /@ Range[8],
Range[8]}]], ControlType -> CheckboxBar,
BaselinePosition -> Center, Method -> "Active",
Appearance -> "Vertical"}, ControlPlacement -> Right]