继续讨论dislin作为一个解决方案,并给出一个不适合评论的答案…
@M.S.B.-你好。我很抱歉在你的回答中写到,但是这些评论太短了,以回答的形式回答问题是…总之…
dislin有一个快速的绘图特性——例程qplot只需要三个参数就可以绘制一条曲线:x数组、y数组和n号。参见手册第16章。再加上几个额外的调用来选择输出设备和标记轴。我没有用过这个,所以我不知道自动缩放有多好。
是的,我知道QuickPlot,它是相关的例程,但是它对于我的需求来说太固定了(不能改变任何东西),而且是的,它的自动缩放有点奇怪。另外,涂鸦内部的空白太大。
或者,如果您想使用graf的强大功能来设置图形框,那么有一个子例程gaxpar来自动生成建议的值。-2作为labdig的第一个参数,自动确定刻度线标签中的位数。
你试过常规程序了吗?
抱歉,我在dislin的索引中找不到您要引用的gaxpar例程。你确定这个名字和那个完全一样吗?
M.S.B.的回答
:是的,我对gaxpar的拼写有把握。这是dislin 9.5 pdf手册第4章中的最后一个例程。也许这是一个新的惯例?另外还有一种自动缩放的方法:setscl——见第6章。
到目前为止,我所做的(除了一些“duck tape”解决方案)是
use dislin; implicit none
real, dimension(5) :: &
x = [.5, 2., 3., 4., 5.], &
y = [10., 22., 34., 43., 15.]
real :: xa, xe, xor, xstp, &
ya, ye, yor, ystp
call setpag('da4p'); call metafl('xwin');
call disini(); call winkey('