複数のグラフのフレームサイズを設定する現在のスクリプトでは、さまざまな製品ごとに複数のグラフが表示されます。 それが私が探しているものです。
次に、これらすべてのグラフのフレームサイズを同じにします。 ディスパッチを使用するときは具体的にする必要があり、すべてのアウトライン名を記述する必要があることがわかりました。
それに関する問題は、私がそれを実行するたびに異なる製品があり、私は毎回入って名前を変更する必要がないことを望んでいるということです。
これを自動化する方法はありますか?
Data Table( "Data for Comparison" ) << Variability Chart(
Y( Column( "Mean(Bin_VALUE)" ) ),
X( :Bin_Size, :Status_Type2 ),
By( :Product ),
Show Box Plots( 1 ),
Std Dev Chart( 0 ),
SendToReport(
Dispatch(
{"Variability Gauge Product= Product 1", "Variability Chart for Mean(Bin_VALUE)"},
"Variability Chart",
FrameBox,
{Frame Size( 800, 240 )}
),
)
);Re:複数のチャートのフレームサイズを設定する私の解決策は基本的にジムの答えと同じです。 プロットプラットフォームへの参照を保存し、それを添え字付きで使用してメッセージを送信しました。 Jimは、メッセージを送信する前にXPathを使用して参照を返しました。 私のアプローチを使用する場合は、リストで各プラットフォームを開いたときに参照を保存してから、メッセージをリストに送信する必要があります。 例えば:
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
platform = List();
p = dt << Bivariate(
Y( :weight ),
X( :height ),
);
Insert Into( platform, Report( p )[FrameBox(1)] );
p = dt << Oneway(
Y( :weight ),
X( :age ),
);
Insert Into( platform, Report( p )[FrameBox(1)] );
platform << Frame Size( 800, 240 );
ジムのソリューションはよりエレガントです。
表示ボックスの選択については上記で言及されていないため、青色で強調表示されます。 その結果は<<で達成されます選択するメッセージ。
Re:複数のチャートのフレームサイズを設定するマーク、
私はこれを試しましたが、どのチャートもサイズを変更しませんでした。 それは動かなかった。
私はJMPsciptingに非常に慣れていないので、この観察が役に立たなかった場合は申し訳ありませんが、スクリプトを貼り付けたときに気付いたのは、プラットフォームが青くならなかったことです。
私が見逃しているものが他にあるかどうかはわかりません。
Re:複数のチャートのフレームサイズを設定するジム、
これはうまくいきました。
タイトルを設定するために、以下のシナリオで同じ概念を使用できますか? それらのそれぞれを入力する必要はありません。
だからこれから行く
Template_TM = Expr(
TM = Oneway(
Y( Eval( TargetParameter )),
X( :Process ),
Each Pair( 1 ),
Means and Std Dev( 1 ),
t Test( 1 ),
Points Jittered( 1 ),
Box Plots( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 ),
Comparison Circles( 1 ),
X Axis Proportional( 0),
Histograms( 0),
//Where( :PARAMETER_ID == Eval( TargetParameter )),
SendToReport(
Dispatch( {}, "Oneway Analysis of 0.12 By Process", OutlineBox(1), {Set Title( TargetProduct ||"_Oneway Analysis at_" || TargetParameter )} ),
Dispatch( {}, "Oneway Analysis of 0.16 By Process", OutlineBox(1), {Set Title( TargetProduct ||"_Oneway Analysis at_" || TargetParameter )} ),
Dispatch( {}, "Oneway Analysis of 0.2 By Process", OutlineBox(1), {Set Title( TargetProduct ||"_Oneway Analysis at_" || TargetParameter )} ),
Dispatch( {}, "Oneway Analysis of 0.3 By Process", OutlineBox(1), {Set Title( TargetProduct ||"_Oneway Analysis at_" || TargetParameter )} ),
Dispatch( {}, "1", ScaleBox, {Min( 0 ), Minor Ticks( 1 ), Add Ref Line(Eval(Limit_UCL), "Dotted", "Dark Blue", "UCL", 1)}),
Dispatch( {}, "Oneway Plot", FrameBox, ),
Dispatch( {}, "Means Comparisons", OutlineBox, {Close( 1 )} )
)
);
);これに?
Template_TM = Expr(
TM = Oneway(
Y( Eval( TargetParameter )),
X( :Process ),
Each Pair( 1 ),
Means and Std Dev( 1 ),
t Test( 1 ),
Points Jittered( 1 ),
Box Plots( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 ),
Comparison Circles( 1 ),
X Axis Proportional( 0),
Histograms( 0),
//Where( :PARAMETER_ID == Eval( TargetParameter )),
SendToReport(
Dispatch( {}, "1", ScaleBox, {Min( 0 ), Minor Ticks( 1 ), Add Ref Line(Eval(Limit_UCL), "Dotted", "Dark Blue", "UCL", 1)}),
Dispatch( {}, "Oneway Plot", FrameBox, ),
Dispatch( {}, "Means Comparisons", OutlineBox, {Close( 1 )} )
)
);
);
(TM<<XPATH></XPATH>Re:複数のチャートのフレームサイズを設定する事実は、私たちは使用することを意図していませんレポートに送信指令。 この方法は、スクリプトを保存するときにJMPがレポートレイヤーのカスタマイズをキャプチャできるようにすることのみを目的としています。 推奨される方法を試してください。
platform = Data Table( "Data for Comparison" ) << Variability Chart(
Y( Column( "Mean(Bin_VALUE)" ) ),
X( :Bin_Size, :Status_Type2 ),
By( :Product ),
Show Box Plots( 1 ),
Std Dev Chart( 0 )
);
Report( platform )[FrameBox(1)] << Frame Size( 800, 240 );
簡単ですね
Re:複数のチャートのフレームサイズを設定するXPathを使用してすべてのFrameBox()オブジェクトを取得し、フレームサイズをそれらすべてに設定できます。
vc = Data Table( "Data for Comparison" ) << Variability Chart(
Y( Column( "Mean(Bin_VALUE)" ) ),
X( :Bin_Size, :Status_Type2 ),
By( :Product ),
Show Box Plots( 1 ),
Std Dev Chart( 0 ),
);
(Report(vc) << xpath("//FrameBox")) << Frame Size( 800, 240 );Re: 複数のチャートのフレーム サイズを設定するこんにちは、txnelsonさん。
この解決策をありがとうございます。これを使用すれば、すべてのプロットに同じ DispatchSeg() コマンドを適用できますか? 現在、私のスクリプトには、12 個以上のプロットすべてに対して次のコードが含まれています。
Dispatch(
{"Variability Gauge Analysis for Plot1",
"Variability Chart for Plot1"},
"Variability Chart",
FrameBox,
{Frame Size( 400, 200 ),
DispatchSeg( Box Plot Seg( 1 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 2 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 3 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 4 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 5 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 6 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 7 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 8 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 9 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 10 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 11 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 12 ), Line Color( "Black" ) )
}
)これを試してみましたが、うまくいきませんでした:
fb = {Frame Size( 400, 200 ),
DispatchSeg( Box Plot Seg( 1 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 2 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 3 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 4 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 5 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 6 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 7 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 8 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 9 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 10 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 11 ), Line Color( "Black" ) ),
DispatchSeg( Box Plot Seg( 12 ), Line Color( "Black" ) )
};
(Report(vc) << xpath("//FrameBox")) << fb;前もって感謝します!
Re: 複数のチャートのフレーム サイズを設定するから:
https://community.jmp.com/t5/Discussions/Change-the-default-color-of-box-plot-lines/mp/762414/highlight/true#M94163
Names Default to Here(1);
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
myPlot = Variability Chart(
Y( :height ),
X( :age ),
Variability Analysis( :height, Show Box Plots( 1 ) )
);
mySegs=report(myPlot)[FrameBox(1)]<< find segs; // get all display elements
Filter Each({seg},(mySegs), (seg<< class name)=="BoxPlotSeg") //just keep the Box Plots
<< Set Line Color("Black")