729974_zh-CN

liliconcom

帮助使用脚本重命名数据表

你好，

我正在尝试简化一些分析，并正在尝试 JSL。在当前情况下，我正在运行一些数据的 4PL 拟合，然后生成曲线参数摘要表。我可以制作新表，但默认情况下它将命名为“Untitled X”（其中 x 只是数字的迭代......）。我可以手动重命名为“4PL”...我的后续任务将指向它。

我想做的是让原始脚本创建新表并将名称设置为“4PL”。我搜索了档案并尝试了“设置名称”功能...但我认为我的语法不正确。任何帮助，将不胜感激。

这是我正在运行的脚本（没有“设置名称”功能）：

名称默认为此处( 1 );
rpt = 新窗口(“RM 跟踪 - CV - 通过 log(Conc) 拟合平均响应曲线”,
数据表(“RM Tracking-CV”) << 拟合曲线(
Y(：平均响应)，
X( :"log(Conc)"n ),
组（：带有批次#的个体曲线），
拟合Logistic 4P（测试并行性），
发送至报告（
Dispatch( {"Logistic 4P"}, "Plot", OutlineBox, {Close( 1 )} )
）
）
）；
等待（0）；
rpt["拟合曲线", "Logistic 4P", "组摘要", 表框( 1 )] <<
制作成数据表；
rpt << 关闭窗口；

非常感谢您的帮助！

克里斯

自动化和脚本编写回复：帮助脚本重命名数据表

这是使用设置名称的示例

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Nonlinear Examples/Bioassay.jmp");

fc = dt << Fit Curve(
	Y(:Toxicity),
	X(:log Conc),
	Group(:formulation),
	Fit Logistic 4P(Test Parallelism),
	SendToReport(Dispatch({"Logistic 4P"}, "Plot", OutlineBox, {Close(1)}))	
);

dt_logistics = Report(fc)["Fit Curve", "Logistic 4P", "Group Summary", Table Box(1)] << Make Into Data Table;
fc << Close Window;

dt_logistics << Set Name("4PL");

回复：帮助脚本重命名数据表

嗨，贾莫，

感谢您的回复。我在我的案例中使用了以下内容（数据表包含在项目文件中）：

名称默认为此处(1)；

dt = 打开("jmpprj://contents/测试文件.jmp");

fc = dt << 拟合曲线(

Y(:平均响应),

X(:"对数浓度"n),

组（：带有批次#的个体曲线），

拟合Logistic 4P（测试并行性），

SendToReport(Dispatch({"Logistic 4P"}, "Plot", OutlineBox, {Close(1)}))

）；

dt_logistics = Report(fc)["拟合曲线","Logistic 4P","分组汇总",表格框(1)] << 制成数据表;

fc << 关闭窗口；

dt_logistics << 设置名称("4PL");

当我运行脚本时，我得到以下信息：

有什么想法吗？

克里斯

回复：帮助脚本重命名数据表

我的猜测是拟合曲线失败了，因此“fc”没有被填充。可能导致此问题的原因之一是 X 或 Y 列未设置为连续。

回复：帮助脚本重命名数据表

谢谢吉姆。

两者都是连续的，如果我独立进行，4PL 配合就可以发挥作用。

克里斯

回复：帮助脚本重命名数据表

吉姆，

再次感谢...并感谢您在我努力解决这个问题时的耐心等待。

尝试了你的建议没有效果；仍然收到相同的错误消息。

仅供参考 - 我可以运行以下命令，它会进行分析并创建数据表......只是不重命名它：

Names Default To Here( 1 );
rpt = New Window( "RM Tracking- CV - Fit Curve of Avg Response by log(Conc)",
	Data Table( "RM Tracking- CV" ) << Fit Curve(
		Y( :Avg Response ),
		X( :"log(Conc)"n ),
		Group( :Individual Curve with Lot# ),
		Fit Logistic 4P( Test Parallelism ),
		SendToReport(
			Dispatch( {"Logistic 4P"}, "Plot", OutlineBox, {Close( 1 )} )
		)
	)
);
Wait( 0 );
rpt["Fit Curve", "Logistic 4P", "Group Summary", Table Box( 1 )] <<
Make Into Data Table;
rpt << Set Name("4PL");

克里斯

回复：帮助脚本重命名数据表

尝试

current data table() << set name("4PL");

回复：帮助脚本重命名数据表

去除

fc << close window;

然后再次运行该脚本。错误信息表明找不到显示输出窗口。如果窗口关闭速度快于“生成数据表”，则可能存在问题。

此外，在将 JSL 输入问题或响应时，您需要使用预览窗口顶部的 JSL 图标。它使读者可以更轻松地检查您的脚本。

回复：帮助脚本重命名数据表

dt = rpt["Fit Curve", "Logistic 4P", "Group Summary", Table Box( 1 )] <<
Make Into Data Table;
dt << Set Name("4PL");