@ほぎ- 提案ありがとう！ ご要望を承りましたので、検討させていただきます。
私はこれについてしばらく考えていましたが、短い休暇中に、これを行うためのスクリプト化されたアプローチに取り組むことにしました。
ただし、これをより簡単にするために、これを検討しています。
これが私のスクリプトです：
/***************************************************
SCRIPT NAME: Row Selector Viewer
AUTHOR(s):
Sam Gardner, JMP Statistical Discovery LLC
JMP VERSION:
Built with JMP 17.0 and tested with JMP 16.2
PURPOSE:
To allow the user to be able to easily subset and see rows that are selected or excluded or hidden, OR unselected or unexcluded or unhidden
SPECIFICATION:
Views of the desired subset of the current data table are created using linked subsets and data box views within a report window. Upon selecting an option, an invisible linked
subset of the desired rows to view is created, and then a new data view in a data box is displayed in the scripted report window.
USAGE:
Must be run with a data table open.
Upon running, choose the subset of the rows to view by selecting the check boxes. Note that this current version
only allows subsetting based in Selected/Excluded/Hidden or Unselected/Unexcluded/Unhidden
ASSUMPTIONS: None.
SCRIPT REVISION HISTORY:
VERSION DATE DESCRIPTION
1.0 2022 Dec 14 First Version
NOTES:
N/A
TO DO:
N/A
FUTURE IMPROVEMENT IDEAS:
None at this time.
***************************************************/
Names Default To Here( 1 );
dt = Current Data Table();
// function definitions
/*
// Loc Inverse Function
// This function converts a vector of positive integers (locvals) into an
// indicator vector of a specified length, n, with the values
// v[I] = 1 if I is in locvals, and 0 otherwise
// example
// Loc Inverse(6, [1,3])
// returns
// [1, 0, 1, 0, 0, 0]
*/
Loc Inverse = Function( {n, locvals},
v = J( n, 1, 0 );
v[locvals] = 1;
v;
);
Loc Inverse( 6, [1, 3] );
/*
// this gets the indicators of selected rows in the data table
LocInverse( N Rows( dt ), dt << Get Selected Rows );
// this gets the indicators of the excluded rows in the data table
Loc Inverse( N Rows( dt ), dt << GetExcludedRows );
// this gets the indicators of the hidden rows in the data table
Loc Inverse( N Rows( dt ), dt << GetHiddenRows );
*/
nw = New Window( "Row Selector Viewer",
<<ON close=""> 0,
For( i = 1, i <= N Items( viewchoice ), i++,
RowstoView = RowstoView | Match( viewchoice[i],
"Selected",
cbright << Set All( 0, run script( 0 ) );
Loc Inverse( N Rows( dt ), dt << Get Selected Rows );,
"Excluded",
cbright << Set All( 0, run script( 0 ) );
Loc Inverse( N Rows( dt ), dt << Get Excluded Rows );,
"Hidden",
cbright << Set All( 0, run script( 0 ) );
Loc Inverse( N Rows( dt ), dt << Get Hidden Rows );
)
);
RowstoView = Loc( RowstoView );
Print( RowstoView );
,
RowstoView = 1 :: N Rows( dt );
Print( RowstoView );
);
If( !Is Empty( dt_sub ),
Close( dt_sub, nosave );
Clear Symbols( dt_sub );
);
selectedrows = dt << get selected rows;
dt << clear select;
dt << select rows( RowstoView );
dt_sub = dt << Subset( Output Table( "Data View" ), Selected Rows( 1 ), Selected Columns Only( 0 ), Linked, Private );
dt << clear select;
dt << select rows( selectedrows );
pbright << Append( dt_sub << new data box() );
),
cbright = Check Box(
{"Unselected", "Unexcluded", "Unhidden"},
viewchoice = cbright << get selected;
RowstoView = J( N Rows( dt ), 1, 1 );
If( N Items( viewchoice ) > 0,
For( i = 1, i <= N Items( viewchoice ), i++,
RowstoView = RowstoView & Match( viewchoice[i],
"Unselected",
cbleft << Set All( 0, run script( 0 ) );
!(Loc Inverse( N Rows( dt ), dt << Get Selected Rows ));,
"Unexcluded",
cbleft << Set All( 0, run script( 0 ) );
!(Loc Inverse( N Rows( dt ), dt << Get Excluded Rows ));,
"Unhidden",
cbleft << Set All( 0, run script( 0 ) );
!(Loc Inverse( N Rows( dt ), dt << Get Hidden Rows ));
)
);
RowstoView = Loc( RowstoView );
Print( RowstoView );
,
RowstoView = 1 :: N Rows( dt );
Print( RowstoView );
);
If( !Is Empty( dt_sub ),
Close( dt_sub, nosave );
Clear Symbols( dt_sub );
);
selectedrows = dt << get selected rows;
dt << clear select;
dt << select rows( RowstoView );
dt_sub = dt << Subset( Output Table( "Data View" ), Selected Rows( 1 ), Selected Columns Only( 0 ), Linked, Private );
dt << clear select;
dt << select rows( selectedrows );
pbright << Append( dt_sub << new data box() );
)
)
),
Button Box( "Close Viewer", nw << close window )
),
pbright = Panel Box( "Data View", )
)
);
dt_sub = dt << Subset( All Rows, Selected Columns Only, Linked, Private );
pbright << Append( dt_sub << new data box() );
</ON>
送信トレイでこれを見つけました - 他の場所に投稿したかどうかわかりませんか?
同じコンテキストで - ユーザーが送信できるようにしてください
dt << Get nonExcluded Rows();
データ テーブルに:
https://community.jmp.com/t5/Discussions/col-lt-lt-get-values-for-non-excluded-rows/mp/556579/highlight/true#M77051
この重要なコードの単一行コマンドを高速化すると、最大 10 倍遅くなります。
allRows = dt << get rows where( Excluded() == 0 );
そして、最初に除外されていない行を要求し、次にリストを「反転」すると、時間予算に約 30% が追加されます
@サムガードナー.
コードをありがとう - 本当に素敵なメニュー。
間違いなくJmp 18のサブセットメニューに行くべきです:)
私たちは尋ねることができます@ジュリアン彼がそれを動的サブセットアドインにも追加したい場合:)
ここでの私の投稿に関して、実際にはもっと細かいことを考えました - データテーブルの左下のメニューに非除外行のオプションを追加するだけです。
正直なところ、私はすでに除外された行を選択してから選択を反転することに慣れています。そのような機能が来るのは遅すぎると思います。
しかし、私の投稿の多くと同様に、願いは主に私自身のためではなく、同僚やコミュニティの他のすべてのユーザーのためです:)
うーん、どうですか：
- 概要表に「非除外」を追加しないでください
-しかし追加非除外を選択の右クリック コンテキスト メニューに除外
を使用しているユーザーはいますか隠れた機能？
次に、同様のオプションを追加します非表示でないものを選択行
QuickSelect ツールバーの導入により、作業が少し簡単になりました。
クリック数が減少
- 除外行を選択（2 クリック）
- 選択を反転 (行 - 行選択 - 行選択を反転 = 3 クリック)
- 選択した行のデータビュー（2 クリック）
➜ 7クリック
に
- 除外行を選択（2 クリック）
- 反転（1クリック）
- 新しいクイック選択ツールバーで選択した行のデータビュー（2クリック） : 1クリック
➜ 5 4クリック
見通し：
左下のメニューに除外なしを追加すると、 2回のクリックになります:)
☐ クールな新機能
☑ 多くのユーザーを助けることができます!
☐ 「バグ」を削除します。
☐ あったら嬉しい
☐ 誰も必要としていない
テーブルの左下にある行概要テーブルは、選択した行や除外された行などの DataView (サブセット) を取得するのに非常に便利です。
データビュー
残念ながら、私の日常業務では、除外された行のサブセットよりも、除外されていない行のサブセットが必要になることがはるかに多くなります。
それで、私は行きます：
1) 
2) 
3)
私の願い:除外されていない行の追加エントリ、
このような
これにより、除外されていない行の DataView を生成する機会が得られます。
追加の利点:
実際に使用されている (= 除外されていない) 行の数を直接確認でき、計算する必要はありません (すべての行 - 除外)
より多くの希望が提出されました
@サラ・シルヴェストル
これらすべてのオプションが利用可能であるため、私の観点からすると、このトピックは終了できます。
ウィッシュリストには他にももっと重要な項目があります。
