Tag Info

Hot answers tagged

3

Here's a version with checkboxes: numData = 4; data = Sort /@ RandomReal[{0, 10}, {5, numData, 2}]; legend = Table["data" <> ToString@i, {i, numData}]; DynamicModule[ { dataCombinations = {} } , Grid @ {{ CheckboxBar[ Dynamic @ dataCombinations, Thread[Range[numData] -> legend], Appearance -> "Vertical" ...


3

Consider: plot1 = Plot[Sin[x], {x, 0, 6 Pi}]; plot2 = Plot[Cos[x], {x, 0, 6 Pi}]; TogglerBar[Dynamic[p], {plot1 -> "Plot 1", plot2 -> "Plot 2"}] Dynamic[p /. {x__} :> Show[x]] See TogglerBar and CheckboxBar.


3

Using some made-up test data to illustrate. This approach is also used here with fading transitions. data1 = Table[Sin[x], {x, 0, 2 Pi, Pi/4}]; data2 = Table[Cos[x], {x, 0, 2 Pi, Pi/4}]; plot1 = ListLinePlot[data1, DataRange -> {0, 2 Pi}]; plot2 = ListLinePlot[data2, DataRange -> {0, 2 Pi}]; id = ImageDimensions[plot1]; Manipulate[Graphics[{White, ...



Only top voted, non community-wiki answers of a minimum length are eligible