233888_zh-TW

liliconcom

如何更改參考線？沒有數字

你好我想將兩個數據的標準平均值放入參考線中，如下圖所示。

下面的 JMP 腳本是我任意寫的標準平均值，13.2 (22.2+4.2)/2 = 13.2

其實我用的數據不只兩個。 （下圖只是範例）

我怎樣才能改變腳本？

dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;


Graph Builder(
 Size( 1056, 825 ),
 Variables( Y( :height ), Y( :weight ) ),
 Elements(
  Position( 1, 1 ),
  Points( Y, Legend( 7 ) ),
  Caption Box( Y, Legend( 13 ), Summary Statistic( "Std Dev" ) )
 ),
 Elements(
  Position( 1, 2 ),
  Points( Y, Legend( 8 ) ),
  Caption Box( Y, Legend( 14 ), Summary Statistic( "Std Dev" ) )
 ),
 SendToReport(
  Dispatch(
   {},
   "height",
   ScaleBox,
   {Add Ref Line( 13.3, "Solid", "Medium Dark Red", "Std Dev mean", 2 )}
  ),
  Dispatch(
   {},
   "weight",
   ScaleBox,
   {Add Ref Line( 13.3, "Solid", "Medium Dark Red", "Std Dev mean", 2 )}
  )
 )
);

回覆：如何更改參考線？沒有數字

以下是我用來捕獲您正在使用的給定子組（例如年齡）的列統計資訊的方法。

這是腳本。只需使用相同的方法添加您想要的其他參考線

names default to here(1);
dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;



gb = Graph Builder(
 Size( 1056, 825 ),
 Variables( X( :height ), Group Y( :age ) ),
 Elements(
  Bar( X, Legend( 17 ) ),
  Caption Box( X, Legend( 15 ), Response Axis( "X" ) ),
  Caption Box(
   X,
   Legend( 16 ),
   Response Axis( "X" ),
   Summary Statistic( "Std Dev" )
  )
 )
);


