<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />大家好,
我是 JMP 的新用户,当我遇到问题时,我正在研究 jsl。
目的:1)打开一个文件
2) 执行寿命分配
3) 单击用户希望将分布报告导出为的格式对应的按钮。
问题:我无法让 JMP 保存 Life 分布在下面生成的报告。
这个练习背后的概念很简单,但我不明白为什么最后一个功能不起作用或如何解决它。
有时我会收到错误消息:发送期望脚本对象在访问或评估“发送”......
==================================================== =========================
//算法:1。 打开用户指定的适当数据文件..
// 2。 将文件作为 JMP 数据表导入。
// 3。 在给定的数据表上执行寿命分布。
// 4。 如果需要,允许用户操作文件。
// 5。 一旦进行了需要的更改,就可以为用户提供将报告保存为所需文件类型的选项
// 用户将选择他们想要打开的文件
dt1 =打开( ) ;
// 在选择的数据表上执行内置的生命分配平台
LD =寿命分配(
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")),
按钮框("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 =打开() ;
// 在选择的数据表上执行内置的生命分配平台
LD = 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 )})
) ;
LD <<关闭时(
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 =打开() ;
// 在选择的数据表上执行内置的生命分配平台
LD = 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 <<关闭窗口())
) ;
报告(ld)[ 《生活分配》 ] <<前置(w2) ;