Different text style for labels and ticks

*To*: mathgroup at smc.vnet.net*Subject*: [mg66686] Different text style for labels and ticks*From*: János <janos.lobb at yale.edu>*Date*: Sat, 27 May 2006 03:51:24 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Hi, I am wondering if it is possible to specify a different text style in a (Multiple)ListPlot for PlotLabel and Ticks. If I just use it like: TextStyle -> {FontFamily -> "Times", FontSize -> 14}, it affects all texts in the plot including PlotLabel, AxesLabel and Ticks. I would like Ticks to have a different TextStyle - need smaller characters there -, and PlotLabel to have bigger text, even bold. I tried Epilog - hoping that I can draw the PlotLabel after the plot is done - with no success. Thanks ahead, János P.S. Here is one statement for illustration: In[114]:= cgAll = MultipleListPlot[ Take[cg0254, -Length[cg0254]], Take[cg0033, -Length[cg0033]], AxesLabel -> {"Datetime", "% of \ncongestion"}, PlotJoined -> {True, True}, SymbolShape -> {PlotSymbol[Diamond], PlotSymbol[Star]}, SymbolStyle -> {RGBColor[1, 0, 0], RGBColor[0, 0, 1]}, PlotLegend -> {"10.84.2.254->10.32.1.3\ 3", "10.32.1.33->10.32.1.82"}\ , AxesOrigin -> {First[First[Take[ cg0254, -Length[ cg0254]]]], 0}, PlotRegion -> {{0, 1}, {0, 1}}, LegendPosition -> {-0.88, -0.75}, LegendOrientation -> Horizontal, LegendSize -> {1, 0.1}, TextStyle -> {FontFamily -> "Times", FontSize -> 14}, PlotLabel -> "Congestion \ between\n 10.84.2.254 -> \ 10.32.1.33\n and\n 10.32.1.33 \ -> 10.32.1.82\n all data", Ticks -> {({#1, StringJoin[ ToString[ ToDate[#1][[2]]], "/", ToString[ ToDate[#1][[3]]], "\n", ToString[ ToDate[#1][[4]]], ":", ToString[ ToDate[#1][[ 5]]]]} & ) /@ Take[cg0254[[All,1]], {1, Length[cg0254[[ All,1]]], Floor[ Length[cg0254[[All, 1]]]/14]}], Automatic}];