列式に基づいて予測式表示を作成するカスタムレポートウィンドウで、列の式に基づいてフォーマットされた予測式を作成したいと思います。 最小二乗法を使用して線形モデルを近似する場合、モデルレポートで、予測式の表示をオンにできます。これにより、方程式の書式設定された "画像"ビューが表示されます。
次に、方程式をデータテーブルに数式を含む列として保存できます。
次に、その列を選択し、列に保存されている数式の予測式をすべて新しいレポートウィンドウに表示します。
JSLでこれを行う方法はありますか？
スクリプティングRe：列式に基づいて予測式の表示を作成する列に渡される<< get数式メッセージを使用して、数式を取得するだけです。
Names Default To Here( 1 );
dt = New Table( "Example",
add rows( 10 ),
New Column( "The Column", formula( Random Integer( 1, 100 ) ) )
);
theFormla = dt:The Column << get formula;
Re：列式に基づいて予測式の表示を作成する予測式の画像を探している場合は、Expr As Picture（）を使用できます。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Drug.jmp" );
obj = dt << Fit Model(
Y( :y ),
Effects( :Drug, :x ),
Personality( Standard Least Squares ),
Emphasis( Minimal Report ),
Run
);
obj << Prediction Formula;
New Window( "Example",
Lineup Box( N Col( 1 ), spacing( 10 ),
Text Box( "Column Formula" ),
Border Box( Left( 10 ), Right( 10 ), bottom( 10 ), top( 10 ), sides( 15 ),
Expr As Picture( dt:pred formula y << get formula )
)
)
);
Re：列式に基づいて予測式の表示を作成しますおかげで、それは私が必要としたものです。 私はそれをする方法があることを知っていました、私はただ思い出せませんでしたPicture（）としてのExprボックス表示オブジェクト。
Re：列式に基づいて予測式の表示を作成します私がこれを投稿してからしばらく経ちましたが、良い答えが得られました。 開発したスクリプトを共有して、データテーブルの列の数式をすばやく表示し、列をインタラクティブに切り替えることができるようにしたいと思いました。
/* this script presents a list of columns in the current data table
in a list box, and upon selecting a column, if the column has a formula,
it will display the formula below the list box as a picture.
If the column does not have a formula, "No Column Formula" is displayed
*/
Names Default To Here( 1 );
_dt = Current Data Table();
expr_ShowFormulaAsPicture = Expr(
_vb1 << Delete;
_vb << Append( _vb1 = V List Box() );
_c = Column( dt, (_clb << Get Selected)[1] );
If( Is Empty( _c << Get Property( "Formula" ) ),
_vb1 << Append( Text Box( "No Column Formula" ) ),
_vb1 << Append( Picture Box( Expr As Picture( _c << get formula ) ) )
);
);
New Window( "Show Column Formula as Picture",
_vb = V List Box(
)
);
_vb << Append(
_pb = Panel Box( "Select Column With Formula To Display as Picture",
_clb = Col List Box(
_dt,
max selected( 1 ),
grouped,
all,
On Change( expr_ShowFormulaAsPicture )
)
)
);
_vb << Append( _vb1 = V List Box() );
ここにウィンドウの例：
