108141_zh-TW

liliconcom

在 JSL 中儲存多個圖表

你好，我正在運行這個腳本，其中 dataCols 是數字列。

OWA = Data Table ("Filtered_raw") << Oneway( 
  Y(eval( dataCols)), 
  X( " WhichTest"),
  Each Pair( 0 ),
  Means( 0 ),
  Plot Actual by Quantile( 0 ),
  Plot Quantile by Actual( 1 ),
  Mean Diamonds( 1 )
);

這將建立我的數值列的單向分析和常態分位數圖。 現在我嘗試用這個腳本儲存這些圖：

OWA << report;
OWA << Save MSWord( "\\snl\home\malepp\Software\JMP\JMP_Report\Oneway_normalQ.doc");

問題是它只保存最後一列的單向/分位數圖。 如何將它們全部保存到文件中？

 

謝謝！

回覆：在 JSL 中儲存多個圖表

更好的代碼......謝謝溫迪

回覆：在 JSL 中儲存多個圖表

添加到@tx尼爾森的回复，您可以透過將 Journal 訊息傳送到 Oneway 物件清單來消除 For() 迴圈。由於 OWA 代表一個列表，因此日誌訊息將發送到列表中的每個項目。然後您需要做的就是使用 Current Journal() 函數來取得期刊的參考。以下是上述範例腳本的修改版本。

 

Names Default To Here( 1 );

// Setup an Example Data table
dt = Open( "$SAMPLE_DATA/blood pressure.jmp" );
dataCols = dt << get column names( continuous );
dt:Dose << set name( "WhichTest" );
dt << set name( "Filtered_raw" );

// Run the charts
OWA = Data Table( "Filtered_raw" ) << Oneway(
 Y( Eval( dataCols ) ),
 X( "WhichTest" ),
 Each Pair( 0 ),
 Means( 0 ),
 Plot Actual by Quantile( 0 ),
 Plot Quantile by Actual( 1 ),
 Mean Diamonds( 1 )
);

// Create a journal containing each Oneway
OWA << Journal;
// Obtain a reference to the journal
jj = Current Journal();

// Save the journal to disk
jj << Save MSWord( "$DOCUMENTS\Oneway_normalQ.doc" );

jj << Close Window;

 

回覆：在 JSL 中儲存多個圖表

美麗的！ 我嘗試過類似的方法來循環 N 個項目並嘗試在每個循環中附加，但仍然無法使其工作。 但我沒有使用期刊。

 

對於做同樣的事情但保存到 PowerPoint 有什麼建議嗎？ 特別是，格式化ppt？ 我選擇使用 Word，因為它每頁提供一次分析（一個單向圖和一個常態分位數圖，標題看起來很正常）。 而 ppt 一次分析需要 3 頁，格式也很糟糕。

 

謝謝！！！！

 

 

回覆：在 JSL 中儲存多個圖表

您遇到的問題是，沒有一個報告輸出，而是基於執行的 OneWay 分析的實際數量有 n 個輸出。因此，當您執行“儲存 MSWord”時，它會一一儲存每個輸出。但是，它不會將輸出附加到 .doc 文件，而是取代它。因此，需要做的是將每個輸出放入 JMP 日誌中，然後儲存日誌。這就是下面的腳本中所做的事情

Names Default To Here( 1 );

// Setup an Example Data table
dt = Open( "$SAMPLE_DATA/blood pressure.jmp" );
dataCols = dt << get column names( continuous );
dt:Dose << set name( "WhichTest" );
dt << set name( "Filtered_raw" );

// Run the charts
OWA = Data Table( "Filtered_raw" ) << Oneway(
 Y( Eval( dataCols ) ),
 X( " WhichTest" ),
 Each Pair( 0 ),
 Means( 0 ),
 Plot Actual by Quantile( 0 ),
 Plot Quantile by Actual( 1 ),
 Mean Diamonds( 1 )
);

// Create a Journal to store the output in
jj = New Window( "The Output", <<JOURNAL></JOURNAL>