Is it possible to make $y_{max}$ of Slider[y, {$y_{min}$,$y_{max}$}] depend on another control?
For example, I have three variables (Time, Type1, Type2). I want a drop down box for the user to select which type to plot. And I want the user to have the ability to scale up and down the y value (however the maximum y value should depend on the level chosen, 150000 for Type1 and 1 for Type2).
mySubset = {{0.`, 0.`, 0.`}, {60.`, 78069.`, 0.52046`}, {120.`,
81417.`, 0.54278`}, {180.`, 84765.`, 0.5651`}, {240.`, 88113.`,
0.58742`}, {300.`, 91461.`, 0.60974`}, {360.`, 94809.`,
0.63206`}, {420.`, 98157.`, 0.65438`}, {480.`, 101505.`,
0.6767`}, {540.`, 104853.`, 0.69902`}, {600.`, 108201.`,
0.72134`}, {660.`, 111549.`, 0.74366`}, {720.`, 114897.`,
0.76598`}, {780.`, 118245.`, 0.7883`}, {840.`, 121593.`,
0.81062`}, {900.`, 124941.`, 0.83294`}, {960.`, 128289.`,
0.85526`}, {1020.`, 131637.`, 0.87758`}, {1080.`, 134985.`,
0.8999`}, {1140.`, 138333.`, 0.92222`}};
yTypes = {"Type1", "Type2"}
yMax = {0., 150000., 1.}
Manipulate[
Module[{week, y},
yColumn = (Position[yTypes, yChosen][[1]])[[1]] + 1;
y = Part[mySubset, All, yColumn];
week = Part[mySubset, All, 1]/10080;
ListPlot[Transpose[{week, y}], Joined -> True,
PlotRange -> {{startTime, startTime + window}, {0, ylim}},
AxesOrigin -> {0, 0}, Frame -> True, FrameStyle -> Blue,
Background -> White, PlotStyle -> Blue, AxesStyle -> Blue,
ImageSize -> {550, 350}, ImagePadding -> 35]],
{{startTime, 0.0, "Starting Week"}, 0, 1., Appearance -> "Labeled"},
{{window, 0.1, "Number of Weeks"}, 0.1, 52., Appearance -> "Labeled"},
{{ylim, 150000, "y limit"}, 1, 150000, Appearance -> "Labeled"},
{yChosen, yTypes},
TrackedSymbols -> True,
AutorunSequencing -> {1, 2}
]