24小时热门版块排行榜    

查看: 837  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

轻铃molly

铜虫 (小有名气)

[求助] 怎样在origin里面显示切点的坐标?

8.5版本的,画出了拟合好的曲线和某一点的切线,怎样把切点坐标显示出来?求指教。谢谢!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

FANXH1987

木虫 (著名写手)

SLS

【答案】应助回帖

轻铃molly(金币+1): 试了一下,只弹出一个Attention的对话框,不知道是不是因为我同时有多条切线的原因。谢谢你了! 2011-10-15 16:46:16
做出了切线和拟合的曲线,那就应该有两条线了,可以用originlab提供的一个Lab talk来实现
具体过程:
1.将下面的代码保存为custom.ogs,然后替换origin安装原始位置文件夹里的custom.ogs(不放心可以先保留一个备份)
代码:
// Filename:  Custom.ogs
// Purpose: The Custom Routine button on the standard toolbar will use this code, by calling
// the [Main] section
// Modifications:
[main]

run.section(,init);
run.section(,getdatasets);
run.section(,intersect);

[init]

//////////////////////////////
// Initialize all Variables //
//////////////////////////////

i=1; // init i in getnum
j=2; // init j in getnum

%Z=""; // init %Z to nothing

aa1=1E270; // init aa1 (will hold y int for 1st fit)
bb1=1E270; // init bb1 (will hold slope for 1st fit)

aa2=1E270; // init aa2 (will hold y int for 2nd fit)
bb2=1E270; // init bb2 (will hold slope for 2nd fit)

xint=1E270; // init xint (will hold final x intersection value
yint=1E270; // init yint (will hold final y intersection value

%L=""; // string variable used for intersection label on graph

[getdatasets]

//////////////////////////////
// Get Datasets From User   //
//////////////////////////////

// compile list of available datasets in %Z

doc -e D
{
%Z=%Z %C; // create a list of datasets for getnum by looping
};

// execute getnum to obtain names of curves to compare

getnum
(Dataset 1) i:Z
(Dataset 2) j:Z
(Select Datasets);

[intersect]

/////////////////////////////////////////////
// Calculate and Report Intersection (X,Y) //
/////////////////////////////////////////////

// perform linear regressions on selected datasets
// and calculate the x intersection value and its y value

stat.data$=%[%Z,#i]; // assigns 1st selected dataset for lin reg
stat.lr(); // performs lin reg on 1st selected dataset

aa1=stat.lr.a; // assigns 1st y intercept val to aa1
bb1=stat.lr.b; // assigns 1st slope val to bb1

stat.data$=%[%Z,#j]; // assigns 2nd selected dataset for lin reg
stat.lr(); // performs lin reg on 2nd selected dataset

aa2=stat.lr.a; // assigns 2nd y intercept val to aa2
bb2=stat.lr.b; // assigns 2nd slope val to bb2

xint=(aa2-aa1)/(bb1-bb2); // calculates x intersection value
yint=aa1+(bb1*xint); //calculates corresponding y intersection value

%L="Intersection at: ($(xint), $(yint))";
type %L;
label -a (xint-5) yint -s -n intersection %L;

2.在graph窗口下点击那个类似offie宏默认图标的标签(三个矩形加中间一个菱形的标签,如果没有,在view-tools bar-button group - standard里可以找到,标签提示是:run custom.ogs···,这个标签是用来启用Custom.ogs文件里的内容的,和office自定义宏的用法很像)
3.在弹出的对话框里选择数据源,然后OK
测试只有一个交点时可以实现显示交点,几个交点的情况就不知道了,有个不好的地方时这个lab选择数据好像只能选择整个数据曲线,要是能像date selected功能可以随意选择就好了~~~
你试一下吧!应该可以的(不行也可以给origin增加这个功能,呵呵),祝你成功
有限空间,无限价值!
3楼2011-10-14 15:46:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

eurekayan

荣誉版主 (知名作家)

三沙市名誉市长兼书记

优秀版主

【答案】应助回帖

轻铃molly(金币+1): 不是很明白,不过还是谢谢了~! 2011-10-15 16:29:10
重建一列,然后set  as label,读出切点值输入
xps
2楼2011-10-13 15:46:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 澳大利亚 Murdoch University 全奖博士招生(3个名额)地质化工冶金领域 +34 AI8RaGaPaSCR 2026-08-07 36/1800 2026-08-13 22:45 by jBlZNDB0Qx9J
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +3 启萌科技 2026-08-12 10/500 2026-08-13 20:42 by hmhminy
[基金申请] 小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊 +9 Tide man 2026-08-10 10/500 2026-08-13 20:33 by 温淼淼淼
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +4 majunge000 2026-08-11 6/300 2026-08-13 16:50 by 四季常青藤
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 关于Filecode分析方法 +9 majunge000 2026-08-10 11/550 2026-08-13 10:40 by ZH远山
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[论文投稿] 职称评审,求友友推荐见刊最快的期刊 +4 工厂打螺丝 2026-08-08 4/200 2026-08-12 09:18 by hansi2025
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +7 布布和一二 2026-08-10 10/500 2026-08-12 09:12 by 布布和一二
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 关于代码变化问题,想知道的进来 +17 且听虎啸 2026-08-07 24/1200 2026-08-10 18:35 by zhangduo2008
[基金申请] 2026国自然放榜时间 +9 布布和一二 2026-08-08 9/450 2026-08-10 11:22 by xxxx2020
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] 国基金的申报应该改成非等额制,评价高的钱多评价低的钱少,但是增加资助率 +7 a089 2026-08-07 7/350 2026-08-08 18:05 by gltch
[基金申请] 关于filecode +4 布布和一二 2026-08-07 7/350 2026-08-07 22:55 by zhanghaozhu
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
信息提示
请填处理意见