842828_ja-JP

liliconcom

スクリプターズクラブがスクリプティングインデックス例に追加したい優れた/価値のあるスクリプティング例のコレクション

前回のセッションでは、JMP のスクリプト インデックスに例として追加するのに適した候補となる優れた例を収集するというアイデアが出ました。

コメント セクションに、コミュニティ投稿へのリンクを添えてアイデアを追加してください。または、コメントにコードを例として追加してください。例が関連する関数 (この例をどこで見たいのか) を必ず指定してください。

すべての提案はサポート チームと開発者に提供され、開発者は少なくともいくつかの提案を追加することを検討できるようになります。

アクション:

1. コメント欄にご提案をご記入ください
2. 追加してよかったと思ったものがあれば、ぜひ教えてください

少なくとも、この投稿には貴重な例のリストが掲載されており、それ自体でも非常に役立つはずです。

ありがとう！

Re: スクリプターズクラブがスクリプティングインデックス例に追加したいと考えている優れた/価値のあるスクリプト例のコレクション

新しい列()と<<プロパティの設定()の場合は、リンクを追加してください
JSL コードを動的に記述する
[あるいは、Substitute と Expr へのリンクを追加することもできます。
問題: 答えを知っているユーザーだけが答えを見つける]

Names Default to Here(1);

// Open a sample data table
dt = Open("$SAMPLE_DATA/Cleansing.jmp");

// Values previously obtained from a lookup table and assigned to variables as:
myLSL = 6;
myUSL = 8;
myTarget = 7;

// Use the variables to set the spec limits column property
Eval(Eval Expr(
    Column(dt, "pH") << Set Property(
        "Spec Limits",
        {LSL( Expr(myLSL) ), USL( Expr(myUSL) ), Target( Expr(myTarget) ), Show Limits( 1 )}
    );
));

Re: スクリプターズクラブがスクリプティングインデックス例に追加したいと考えている優れた/価値のあるスクリプト例のコレクション

私はいつも Eval()、Eval Expr()、Expr() がどのように連携して動作するかを忘れてしまうので、 このページをブックマークし、リンクされたページからこの JSL の一部を具体的に使用します。

//Eval Expr
For( i = 1, i <= N Items(cols), i++,
       Eval( Eval Expr(
              dt << New Column( 
                    "2 * " || Char( cols[i] ),
                    Numeric,
                    "Continuous",
                    Formula( As Column( Expr( Char( cols[i] ) ) ) * 2)
              )
       ) )
);

Re: スクリプターズクラブがスクリプティングインデックス例に追加したいと考えている優れた/価値のあるスクリプト例のコレクション

For Get Environment Variable():

uname = Get Environment Variable( "USERNAME" );

出典: https://community.jmp.com/t5/Discussions/computer-name/mp/753036/highlight/true#M93482

Re: スクリプターズクラブがスクリプティングインデックス例に追加したいと考えている優れた/価値のあるスクリプト例のコレクション

のためにループの説明に、データ テーブルのインデックスへのリンクを追加します。例:
https://community.jmp.com/t5/Uncharted/Data-table-subscripting/ba-p/21013

Re: スクリプターズクラブがスクリプティングインデックス例に追加したいと考えている優れた/価値のあるスクリプト例のコレクション

Eval()、Substitute()、Expr() にも同じトリックがあり、特に列に関しては一連の例があります。

dt = Open("$SAMPLE_DATA/Tablet Production.jmp");
ColList = dt << Get Column Names( Continuous );

// New column
For( i = 1, i <= N Items( colList ), i++,
	Eval(Substitute(								
		Expr(										
			newCol = dt << New Column( 
				col_Name,							
				Numeric,
				"Continuous", 
				Format( "Percent", 12, 2 ),
				Formula(As Column(col1) / Col_Mean	)); 	),
		Expr(col_Name), "Ratio " || Char(colList[i]) || " vs. Col Mean",					
		Expr(col1),Column(dt,ColList[i]),
		Expr(Col_Mean), Col mean(Column(dt,ColList[i])) 
)));