Wolfram mathematica 使用Mathematica 8中的Show[p1、p2、PlotRange->;All]显示非均匀轴刻度

Wolfram mathematica 使用Mathematica 8中的Show[p1、p2、PlotRange->;All]显示非均匀轴刻度,wolfram-mathematica,Wolfram Mathematica,我尝试使用Mathematica 8和show[p1,p2,PlotRange->All]在同一个图形中显示一系列绘图,但y轴标签(从对数0.5到对数1.5)显示不均匀。如何将轴标签更正为一致 我已经包括了一个带有两个图(dataPlot3和dataPlot4)的示例,但我试图在同一个图中显示更多内容 Show使用指定的第一个图形中的选项,包括PlotRange和Ticks。在创建包含两个数据集范围的第一个绘图时,可以指定一个显式的PlotRange,并将生成适当的记号以覆盖该范围: d1 =

我尝试使用Mathematica 8和show[p1,p2,PlotRange->All]在同一个图形中显示一系列绘图,但y轴标签(从对数0.5到对数1.5)显示不均匀。如何将轴标签更正为一致

我已经包括了一个带有两个图(dataPlot3和dataPlot4)的示例,但我试图在同一个图中显示更多内容


Show
使用指定的第一个图形中的选项,包括
PlotRange
Ticks
。在创建包含两个数据集范围的第一个绘图时,可以指定一个显式的
PlotRange
,并将生成适当的记号以覆盖该范围:

d1 = Table[x^2, {x, 50}];
d2 = Table[50 + x^3, {x, 50}];

p1 = ListLogLogPlot[d1, PlotStyle -> Red, PlotRange -> {1, 200000}]

p2 = ListLogLogPlot[d2, PlotStyle -> Black]

Show[p1, p2]

Show
使用指定的第一个图形中的选项,包括
PlotRange
Ticks
。在创建包含两个数据集范围的第一个绘图时,可以指定一个显式的
PlotRange
,并将生成适当的记号以覆盖该范围:

d1 = Table[x^2, {x, 50}];
d2 = Table[50 + x^3, {x, 50}];

p1 = ListLogLogPlot[d1, PlotStyle -> Red, PlotRange -> {1, 200000}]

p2 = ListLogLogPlot[d2, PlotStyle -> Black]

Show[p1, p2]

我确信您会在“谢谢您的建议”获得更好的回复。我确信您会在“谢谢您的建议”获得更好的回复。谢谢,添加明确的绘图范围会有所帮助,但我想知道是否还有其他方法,因为我不必提前知道所有绘图的范围。谢谢,添加一个显式的PlotRange会有所帮助,但我想知道是否还有其他方法,因为我不一定提前知道所有绘图的范围。