369867_zh-TW

liliconcom

計數規格內的行的功能

我想創建一個讀取列的函數，檢查每行中的數字是否在規格範圍內，並輸出通過計數/總計數/百分比。

 

這就是我所擁有的：

count_in_spec = Function( { col, lsl, usl },
 a=0; //pass count
 b=0; //all count
 for( i = 1, i <= N Rows(col), i++,
  if( col[i] >= lsl & col[i] <= usl, a++ );
  if( not(ismissing(col[i])), b++ );
 );
 pctpass = 100*a/b;
 pctfail = 100 - pctpass;
 
 evallist({a, b, pctpass, pctfail});
);


dt0 = current data table();
colp = dt0:name("param") << get as matrix;

results = count_in_spec(colp, 0.15, 0.30 );
 countpass = results[1];
 countall = results[2];
 pctpass = results[3];
 pctfail = results[4];

雖然這樣做有效，但我不喜歡需要使用“作為矩陣獲取”這一事實。 這有點笨拙。

 

我想要一個可以通過簡單地工作的函數：

結果= count_in_spec（“參數名稱”，lsl，usl）;

 

我將如何修改我的功能，使其能夠以這種方式工作？

腳本編寫回复：對規格內的行進行計數的功能

使用Get Rows Where（）函數應該可以得到想要的結果

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/semiconductor capability.jmp" );

count_in_spec = Function( {col, lsl, usl},
 result = N Rows( dt << get rows where( lsl <= As Column( dt, col ) <= usl ) )
);

colNames = dt << get column names(string, continuous);

resultColList = {};
resultCountList = {};

For(i=1,i<= 10 /*Nitems(colNames)*/,i++,
 specs = column(dt,colNames[i]) << get property("spec limits");
 If(isMissing(try(specs["LSL"],.))==0 & isMissing(try(specs["USL"],.))==0,
  result = count_in_spec(colNames[i],specs["LSL"],specs["USL"]);
  insert into(resultColList,colNames[i]);
  insert into(resultCountList,result)
 )
);

new window("Results",
 outline box("In Spec Report",
  Table Box(
   string col box("Column", resultColList),
   number col box("Count", resultCountList)
  )
 )
);

回复：對規格內的行進行計數的功能

Col Stat（）函數通常對於直接匯總表數據（包括條件）非常有效。 這是一個無需矩陣步驟的示例。

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

count_in_spec = Function( {col, lsl, usl},
 {default local},
 a = Col Sum( lsl < As Column( col ) < usl );
 b = Col Number( col );
 pctpass = 100 * a / b;
 pctfail = 100 - pctpass;
 Eval List( {a, b, pctpass, pctfail} );
);

results = count_in_spec( Column( dt, "height" ), 55, 70 );
countpass = results[1];
countall = results[2];
pctpass = results[3];
pctfail = results[4];

 

回复：對規格內的行進行計數的功能

編輯：我不再推薦此解決方案-使用MS：它顯示了一種使用列公式執行此操作的方法；它不僅運行速度更快，而且列公式還具有支持分組變量的優點。

-布雷迪

 

你好，

 

您可以為此使用內置的矩陣函數。 我在函數內使用<< get作為矩陣，但是我不確定在不使腳本更加繁瑣的情況下如何避免這種情況。

 

乾杯，

布雷迪

 

Names Default To Here(1);

dt = astable(J(1000, 1, randomnormal(0,3)), <<COLUMN names=""></COLUMN>

 

回复：對規格內的行進行計數的功能

謝謝大家。 我已經探討了所有三類方法。 然後，我意識到我可以通過使用以下方法使自己更輕鬆一些：

 

dt0 = current data table();
 dt0 << clear row states;

count_in_spec = Function( { col, lsl, usl },
 a=0; //pass count
 b=0; //all count
 
 cola = dt0:col << get as matrix;
 for( i = 1, i <= N Rows( cola ), i++,
   if( cola[i] >= lsl & cola[i] <= usl, a++ );
   if( not(ismissing( cola[i] )), b++ );
 );

 pctpass = 100*a/b;
 pctfail = 100 - pctpass;
 
 evallist({a, b, pctpass, pctfail});
);



colp = "param1";

results = count_in_spec(colp, 0.15, 0.30 );
 countpass = results[1];
 countall = results[2];
 pctpass = results[3];
 pctfail = results[4];

show(countpass);
show(countall);
show(pctpass);
show(pctfail);


colp = "param2";

results = count_in_spec(colp, 0.15, 0.30);
 countpass = results[1];
 countall = results[2];
 pctpass = results[3];
 pctfail = results[4];

show(countpass);
show(countall);
show(pctpass);
show(pctfail);

從列中提取LSL和USL屬性的語法將很有用。