Graphics in Figure Caption
- To: mathgroup at smc.vnet.net
- Subject: [mg41996] Graphics in Figure Caption
- From: Goyder Dr HGD <H.Goyder at rmcs.cranfield.ac.uk>
- Date: Mon, 16 Jun 2003 03:56:57 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Dear Mathgroup, How do I incorporate graphics symbols and lines into a caption for a figure? The standard presentation for a journal paper is a figure in a frame with the figure caption underneath containing a description of the lines on the figure. For example if we have one set of experimental data, dots, and three models, solid lines, dashed lines and chain dashing the plot could be constructed as follows SetOptions[ListPlot,Frame\[Rule] True,Axes\[Rule]False,PlotRange \[Rule]All, TextStyle\[Rule]{FontFamily->"Times",FontSize\[Rule]10}]; SetOptions[Plot,Frame\[Rule] True,Axes\[Rule]False,PlotRange \[Rule]All, TextStyle\[Rule]{FontFamily->"Times",FontSize\[Rule]10}]; data= Table[{x,ArcTan[x-5] + Random[]/5},{x,0,10,0.5}]; p0 =ListPlot[data,Prolog\[Rule]{PointSize[0.02]}, DisplayFunction \[Rule] Identity]; p1=Plot[ArcTan[x-3],{x,0,10},DisplayFunction \[Rule] Identity]; p2=Plot[ArcTan[x-4],{x,0,10},PlotStyle\[Rule]{Dashing[{0.01,0.01}]}, DisplayFunction \[Rule] Identity]; p3=Plot[ArcTan[x-6],{x,0,10},PlotStyle\[Rule]{Dashing[{0.01,0.01,0.001}]}, DisplayFunction \[Rule] Identity]; Show[p0,p1,p2,p3,FrameLabel\[Rule]{"Time / sec","Difficulty / m"},DisplayFunction \[Rule] $DisplayFunction]; Underneath the graph I would like the following caption. Figure 8. Comparison of experiment with theory: ??dot dot dot??, experimental results; ??solid line??, theoretical model 1 Park (2001); ??dashed line??, theoretical model 2 Kuska (2002); ??chain dash?? theoretical model 3 Hanlon (2003). where the items ??dot dot dot??, ??dashed line?? etc are actually a line of dots and a dashed line. The graphics for these dots and lines should be the same size as in the diagram and centred with the text. Thanks for examples and ideas. Hugh Goyder