ユーザーからの入力を求めるテキスト ボックスを表示します。やあ、
外れ値を調査するために、Q と Tail quantile の値を入力するようにユーザーに求めるテキスト編集ボックスを追加したいと考えています。 これが私が試したものですが、何かが足りないようです。 これに役立つかもしれないアドバイスをいただけますか?
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Water Treatment.jmp");
check_list = {"SS", "SE", "PH"};
todo_list = {};
nw = new window("Checkboxes", << modal(),
"Input",
V List Box( Text Box( "Enter Tail Quantile " ), tail = Text Edit Box() ,
Text Box( "Enter Q Value " ), quan = Text Edit Box() ),
my_cb = checkbox(check_list),
panelbox("Actions",
hlistbox(
button box("OK",
ta = tail << get text();
qu = quan << get text();
keep_going = 1;
todo_list = my_cb << get selected;
),
button box("Cancel", keep_going = 0)
),
),
);
For(i = 1, i <= N Items(colList), i++,
If(Contains(colList[i], "SS"), Insert Into(filteredCols, colList[i]))
);
obj = dt <<
Explore Outliers(
Y((Eval(filteredCols) )));
obj << Quantile Range Outliers;
obj << Tail Quantile (ta);
obj << Q(qu);
obj << Select Rows(All);
データのブレンディングとクリーンアップRe: ユーザーからの入力を求めるテキスト ボックスを表示する分析をリバースエンジニアリングしてみます。必要なパラメータ/列を使用して分析を手動で実行します。次に、小さな赤い矢印をクリックして、スクリプトをクリップボードまたはスクリプト ウィンドウに保存するオプションを選択します。既存のスクリプトの代わりにそのスクリプトを使用し、新しいウィンドウの変数を置き換えます。
Re: ユーザーからの入力を求めるテキスト ボックスを表示する@pmroz何かアドバイス？
Re: ユーザーからの入力を求めるテキスト ボックスを表示するありがとう@pmroz 、
スクリプトは正常に動作しますが、問題は、外れ値を評価するために入力値ではなくデフォルト値が使用されることです。 以下のスクリーンショットを参照してください
次の分析は、末尾分位数 0.1 および Q 3 に基づいています。 0.4を入力しました。そして3の編集ボックス。 やり直し分析を使用するのは面倒ですが、ウィンドウ内のすべての行が選択されません。 何かアドバイス？
Re: ユーザーからの入力を求めるテキスト ボックスを表示するいくつかの変更 - 元のコードではいくつかのものが初期化されていませんでした。見た目を良くするためにnumber edit box()とlineup box()を使用しました。数値編集ボックスでは数値のみを入力できます。
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Water Treatment.jmp");
check_list = {"SS", "SE", "PH"};
todo_list = {};
nw = new window("Checkboxes", << modal(),
text box("Input"),
Lineup Box( N Col( 2 ),
Text Box( "Enter Tail Quantile: " ), tail = number Edit Box() ,
Text Box( "Enter Q Value: " ), quan = number Edit Box()
),
my_cb = checkbox(check_list),
panelbox("Actions",
hlistbox(
button box("OK",
ta = tail << get();
qu = quan << get();
keep_going = 1;
todo_list = my_cb << get selected;
),
button box("Cancel", keep_going = 0)
),
),
);
collist = dt << get column names(string);
filteredcols = {};
For(i = 1, i <= N Items(colList), i++,
If(Contains(colList[i], "SS"), Insert Into(filteredCols, colList[i]))
);
obj = dt << Explore Outliers( Y((Eval(filteredCols) )));
obj << Quantile Range Outliers;
obj << Tail Quantile (ta);
obj << Q(qu);
obj << Select Rows(All);Re: ユーザーからの入力を求めるテキスト ボックスを表示するTail Quantile エントリと Q エントリは両方とも、文字列/テキストではなく数値である必要があります。Num()関数を使用して変換します。
