627075_zh-TW

liliconcom

Re: 如何用佔位符替換函數中的內容？

查看表達式——您需要使用表達式來執行此操作。這是一個適合您的示例：

 

//Define variables for X, X1, X2, Y, Y1, Y2, and Group X
vars = {X(colX[i]), X(colX1[i], Position( 1 )), X(colX2[i], Position( 1 ))
,
  Y(colY[i]), Y(colY1[i], Position( 1 )), Y(colY2[i], Position( 1 ))
};

  
If( Is Missing(colGroupX[i]) != 1, 
 vars = Insert Into( vars, Group X( colGroupX[i] ) )
);

 
vars = Substitute( vars, {}, Expr( Variables() ) );

Eval( Eval Expr(
GB = Current Data Table() << Graph Builder(
 Size( 1413, 999 ),
 Expr( Name Expr( vars ) ),
 Elements(
  Points( X( 1 ), X( 2 ), X( 3 ), Y( 1 ), Y( 2 ), Legend( 11 ) ),
  Smoother( X( 1 ), X( 2 ), Y( 3 ), Y( 1 ), Y( 2 ), Legend( 14 ) )
 ),
 SendToReport(
  Dispatch( {}, "Graph", ScaleBox,
   {Label Row( {Show Major Grid( 1 ), Show Minor Grid( 1 )} )}
  )
 )
)
) )

Re: 如何用佔位符替換函數中的內容？

感謝您的回复，使用您發送的內容，我嘗試創建一個我自己的版本，如果它不為空，它將添加到 vars 中

If( Is Missing(colGroupX[i]) != 1, Insert Into( vars, Group X(colGroupX[i])));        vars = {}; 
  If( Is Missing(colX[i]) != 1, Insert Into( vars, X(colX[i])));
  If( Is Missing(colX1[i]) != 1, Insert Into( vars, X(colX1[i], Position( 1 ))));
  If( Is Missing(colX2[i]) != 1, Insert Into( vars, X(colX2[i], Position( 1 ))));
  If( Is Missing(colX3[i]) != 1, Insert Into( vars, X(colX3[i], Position( 1 ))));
  If( Is Missing(colX4[i]) != 1, Insert Into( vars, X(colX4[i], Position( 1 )))); 

  If( Is Missing(colY[i]) != 1, Insert Into( vars, Y(colY[i])));  
  If( Is Missing(colY1[i]) != 1, Insert Into( vars, Y(colY1[i], Position( 1 ))));
  If( Is Missing(colY2[i]) != 1, Insert Into( vars, Y(colY2[i], Position( 1 ))));
  If( Is Missing(colY3[i]) != 1, Insert Into( vars, Y(colY3[i], Position( 1 ))));
  If( Is Missing(colY4[i]) != 1, Insert Into( vars, Y(colY4[i], Position( 1 )))); <BR />

當我運行它時，它會出錯

名稱未解析：X 在訪問或評估 'X' 時，X( colX[i] ) /*###*/

但是，如果我在下面的 vars 語句中包含它，它就可以工作

vars = {X(colX[i]), X(colX1[i], Position( 1 )), X(colX2[i], Position( 1 ))
,
  Y(colY[i]), Y(colY1[i], Position( 1 )), Y(colY2[i], Position( 1 ))
};

 

請指教謝謝！

Re: 如何用佔位符替換函數中的內容？

您需要將表達式插入列表中。有了原型插入（變量，值，位置） ，JMP 將僅對以下項執行名稱查找變量（不會嘗試評估名稱查找返回的任何內容），將執行名稱查找並評估價值，並將執行名稱查找和評估位置.您想要在列表中插入一個表達式——因此您不希望 JMP 計算您放入價值位置。然而，JMP _always_ 對其求值，因此即使 JMP 對其求值也要保留表達式，將其包裝在表達式()函數，像這樣：

         vars = {}; 
  If( Is Missing(colX[i]) != 1, Insert Into( vars, Expr( X(colX[i]) )));
  If( Is Missing(colX1[i]) != 1, Insert Into( vars, Expr( X(colX1[i], Position( 1 )) )));
  If( Is Missing(colX2[i]) != 1, Insert Into( vars, Expr( X(colX2[i], Position( 1 )) )));
  If( Is Missing(colX3[i]) != 1, Insert Into( vars, Expr( X(colX3[i], Position( 1 )) )));
  If( Is Missing(colX4[i]) != 1, Insert Into( vars, Expr( X(colX4[i], Position( 1 )) ))); 

  If( Is Missing(colY[i]) != 1, Insert Into( vars, Expr( Y(colY[i]) )));  
  If( Is Missing(colY1[i]) != 1, Insert Into( vars, Expr( Y(colY1[i], Position( 1 )) )));
  If( Is Missing(colY2[i]) != 1, Insert Into( vars, Expr( Y(colY2[i], Position( 1 )) )));
  If( Is Missing(colY3[i]) != 1, Insert Into( vars, Expr( Y(colY3[i], Position( 1 )) )));
  If( Is Missing(colY4[i]) != 1, Insert Into( vars, Expr( Y(colY4[i], Position( 1 )) ))); 
