331700_zh-TW

liliconcom

使用不同的腳本導出多個圖

嘿Jmp用戶，

 

我正在嘗試在Jmp中導出多個圖。 無論如何，有沒有選擇相應的腳本並將所有圖形一起導出。

 

非常感謝 ！

 

一世

數據表圖形腳本編寫回复：使用不同的腳本導出多個圖

這是一個將Big Class的三個圖形輸出導出到word doc的示例。

dt = open("$sample_data\Big Class.jmp");

dist = expr(dt << Distribution(
 Continuous Distribution( Column( :weight ) ),
 Nominal Distribution( Column( :age ) )
));

gb1 = expr(dt << Graph Builder(
 Show Control Panel( 0 ),
 Variables( X( :age ), Y( :sex ) ),
 Elements( Heatmap( X, Y, Legend( 2 ) ) )
));

gb2 = expr(dt << Graph Builder(
 Show Control Panel( 0 ),
 Variables( X( :height ), Y( :weight ), Overlay( :sex ) ),
 Elements( Points( X, Y, Legend( 1 ) ), Smoother( X, Y, Legend( 2 ) ) )
));

nw = new window("Example Export Multiple Platforms",
 chart_output = vlistbox(
  dist,
  page break box(),
  gb1,
  page break box(),
  gb2
 );
);

chart_output << save msword("c:\temp\SampleCharts.doc", Native);

回复：使用不同的腳本導出多個圖

你好@JMPdiscoverer ，

 

我想出了一個類似的解決方案@pmroz ，我喜歡他們的所作所為。

 

這就是我的想法，但不如製作Word文檔等好。您也可以將它們直接保存到PPT文件中。 我在JSL中創建報表只是為了方便使用，但是如果您已經打開它們，則for循環可以使用。 但是，如果您編寫了一個生成報告的腳本，則只需按變量名引用該報告，而不用查找窗口列表。

 

Names Default To Here( 1 );

dt = open("$sample_data\Big Class.jmp");

rpt1 = dt << Bivariate( Y( :weight ), X( :height ) );
rpt2 = dt << Oneway( Y( :height ), X( :age ), X Axis Proportional( 0 ) );
rpt3 = dt << Fit Group(
 Oneway( Y( :weight ), X( :age ), X Axis Proportional( 0 ) ),
 Bivariate( Y( :weight ), X( :height ) ),
 <<{Arrange in Rows( 2 )}
);


reportlist = {};
For( i = 0, i <= N Items( Window() ), i++,
 If(
  !Is Missing( Regex( Window( i ) << getwindow title, "Fit" ) ) == 1 | !Is Missing(
   Regex( Window( i ) << getwindow title, "Oneway" )
  ) == 1 | !Is Missing( Regex( Window( i ) << getwindow title, "Bivariate" ) ) == 1,
  Insert Into( reportlist, Window( i ) << get window title )
 )
);


For( i = 1, i <= N Items( reportlist ), i++,
 picbox = Window( reportlist[i] ) << getPicture;
 picbox << SaveImage(
  "whatever your local directory to save is\pic" || Char( i ) || ".png"
 );
);

這些應該使您的工作順利進行。

 

祝好運！，

DS