再:利用可能なY変数に基づいて変動チャートを生成し、PNG画像に保存するにはコードを修正しました。 私はあなたのコードをテストしませんでしたが、うまくいくと信じています。 私はそれをテストしませんでした。
dt = Open( "D:\My Drive\Program.jmp" );
// Find the Y Columns
numericColNamesList = dt << get column names( string, numeric );
For( i = N Items( numericColNamesList ), i >= 1, i--,
If( Not( Is Missing( Num( Word( 1, numericColNamesList[i], ":" ) ) ) == 0 & Word( 2, numericColNamesList[i], ":" ) != "" ),
numericColNamesList = Remove( numericColNamesList, i, 1 )
)
);
// With varying Y columns and fixed X columns
For( i = 2, i <= N Items( numericColNamesList ), i++,
obj = dt << Variability Chart(
Y( ::Column( numericColNamesList[i] ) ),
X( :code, :lot, :Label, :wafer ),
Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
Connect Cell Means( 1 ),
Std Dev Chart( 0 ),
Automatic Recalc( 1 ),
SendToReport(
Dispatch(
{"Variability Chart for numericColNamesList[i]"},
"Variability Chart",
FrameBox,
{Marker Size( 6 ), Row Legend(
Label,
Color( 1 ),
Color Theme( "JMP Default" ),
Marker( 0 ),
Marker Theme( "" ),
Continuous Scale( 0 ),
Reverse Scale( 0 ),
Excluded Rows( 0 )
)}
)
)
);
fName = Report( obj )[Outline Box( 1 )] << Get Title;
Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG", append );
);
再:利用可能なY変数に基づいて変動チャートを生成し、PNG画像に保存するにはジムに感謝します。
コードを試しましたが、今ではVarチャートの複数のウィンドウが表示されていますが、指定されたドライブにPNGとして保存されたものはありません。 「画像を保存」セグメントの近くで何かを見落としているのではないかと思います。
再:利用可能なY変数に基づいて変動チャートを生成し、PNG画像に保存するにはこんにちは、
その原因を見つけました。これで、スクリプトを実行できます。
ただし、名前に「/」が含まれる変数(例:A_B / Tox / Cap)の場合、スクリプトはエラーをプロンプトし、続行できません。
Report(obj)<< Save Picture( "$ TEMP / myPics /" || colList [i] || ".png"、PNG);
colList [i]によるものですか?
利用可能なY変数に基づいて変動グラフを生成し、PNG画像に保存するにはこんにちは、
私は利用可能な列名に基づいていくつかの変動グラフを自動生成し、それらを保存するのに役立ついくつかのコードをスクリプト化しようとしています個人 PNG画像を使用すると、画像をPowerPointにリンクできます。
しかし、デバッグ中に「obj」が常に未定義であった理由はわかりません。
これに関するアドバイスを求めたいです。感謝します。
-アン
dt = Open( "D:\My Drive\Program.jmp" );
// Find the Y Columns
numericColNamesList = dt << get column names( string, numeric );
For( i = N Items( numericColNamesList ), i >= 1, i--,
If(
Not(
Is Missing( Num( Word( 1, numericColNamesList[i], ":" ) ) ) == 0 &
Word( 2, numericColNamesList[i], ":" ) != ""
),
numericColNamesList = Remove( numericColNamesList, i, 1 )
)
);
// With varying Y columns and fixed X columns
For( i = 2, i <= N Items( numericColNamesList ), i++,
obj = dt << Variability Chart(
Y( ::Column( numericColNamesList[i] ) ),
X( :code, :lot, :Label, :wafer ),
Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
Connect Cell Means( 1 ),
Std Dev Chart( 0 ),
Automatic Recalc( 1 ),
SendToReport(
Dispatch(
{"Variability Chart for numericColNamesList[i]"},
"Variability Chart",
FrameBox,
{Marker Size( 6 ), Row Legend(
Label,
Color( 1 ),
Color Theme( "JMP Default" ),
Marker( 0 ),
Marker Theme( "" ),
Continuous Scale( 0 ),
Reverse Scale( 0 ),
Excluded Rows( 0 )
)}
)
)
)
);
obj = List( obj[i] );
For( i = 1, i <= N Items( obj ), i++,
fName = Report( obj )[Outline Box( 1 )] << Get Title;
Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG" );
Report( obj )[Outline Box( 1 )] << Save Picture( "$TEMP/myPics/" || fName || ".png", "PNG", append );
);
スクリプティング