If( Is Missing(colGroupX[i]) != 1, Insert Into( vars, Expr( Group X(colGroupX[i]) )));

 

Re: 如何用佔位符替換函數中的內容？

您真的只是想讓圖形生成器動態化嗎？是這樣的嗎？  

 

Names default to here( 1 );
dt = open("$SAMPLE_DATA\Big Class.jmp");

some_func = function({dt, list_x, list_y, list_group_x={}}, 
 {varExpr, i}, 
 varExpr=Expr(Variables());
 for(i=1, i<=nitems(list_x), i++,
  insert into(varExpr, EvalExpr(X(Expr(list_x[i]))));
 );
 for(i=1, i<=nitems(list_y), i++,
  insert into(varExpr, EvalExpr(Y(Expr(list_y[i]))));
 );
 for(i=1, i<=nitems(list_group_x), i++,
  insert into(varExpr, EvalExpr(Group X(Expr(list_group_x[i]))));
 );
 Eval(Substitute(
  Expr(
   dt << Graph Builder(
    Size( 696, 578 ),
    DV_VARS
   )
  ), 
  Expr(DV_VARS), nameexpr(varExpr)
 ))
);
some_func(dt, {:weight}, {:height, :height});
some_func(dt, {:weight, :weight}, {:height}, {:age});

Re: 如何用佔位符替換函數中的內容？

嗨，文斯，感謝您的回答，這看起來很棒。 但是，您如何將繪圖類型更改為等擬合線或條形圖，因為上述方法僅適用於更平滑的繪圖類型。

 

謝謝！

 

如何用佔位符替換函數中的內容？

第一塊代碼是多麼希望它能工作，但事實並非如此。

如果我用它替換變量（vars），第二塊代碼就可以工作

有沒有辦法讓第一個塊工作？ 如果我在這裡做錯了什麼，請告知，謝謝。 JMP16

  //Define variables for X, X1, X2, Y, Y1, Y2, and Group X
  vars = {X(colX[i]), X(colX1[i], Position( 1 )), X(colX2[i], Position( 1 )),
    Y(colY[i]), Y(colY1[i], Position( 1 )), Y(colY2[i], Position( 1 ))<BR />        };<BR /><BR />        //If colGroupX[i] is not missing, add Group X statement to the variables block
  If( Is Missing(colGroupX[i]) != 1, 
   vars = Insert Into( vars, Group X( colGroupX[i] ) )
  );<BR /><BR />// Graph builder code where vars is inserted into the variables <BR /><BR />&nbsp;                GB = Current Data Table() << Graph Builder(
     Size( 1413, 999 ),
     Variables( vars ), // vars is placed here
     Elements(
      Points( X( 1 ), X( 2 ), X( 3 ), Y( 1 ), Y( 2 ), Legend( 11 ) ),
      Smoother( X( 1 ), X( 2 ), Y( 3 ), Y( 1 ), Y( 2 ), Legend( 14 ) )
     ),     
     SendToReport(
      Dispatch(
       {},
       "Graph",
       ScaleBox,
       {Label Row( {Show Major Grid( 1 ), Show Minor Grid( 1 )} )}
      )
     )
     
    );

 

Variables(
X(colX[i]),
X(colX1[i], Position( 1 )),
X(colX2[i], Position( 1 )),
Y(colY[i]),
Y(colY1[i], Position( 1 )),
Y(colY2[i], Position( 1 ))
),

 

高級統計建模消費者和市場研究實驗設計質量和工藝工程視窗