Как настроить манипулирование так, чтобы вы могли управлять переменной с помощью вертикального ползунка вместо горизонтального ползунка в Mathematica?
Из справки ....
Manipulate[u, {u, 0, 1, ImageSize -> Small}, ControlType -> VerticalSlider, ControlPlacement -> Left]
