<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />大家好,
我是 JMP 的新用户,当我遇到一个问题时正在尝试 jsl。
目的:1)打开一个文件
2) 进行生命分配
3) 单击用户希望将分布报告导出为的格式的相应按钮。
问题:我无法让 JMP 保存下面由生命分布生成的报告。
此练习背后的概念很简单,但我不明白为什么最后一个功能不起作用或如何解决它。
有时我会收到错误消息:在“发送”的访问或评估中发送期望可编写脚本的对象....
================================================ ========================
//算法:1。 打开用户指定的适当数据文件..
// 2. 将文件导入为 JMP 数据表。
// 3. 对给定的数据表执行寿命分布。
// 4. 如果需要,允许用户操作文件。
// 5. 完成所需的更改后,为用户提供将报告保存为所需文件类型的选项
// 用户将选择他们想要打开的文件
dt1 =打开( ) ;
// 内置的生活分发平台在选择的数据表上执行
低密度脂蛋白=生命分布(
dt1 ,
是( 1个) , //时间栏
审查( 6个) , // 累积危害列
审查代码( 1个) ,
<<适合威布尔,
置信区间法(瓦尔德) ,
<<设置比例(非参数) ,
区间型(同时) ,
显示事件图频率标签( 0 ) ,
<<设置脚本(
{概率纸(剖析器( 1个,置信区间( 1个) ,期限值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分布(剖析器( 1个,置信区间( 1个) ,期限值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分位数(剖析器( 1个,置信区间( 1个) ,期限值(可能性( 0.5 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔危害(剖析器( 1个,置信区间( 1个) ,期限值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔密度(剖析器( 1个,期限值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,自定义估计(威布尔, 0 )}
) ,
派遣( { “比较分布” } , 《生活分配》 ,框框, {网格线顺序( 2个) ,参考线顺序( 3个)} ) ,
派遣( { “统计数据” , “模型比较” } , “” ,表格框, {按列排序( 2个, 1个)} )
);
LD << 关闭时(
w1 = New Window( "报表导出",
Text Box("你想以另一种格式导出此报告吗? \!n(注意:此报告可以导出的文件格式类型有限制。\!n。 )\!n"),
按钮框("是",
w2 = New Window( "导出报表",
按钮框("Word", LD << save MSword("$DESKTOP\my_file.doc")),
Button Box( "Power Point", LD << save Presentation("$DESKTOP\my_file.pptx")),
按钮框(“关闭”,<<关闭窗口())
),
显示(w2);
w1 << 关闭窗口();
),
按钮框("否",
w1 << 关闭窗口()
),
);
伟大的! 有用。 谢谢吉姆。
我想用这个数据过滤器做的最后一件事是通过脚本选择前 10 个模型。
示例 1:在此示例中,数据过滤器将选择并包括与指定模型 ID 相关的数据。
dt1 <<数据过滤器(
地点( { 1000 , 50 } ) ,
模式(展示( 1个) ,包括( 1个) ) ,
列( :物品) ,
在哪里( :物品== {"型号 ID 1", "型号 ID 2", "型号 ID 3", "型号 ID (n)"} ) ,
展示( :物品,尺寸( 204 , 140 ) ,列表显示)
) ;
//我想做一些与此类似的事情,但不必指定确切的模型 ID。 我想说的是包括前 (n) 个型号 ID 的数据。
示例 2:我的许多实验尝试之一。
楷模=字符(当前数据表() <<选择哪里(评估(物品[] < 3个))) ; //选择前三个唯一的模型 ID 并绘制它们
dt1 <<数据过滤器(
地点( { 1000 , 50 } ) ,
模式(展示( 1个) ,包括( 1个) ) ,
列( :物品) ,
在哪里( :物品==楷模) ,
展示( :物品,尺寸( 204 , 140 ) ,列表显示)
) ;
如果您有任何建议,请告诉我。
以下是您的脚本的两个版本。第一个按照您设计的方式工作,而第二个是我喜欢做这些事情的方式,通过将保存请求直接嵌入到 Life Distribution 输出中。
//算法:1。 打开用户指定的适当数据文件..
// 2. 将文件导入为 JMP 数据表。
// 3. 对给定的数据表执行寿命分布。
// 4。 如果需要,允许用户操作文件。
// 5. 完成所需的更改后,为用户提供将报告保存为所需文件类型的选项
// 用户将选择他们想要打开的文件
dt1 =打开() ;
// 内置的生活分发平台在选择的数据表上执行
低密度脂蛋白= dt1 <<生命分布(
Y(柱子( 1个) ) , //时间栏
审查(柱子( 6个) ) , // 累积危害列
审查代码( 1个) ,
<<适合威布尔,
置信区间法(Wald) ,
<<设置比例(非参数) ,
间歇式(同步) ,
显示事件图频率标签( 0 ) ,
<<设置脚本(
{概率纸( Profiler( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分布( 探查器( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分位数( 探查器( 1个,置信区间( 1个) ,项值(概率( 0.5 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔危险(刻画器( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔密度( 探查器( 1个,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,自定义估计(威布尔, 0 )}
) ,
派遣( { “比较分布” } , 《生活分配》 ,框框, {网格线顺序( 2个) ,参考线序( 3个)} ) ,
派遣( { “统计数据” , “模型比较” } , “” ,表格框, {按列排序( 2个, 1个)} )
) ;
低密度脂蛋白<<关闭时(
w1 =新窗户( “报表导出” ,
文本框(
“您想以其他格式导出此报告吗? \!n(注意:此报告可以导出的文件格式类型有限制。\!n。 )\!n"
) ,
按钮盒( “是的” , w1 <<关闭窗口() ;
w2 =新窗户( 《出口报告》 ,
按钮盒( “单词” ,报告(LD) <<保存MSWord ( "$DESKTOP\my_file.doc" ) ) ,
按钮盒( “微软幻灯片软件” ,报告(LD) <<保存演示文稿( "$DESKTOP\my_file.pptx" ) ) ,
按钮盒( “关闭” , <<关闭窗口() )
)
) ,
按钮盒( “不” , w1 <<关闭窗口() ) ,
)
) ;
第二个脚本:
//算法:1。 打开用户指定的适当数据文件..
// 2. 将文件导入为 JMP 数据表。
// 3. 对给定的数据表执行寿命分布。
// 4。 如果需要,允许用户操作文件。
// 5. 完成所需的更改后,为用户提供将报告保存为所需文件类型的选项
// 用户将选择他们想要打开的文件
dt1 =打开() ;
// 内置的生活分发平台在选择的数据表上执行
低密度脂蛋白= dt1 <<生命分布(
Y(柱子( 1个) ) , //时间栏
审查(柱子( 6个) ) , // 累积危害列
审查代码( 1个) ,
<<适合威布尔,
置信区间法(Wald) ,
<<设置比例(非参数) ,
间歇式(同步) ,
显示事件图频率标签( 0 ) ,
<<设置脚本(
{概率纸( Profiler( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分布( 探查器( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔分位数( 探查器( 1个,置信区间( 1个) ,项值(概率( 0.5 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔危险(刻画器( 1个,置信区间( 1个) ,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,
威布尔密度( 探查器( 1个,术语值(第 1 列( 80.85 ,锁( 0 ) ,展示( 1个) ) ) ) ) ,自定义估计(威布尔, 0 )}
) ,
派遣( { “比较分布” } , 《生活分配》 ,框框, {网格线顺序( 2个) ,参考线序( 3个)} ) ,
派遣( { “统计数据” , “模型比较” } , “” ,表格框, {按列排序( 2个, 1个)} )
) ;
w2 = V 列表框(
按钮盒( “保存到 Word” ,报告(LD) <<保存MSWord ( "$DESKTOP\my_file.doc" ) ) ,
按钮盒( “保存到 Power Point” ,报告(LD) <<保存演示文稿( "$DESKTOP\my_file.pptx" ) ) ,
按钮盒( “关闭” ,低密度脂蛋白<<关闭窗口() )
) ;
报告(ld)[ 《生活分配》 ] <<前置(w2) ;