data = RandomReal[{-1, 1}, {3, 10}];
ListLinePlot[data,
(*第一條數列紅色，小虛線；第二條數列綠色，大虛線；第三條數列藍色，實線*)
PlotStyle->{{Thickness[0.005],Red,Dashing[0.01]}, {Thickness[0.005],Green,Dashing[0.02]}, {Thickness[0.005],Blue,Dashing[0]}},(*圖形四周皆有框線*)
Frame->{{True,True},{True,True}},
(*設定左邊及下面座標軸間距*)
FrameTicks->{{{#,NumberForm[#,{3,2}]}&/@Range[-1,1,0.25],None},{True,None}},
(*設定座標軸名稱*)
FrameLabel->{t,Style["Absoluteerrors",FontSize->16]},
Epilog->{
(*第一條數列名稱，字型大小，及座標*)
Text[Style["AAAwhenaaa",FontSize->10],{2,0.7}],(*第二條數列名稱，字型大小，及座標*)
Text[Style["BBBwhenbbb",FontSize->10],{2,0.5}],(*第三條數列名稱，字型大小，及座標*)
Text[Style["CCCwhenccc",FontSize->10],{2,0.6}],(*設定數列圖示大小*)
Thickness[0.005],
(*設定第一條數列圖示*)
Red,Dashing[0.01],Line[{{3,0.7},{4,0.7}}],
Green,Dashing[0.02],Line[{{3,0.5},{4,0.5}}],
Blue,Dashing[0],Line[{{3,0.6},{4,0.6}}],(*設定圖形大小*)
ImageSize->600
}]
如果覺得太複雜，下面的方式也是不錯！
讀者回應 ( 0 意見 )
訂閱發佈留言 (Atom)
發佈留言
Please leave your name and tell me what you thought about this site. Comments, suggestions and views are welcomed.
如果這篇文章對你有幫助，那請留個訊息給我～