Rotate a 2D graph

*To*: mathgroup at smc.vnet.net*Subject*: [mg81647] Rotate a 2D graph*From*: tomfabtastic at hotmail.com*Date*: Sun, 30 Sep 2007 04:04:06 -0400 (EDT)

Hello, I would like to rotate the below graph so that the FrameLabel "f1" reads at the top of the graph and "f2" is at the bottom. I want to keep everything as is, but rotate the graph 90 degrees clockwise. Any ideas ? Needs["BarCharts`"] aa = BarChart[{1, 2, 3, 2}, BarStyle -> Red, BarOrientation -> Vertical]; bb = ListPlot[{1, 0.5, 3, 0.74}, Joined -> True, PlotStyle -> {Black, Thick}]; comp = Show[{aa, bb}, PlotLabel -> "Plotting together", Frame -> True, FrameLabel -> {x, f1, None, StyleForm[f2, FontColor -> Blue]}, FrameTicks -> {{{1, "a"}, {2, "b"}, {3, "c"}, {4, "d"}}, {1, 2, 3}, None, Table[{y, Style[N[y/10], Blue]}, {y, 0, 3, 1}]}] Thanks, Tom