再：フィットグループの自動化更新：出力部分を修正しました-1-23から出力するようになりました。私の問題は、スライドごとに2つまたは3つのプロットに配置されたpptに追加する方法ですか？
再：フィットグループの自動化パラメータ9.のエラーについて...ログに表示されるエラーは何ですか？
以下は、すべての出力を2列に表示するコードの変更です。 また、出力をPowerPointに保存するコードも含まれています。
Current Data Table( subs );
nw = New Window( "Oneways",
Lineup Box( N Col( 2 ),
For( i = 1, i <= N Items( parameters_1 ), i++,
Print( i );
Oneway(
X( :Recipe ),
Y( Column( subs, parameters_1[i] ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 ),
SendToReport(
Dispatch(
{},
"Fit Group",
OutlineBox,
{Set Title( "TYPE=" || Char( type ) || "" )}
)
)
);,
)
)
);
nw << save presentation("$TEMP\reportppnw.pptx");
ただし、ページごとに2つのグラフは表示されません。 慣例により、JMPは各グラフを個別のスライドに配置します。 これを処理するために、通常、出力のペアが画像としてコピーされたジャーナルを作成し、最後にジャーナルをpptxに保存します。 そのためには、次のようなものが動作する可能性があります。
Names Default To Here( 1 );
Current Data Table( subs );
For( i = 1, i <= N Items( parameters_1 ), i = i + 2,
hlb = H List Box(
Oneway(
X( :Recipe ),
Y( Column( subs, parameters_1[i] ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 ),
SendToReport(
Dispatch(
{},
"Fit Group",
OutlineBox,
{Set Title( "TYPE=" || Char( type ) || "" )}
)
)
),
Try(
Oneway(
X( :Recipe ),
Y( Column( subs, parameters_1[i + 1] ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 ),
SendToReport(
Dispatch(
{},
"Fit Group",
OutlineBox,
{Set Title( "TYPE=" || Char( type ) || "" )}
)
)
)
);
zippy = hlb << get picture;
zippy << save presentation( "$TEMP\report.pptx", append );
)
);
ところで.....私は完全にコードをテストしませんでした。 したがって、わずかな問題がある場合もありますが、概念は正しいです。
フィットグループの自動化私はこのコードで作業していますが、どういうわけか9番目の出力で、エラーが発生します。Parameters_1には23個のアイテムが含まれています。
current data table(subs);
for (i = 1, i <= nitems(parameters_1), i++,
print(i);
Oneway(
X( :Recipe ),
Y( column(subs, parameters_1[i]) ),
With Control(1),
Quantiles(1),
Means and Std Dev(1),
CDF Plot(1),
Mean Error Bars(1),
Std Dev Lines(1),
SendToReport( Dispatch( {}, "Fit Group", OutlineBox, {Set Title( "TYPE="||char(type)||"" )} ) )
);
);
1〜8の出力は個別に表示されます。出力が2で配列されるようにコーディングし、pptに保存するにはどうすればよいですか。
再：フィットグループの自動化これをありがとう！再：フィットグループの自動化
Fit Group(
For( i = 1, i <= N Items( parameters_1 ), i = i + 2,
hlb = H List Box(
Oneway(
X( :Recipe ),
Y( Try( Column( subs, parameters_1[i] ) ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 )
),
Try(
Oneway(
X( :Recipe ),
Y( Column( subs, parameters_1[i + 1] ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 )
)
);
zippy = hlb << get picture;
)
)
);
あなたが与えたコードを試しましたが、どういうわけかこれは私にエラーを与えます：
'Oneway'のアクセスまたは評価で見つからない、不正な引数（
{Try（Column（subs_top、parameters_1 [i]））、ロールには少なくとも1列が必要です。}
）、Oneway（/ * ### * / X（：Recipe）、
Y（Try（Column（subs_top、parameters_1 [i]））））
Control（1）を使用すると、
分位数（1）、
手段と標準偏差（1）、
CDFプロット（1）、
平均誤差範囲（1）、
標準開発ライン（1）
）
フィットグループ[]
再：フィットグループの自動化しかし、私が以前に思いついたコードを試してみると、
Current Data Table( subs );
t0p = Fit Group(
For( i = 1, i <= N Items( parameters_1 ), i++,
Oneway(
X( Column( subs, "Recipe" ) ),
Y( Try( Column( subs, parameters_1[i] ) ) ),
With Control( 1 ),
Quantiles( 1 ),
Means and Std Dev( 1 ),
CDF Plot( 1 ),
Mean Error Bars( 1 ),
Std Dev Lines( 1 )
)
),
SendToReport( Dispatch( {}, "Fit Group", OutlineBox, {Set Title( "TYPE=" || Char( type ) || "" )} ) )
) << {Arrange in Rows( 2 )};
動作しますが、個別に動作します。