Report( gb )[AxisBox( 1 )] << Add Ref Line(
 Col Mean( if(:age == 12,:height,.) ) + 4*Col Std Dev( If(:age==12,:height,) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean 12",
 2
);
Report( gb )[AxisBox( 1 )] << Add Ref Line(
 Col Min( if(:age == 12,:height,.) ),
 "Solid",
 "Medium Dark Red",
 "Min 12",
 2
);
Report( gb )[AxisBox( 1 )] << Add Ref Line(
 Col Max( if(:age == 12,:height,.) ),
 "Solid",
 "Medium Dark Red",
 "Max 12",
 2
);

Report( gb )[AxisBox( 1 )] << Add Ref Line(
 Col Mean( if(:age == 13,:height,.) ) + 4*Col Std Dev( If(:age==13,:height,) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean 13",
 2
);

回覆：如何更改參考線？沒有數字

@tx尼爾森

感謝您的熱心回覆！

我還有最後一張！問題。

抱歉打擾你..

 

我想在所有組別（年齡）中加入參考線 Max, min (Mean + 4 * Std dev)。

問題是下面的腳本不起作用..

names default to here(1);
dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;



gb = Graph Builder(
 Size( 1056, 825 ),
 Variables( X( :height ), Group Y( :age ) ),
 Elements(
  Bar( X, Legend( 17 ) ),
  Caption Box( X, Legend( 15 ), Response Axis( "X" ) ),
  Caption Box(
   X,
   Legend( 16 ),
   Response Axis( "X" ),
   Summary Statistic( "Std Dev" )
  )
 )
);


Report( gb )[AxisBox( 1 )] << Add Ref Line(
 Col Mean( :height ) + 4*Col Std Dev( :height ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

另一個問題是，我如何提取所有組別（年齡）的最大值、最小值（平均值 + 4 * 標準差）。

我想套用參考線 Max (Mean + 4 * Std dev)、Min (Mean + 4 * Std dev)，所有組別都相同。

我想我可以用 Max()、Min() 函數...

回覆：如何更改參考線？沒有數字

我看到你指出的問題了。看起來，即使顯示樹指示有 4 個獨立的軸，JMP 實際上也將它們視為 2 個軸。因此，為了盡可能接近您想要的結果，我們可以根據性別值將身高和體重的資料分成 4 列，然後分別繪製 4 個變數。

這是 JSL

names default to here(1);
dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;

dtSplit = dt << Split(
 Split By( :sex ),
 Split( :height, :weight ),
 Remaining Columns( Drop All ),
 Sort by Column Property
);

gb = dtSplit << Graph Builder(
 Variables( Y( :height F ), Y( :weight F ), Y( :height M ), Y( :weight M ) ),
 Elements(
  Position( 1, 1 ),
  Points( Y, Legend( 11 ) ),
  Caption Box( Y, Legend( 15 ), Summary Statistic( "Std Dev" ) )
 ),
 Elements(
  Position( 1, 2 ),
  Points( Y, Legend( 12 ) ),
  Caption Box( Y, Legend( 16 ), Summary Statistic( "Std Dev" ) )
 ),
 Elements(
  Position( 1, 3 ),
  Caption Box( Y, Legend( 17 ), Summary Statistic( "Std Dev" ) ),
  Points( Y, Legend( 18 ) )
 ),
 Elements(
  Position( 1, 4 ),
  Points( Y, Legend( 14 ) ),
  Caption Box( Y, Legend( 19 ), Summary Statistic( "Std Err" ) )
 ),
 SendToReport(
  Dispatch(
   {},
   "weight F",
   ScaleBox,
   {Min( 49.5141101773061 ), Max( 150.319351489306 ), Inc( 20 ),
   Minor Ticks( 0 )}
  ),
  Dispatch(
   {},
   "400",
   ScaleBox,
   {Legend Model(
    18,
    Properties( 0, {Line Color( 21 )}, Item ID( "height M", 1 ) )
   ), Legend Model(
    14,
    Properties( 0, {Line Color( 19 )}, Item ID( "weight M", 1 ) )
   )}
  ),
  Dispatch(
   {},
   "400",
   LegendBox,
   {Legend Position( {11, [0], 12, [1], 18, [3], 14, [2]} ),
   Position( {0, 1, 3, 2} )}
  )
 )
);

Report( gb )[AxisBox( 2 )] << Add Ref Line(
 Col Std Dev( :Height F ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

Report( gb )[AxisBox( 3 )] << Add Ref Line(
 Col Std Dev( :Weight F),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 4 )] << Add Ref Line(
 Col Std Dev( :Height M ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 5 )] << Add Ref Line(
 Col Std Dev( :Weight M ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

回覆：如何更改參考線？沒有數字

@tx尼爾森

感謝您的回覆。

在下面的腳本中，F 組中的所有 STD 值都寫為 M 組 STD 值。

我們要怎麼將他們分成兩組呢？

 

dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;


gb = Graph Builder(
 Size( 1056, 825 ),
 Variables( Y( :height ), Y( :weight ), Group Y( :sex ) ),
 Elements(
  Position( 1, 1 ),
  Points( Y, Legend( 7 ) ),
  Caption Box( Y, Legend( 13 ), Summary Statistic( "Std Dev" ) )
 ),
 Elements(
  Position( 1, 2 ),
  Points( Y, Legend( 8 ) ),
  Caption Box( Y, Legend( 14 ), Summary Statistic( "Std Dev" ) )
 )
);

Report( gb )[AxisBox( 2 )] << Add Ref Line(
 Col Std Dev( If( :sex == "F", :Height, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

Report( gb )[AxisBox( 3 )] << Add Ref Line(
 Col Std Dev( If( :sex == "F", :Height, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 4 )] << Add Ref Line(
 Col Std Dev( If( :sex == "M", :Height, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 5 )] << Add Ref Line(
 Col Std Dev( If( :sex == "M", :Weight, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

回覆：如何更改參考線？沒有數字

從我之前的回覆中可以看出，要添加參考線，您所要做的就是將 << Add Ref Line 訊息傳遞到要添加參考線的軸：

Report( gb )[AxisBox( 2 )] << Add Ref Line( Col Std Dev( :Height ), "Solid", "Medium Dark Red", "Std Dev mean", 2 );

為了找出正確指向哪個軸，需要查看圖形產生器輸出的樹狀結構。為此，右鍵單擊圖形生成器標題旁邊的灰色三角形，然後選擇

編輯==>顯示樹結構

然後，您可以將圖形視窗與樹狀結構視窗對齊，然後按一下圖形視窗中要查看其樹結構的項目，JMP 將移至樹結構視窗中的該結構

 

從這裡可以看出，Height 列的軸，對於 Sex=="F" 是 AxisBox(2)

如果您按一下每個有問題的軸，您將看到要新增參考線的軸框。問題的最後一個軸，重量列，性別==“M”是：

現在需要做的就是擴展 JSL，為所有 4 個軸建立參考線，並在每個新增參考線訊息中計算參考線放置的正確值。以下是 4 行新增參考線代碼：

Report( gb )[AxisBox( 3 )] << Add Ref Line(
 Col Std Dev( If( :sex == "F", :Weight, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 2 )] << Add Ref Line(
 Col Std Dev( If( :sex == "M", :Height, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);
Report( gb )[AxisBox( 3 )] << Add Ref Line(
 Col Std Dev( If( :sex == "M", :Weight, . ) ),
 "Solid",
 "Medium Dark Red",
 "Std Dev mean",
 2
);

請注意，在這種情況下，計算標準差時必須考慮性別列以及測量列。

回覆：如何更改參考線？沒有數字

@tx尼爾森感謝您的及時答覆！

我還有一個問題。

如果數據按性別分組，如下圖所示，我該如何處理？

回覆：如何更改參考線？沒有數字

這是對腳本的簡單修改，它在每列的標準差值處繪製參考線（：高度，：體重）

dt = Open( "$SAMPLE_DATA/Big Class.jmp" ) ;


gb=Graph Builder(
 Size( 1056, 825 ),
 Variables( Y( :height ), Y( :weight ) ),
 Elements(
  Position( 1, 1 ),
  Points( Y, Legend( 7 ) ),
  Caption Box( Y, Legend( 13 ), Summary Statistic( "Std Dev" ) )
 ),
 Elements(
  Position( 1, 2 ),
  Points( Y, Legend( 8 ) ),
  Caption Box( Y, Legend( 14 ), Summary Statistic( "Std Dev" ) )
 )
 );
report(gb)[AxisBox(2)]<<ADD ref="" line=""></ADD>