パワーポイントにエクスポートするために、1ページの[別]列からすべての管理図をエクスポートしますこんにちは、
スクリプトのBy部分を使用して、20の個別の地下水モニタリング井戸の6つの管理図を作成するために使用するスクリプトがあります。 スクリプトの最後に追加して、パワーポイントプレゼンテーションの1ページに個別の監視場所ごとに6つの管理図を印刷できるようにします。結果として、各ページに6つのグラフがある20ページのパワーポイントプレゼンテーションが作成されます。 このタスクをどこから始めればよいかについてアドバイスを探していますか？ チャートの作成に使用しているスクリプトは次のとおりです。
Control Chart Builder(
Show Capability( 0 ),
Variables(
Subgroup( :SAMPLE_DATE ),
Y(
:Chloride,
:Cl_TDS,
:Sodium,
:Total Dissolved Solids,
:Sulphate,
:Calcium
),
),
By(:LOC_NAME)
);
ありがとうございました！
グラフィックススクリプティング再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこんにちは、
数か月前にMasteringJMPセッションを記録しました。このセッションでは、レポートを自動的に保存してExcelに保存する方法を示しています（結果を共有するJMPをマスターする、33：30から）。これは開始するのに良い場所かもしれません。ご覧になり、これが正しい方向を示しているかどうかをお知らせください。
再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこんにちは！
お返事ありがとうございます。 ビデオを見たところ、管理図をパワーポイントに配置して自動的に更新するための正しい情報が得られました。 それは間違いなく役に立ちます。 これで、管理図の各セットをjpgとして特定のフォルダーに保存するようにスクリプトに追加しました。あなたが言ったように、それらをパワーポイントに挿入します（リンク付き）。 ただし、パズルの最後のピースは、jpgのグラフを横に3つ、下に2つ配置することです。 現在、彼らは6ダウンをエクスポートしていますが、これはパワーポイントのスライドでは見栄えがよくありません。添付の写真を参照してください。
ご協力いただきありがとうございます！
ccb = dt << Control Chart Builder(
Show Capability( 0 ),
Variables(
Subgroup( :SAMPLE_DATE ),
Y(
:Chloride,
:Cl_TDS,
:Sodium,
:Total Dissolved Solids,
:Sulphate,
:Calcium
),
),
SendToReport(
Dispatch( {}, "Chloride Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Cl_TDS Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Sodium Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {},
"Total Dissolved Solids Limit Summaries",
OutlineBox,
{Close( 1 )}
),
Dispatch( {}, "Sulphate Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Calcium Limit Summaries", OutlineBox, {Close( 1 )} )
),
By(:LOC_NAME)
);
for(c=1, c<=NItems(ccb), c++,
thisrep = Report(ccb[c]);
firstOB = thisrep[OutlineBox(1)];
thistitle = firstOB << getTitle;
firstOB << save picture ("desktop/"||thistitle);
);再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこれは、出力の複数の列を作成するために使用する方法の1つです
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );
Nw = New Window( "Control Charts",
Lineup Box( N Col( 2 ),
Control Chart Builder(
Show Capability( 0 ),
Variables( Y( :height, :weight ) ),
by( :age )
)
)
);
再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこんにちは、
アイデアありがとうございます。 スクリプトを少し変更して、ラインナップボックスを追加しました。 最初は、「by」列に複数の一意の名前を付けてみました。 ただし、一意の名前ごとに6つのグラフを3つの2つの列に分割するのではなく、2番目の列に異なるサンプルを配置していました。 添付写真をご覧ください。
そこで、6つのグラフを2つの列に分割し、6つのグラフの列に1つの一意の値をエクスポートするかどうかを確認するために、1つの一意の値のみを使用して再試行しました。 それでも2列に分かれていませんでした。 私は何が間違っているのですか？
これがスクリプトの一部です。
Nw = New Window( "Control Charts",
Lineup Box( N Col( 3 ),
Control Chart Builder(
Show Capability( 0 ),
Variables(
Subgroup( :SAMPLE_DATE ),
Y(
:Chloride,
:Cl_TDS,
:Sodium,
:Total Dissolved Solids,
:Sulphate,
:Calcium
),
),
SendToReport(
Dispatch( {}, "Chloride Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Cl_TDS Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Sodium Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {},
"Total Dissolved Solids Limit Summaries",
OutlineBox,
{Close( 1 )}
),
Dispatch( {}, "Sulphate Limit Summaries", OutlineBox, {Close( 1 )} ),
Dispatch( {}, "Calcium Limit Summaries", OutlineBox, {Close( 1 )} )
),by(:LOC_NAME);
);
);
);それが役立つ場合は、データセットの例も含めました。
ご協力ありがとうございました。
再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこれはあなたが探しているものですか？
Names Default To Here( 1 );
dt = Current Data Table();
Summarize( dt, bygroup = by( :LOC_Name ) );
Nw = New Window( "Control Charts", lb = Lineup Box( N Col( 2 ) ) );
For( i = 1, i <= N Items( bygroup ), i++,
vlb = V List Box(
dt << Control Chart Builder(
Show Capability( 0 ),
Show control panel( 0 ),
Variables(
Subgroup( :SAMPLE_DATE ),
Y( :Chloride, :Cl_TDS, :Sodium, :Total Dissolved Solids, :Sulphate, :Calcium )
),
show limit summaries( 0 ),
where( :loc_name == Eval( bygroup[i] ) )
)
);
lb << append( vlb );
);再：パワーポイントにエクスポートするために、1ページの[列別]からすべての管理図をエクスポートしますこんにちは、
基本的に移調するものを探しています。 添付の写真を参照してください。 それでは、6つのグラフの各セットを1つのjpgとしてエクスポートし、パワーポイントに挿入します。 LOC_NAME = 00-15Aに6つのグラフがあり、次の6つのグラフのセットがLOC_NAME = 0016Aであることがわかります。
