位置:首页 > 软件操作教程 > 其它 > 其它 > 问题详情

Origin中画出拟合曲线上任意一点的切线的方法

提问人:周丽平发布时间:2021-09-22

1、记下如下代码:

12dotool 3; // Data Reader tool

def pointproc {

dotool -q;

%b=xof(%c); // X dataset for the current one

p1=(%C[index+1]-%C[index])/(%b[index+1]-%b[index]);

p2=(%C[index]-%C[index-1])/(%b[index]-%b[index-1]);

p=(p1+p2)/2;

c=y-p*x;

ftang(x)=$(p)*x+$(c);

layer -i200 ftang; // Plot as Line...

set ftang -c 4; // ...in blue

};

2、先将数据处理好,画出拟合曲线。

image.png

3、快捷键ALT+3打开脚本窗口,复制上述脚本至脚本窗口中,按回车运行。

image.png

4、此时Data Reader Tool会被激活,鼠标指针变成十字方框,用此工具选择图像中的任意一点,双击后切线将自动生成。

image.png

image.png

5、如有需要,可以自行制作一个按钮将此脚本关联(PS:教程上如是说,有待实践)。

至此,切线的绘制完成。

如需要制作多条切线,把ftang

ftang(x)=$(p)*x+$(c);

layer -i200 ftang; // Plot as Line...

set ftang -c 4; // ...in blue

};

改成不同的名字后重新运行就可以了。

ftang2(x)=$(p)*x+$(c);

layer -i200 ftang; // Plot as Line...

set ftang2 -c 4; // ...in blue

};

继续查找其他问题的答案?

相关视频回答
回复(0)
返回顶部