Manipulate
- To: mathgroup at smc.vnet.net
- Subject: [mg124719] Manipulate
- From: Bernard Vuilleumier <bernard.vuilleumier at sunrise.ch>
- Date: Thu, 2 Feb 2012 04:55:55 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
Hello,
Is it possible to have, in this example, 3 menus with bouton1
(item[[1]]), 4 with bouton 2 (item[[2]]) and 2 with bouton 3
(item[[3]])?
data = {Table[RandomInteger[{10, 20}, 3], {3}],
Table[RandomInteger[{10, 20}, 3], {4}],
Table[RandomInteger[{10, 20}, 3], {2}]};
item = {{1 -> "menu1", 2 -> "menu2", 3 -> "menu3"}, {4 -> "menu4",
5 -> "menu5", 6 -> "menu6", 7 -> "menu7"}, {8 -> "menu8", 9 ->
"menu9"}};
Manipulate[BarChart3D[data[[j, k]]],
{{j, 1, "Bouton"}, {1 -> "Bouton1", 2 -> "Bouton2", 3 -> "Bouton3"}},
{{k, 1,
"Menu"}, item[[1]]}]
I tried with
data = {Table[RandomInteger[{10, 20}, 3], {3}],
Table[RandomInteger[{10, 20}, 3], {4}],
Table[RandomInteger[{10, 20}, 3], {2}]};
item = {{1 -> "menu1", 2 -> "menu2", 3 -> "menu3"}, {4 -> "menu4",
5 -> "menu5", 6 -> "menu6", 7 -> "menu7"}, {8 -> "menu8", 9 ->
"menu9"}};
Manipulate[BarChart3D[data[[j, k]]],
{{j, 1, "Bouton"}, {1 -> "Bouton1", 2 -> "Bouton2", 3 -> "Bouton3"}},
{{k, 1,
"Menu"}, item[[j]]}]
but this doesn't work.
Thank's for your attention