レポートのヘルプキー値にアクセスできますか?レポートが特定のプラットフォームであることを確認したい、たとえば2変量で、ヘルプキーにタイトルが変更された場合に必要な情報があるようです。ヘルプキーを使用できない場合、これを確認する別の方法はありますか?私が理解できる唯一の方法は、2つの連続軸があることを確認することです。
たぶん別のアプローチがうまくいくでしょう。 このスクリプトは、開いているすべてのウィンドウを調べてレポートを見つけ、それらのスクリプトを表示します。 スクリプトはレポートを再作成する方法を指示し、おそらくあなたが必要とする情報も持っています。
// get a list of open windows
wlist = Window();
// some of them might be platforms
For( i = 1, i <= N Items( wlist ), i += 1,
ob = Try( wlist[i][Outline Box( 1 )] );
// see if there is an outline box
If( Type( ob ) == "DisplayBox",
// the outline box might be a platform owner,
// see if it is a scriptable object
platform = ob << getscriptableObject;
If( Type( platform ) == "Scriptable",
// found one. display its script
Show( platform << getscript );
s = platform << getscript;
If( Head( s ) == Expr( distribution() ),
If(
Head( Arg( s, 1 ) ) ==
Expr( ContinuousDistribution ),
Print( "ok" );//
, //
Print( "no" );//
)//
, //
Print( "not close" )
);
);
);
);
いくつかのウィンドウが開き、2つのレポートがあります。
platform << getscript = Bivariate(Y(:weight), X(:height), Fit Line({Line Color({213, 72, 87})}));
"not close"
platform << getscript = Distribution(Continuous Distribution(Column(:weight)), Nominal Distribution(Column(:age)));
"ok"
スクリプトは式として返されます。式関数を使って調べることも、それをchar()で文字列に変換して文字関数を使って調べることもできます。
c = char(NameExpr(s)); // convert to character
"Distribution(Continuous Distribution(Column(:weight)), Nominal Distribution(Column(:age)))"
contains(c,"Nominal Distribution") // find location of text
56