807188_ja-JP

liliconcom

任意のグラフに日付とファイル名を追加する

生成されたグラフやレポートに現在の日付とファイル名 (ソース データ テーブルの) を追加するアドインまたはスクリプトを作成したことがある人はいますか?

設定をオンにしました

ありがとう

結果の共有と伝達Re: 任意のグラフに日付とファイル名を追加する

あらゆるグラフ/レポートで機能するスクリプトを作成するのは、実際にはそれほど簡単ではありません。

基本的な考え方は次のようなものになりますが、これはテーブルと分析オブジェクトへの参照があることを前提としています。また、すべてのフレームボックスが同じテーブルに基づいていることも前提としています。

Names Default To Here(1); 

dt = open("$SAMPLE_DATA/Big Class.jmp");

gb = dt << Graph Builder(
	Variables(X(:weight), Y(:height), Overlay(:sex)),
	Elements(Points(X, Y, Legend(9)), Line Of Fit(X, Y, Legend(11)))
);


str = Char(As Date(Today())) || " " || (dt << getname);

fbs = Report(gb) << XPath("//FrameBox");
Eval(EvalExpr(
	fbs << Add Graphics Script(
		Text Color("Red");
		Text(Right Justified, {X Origin() + X Range(), Y Origin()}, Expr(str));
	);
));

しかし、たとえばどのテーブルが正しいのかを判断するのはかなり複雑になる可能性があります。

Re: 任意のグラフに日付とファイル名を追加する

データ テーブルとプロットへの参照がなくても、report / get scriptable object()を介して gb オブジェクトにアクセスでき、 << get data table()を介してデータ テーブルにアクセスできます。
LDF と列スイッチャーをスキップするコードを追加する必要があるかもしれません...

Names Default To Here(1); 
/*
open("$SAMPLE_DATA/Big Class.jmp");

Graph Builder(
	Variables(X(:weight), Y(:height), Overlay(:sex)),
	Elements(Points(X, Y, Legend(9)), Line Of Fit(X, Y, Legend(11)))
);
*/



fbs = current report() << XPath("//FrameBox");
nfbs = N items(fbs); // add the info to the last FB

OBs= current report() << XPath("//OutlineBox");
gb = OBs[1] << get scriptable Object; // add some code to skip LDF and Column Switcher 

str = Char(As Date(Today())) || " " || ((gb << get data table()) << getname);

Eval(EvalExpr(
	fbs[nfbs] << Add Graphics Script(
		Text Color("Red");
		Text(Right Justified, {X Origin() + X Range(), Y Origin()}, Expr(str));
	);
));

Re: 任意のグラフに日付とファイル名を追加する

素晴らしい。ありがとう