
Re: Something other than PlotStyle to change look of graphs
Posted:
Feb 10, 2012 5:51 AM


I'm still working out the details here, but here's a more general approach to using plot legends via Legend[ ]:
fncs[x_] := { SurvivalFunction[WeibullDistribution[2.2, 3.2], x], SurvivalFunction[LogNormalDistribution[0.1, 0.8], x], SurvivalFunction[ExponentialDistribution[0.6], x] }
plotStyles = { {Black, Thickness[Small]}, {Dashing[Tiny], Black}, {Dashing[Large], Black, Thickness[Large]} }
plotNames = {"Weibull", "LogNormal", "Exponential"}
GraphicsRow[ { Show[ Plot[ fncs[x] // Evaluate, {x, 0, 5}, PlotStyle > plotStyles ],
ListPlot[ Transpose[Table[fncs[x], {x, 1, 5}]], PlotMarkers > Automatic, Axes > True ],
PlotLabel > Style["Survival Curves", FontSize > 12], AxesLabel > TraditionalForm /@ {"t", "S(t)"} ],
Graphics @ Legend[ Table[ { Graphics @ Append[plotStyles[[i]], Line[{{0, 0}, {2, 0}}]], plotNames[[i]] }, {i, 1, 3} ],
LegendPosition > {0.3, 0.1}, LegendTextSpace > 1, LegendSize > {0.25, 0.25}, LegendOrientation > Vertical, LegendBackground > LightYellow, ShadowBackground > LightOrange ] } ]
On 20120208 10:26:47 +0000, cylurian said:
> I have three functions in one plot. I'm using PlotStyle to > differentiate the graphs, but I need more options. I need each graph > to have some special marker, like a diamond, circle, etc. I'm using > Mathematica 8 and I'm also using PlotLegend. Any suggestions? > > My code is: > > Plot[{SurvivalFunction[WeibullDistribution[2.2, 3.2], x], > SurvivalFunction[LogNormalDistribution[.1, .8], x], > SurvivalFunction[ExponentialDistribution[.6], x]}, {x, 0, 5}, > PlotStyle > {{ Black, Thickness[Small]}, {Dashing[Tiny], > Black}, {Dashing[Large], Black, Thickness[Large]}}, > AxesLabel > TraditionalForm /@ {t, "S(t)"}, Ticks > None, > DisplayFunction > Identity, > PlotLabel > Style["Survival Curves", FontSize > 18], > PlotLegend > {"Weibull", "LogNormal", "Exponential"}, > LegendPosition > {.3, 0.1}, LegendTextSpace > 4, > LegendLabelSpace > .5, LegendLabel > "Survival Curves", > LegendOrientation > Vertical, LegendBackground > White, > LegendSize > .4, ShadowBackground > White]

