你好呀,
我遇到了一個問題,非常感謝您提供一些建議:
我們分析樣本並獲得每個樣本的總體 A、B、C、D 和 E。
A的信息可以分為“%”和“count”,B、C、D、E也一樣。
我們導入數據,名為“A 1”到“E 1”的列代表“%”值,名為“A 2”到“E 2”的列代表“計數”值。
由於導入總是相同的,因此編寫一個腳本來為每種人口類型(A、B、C 等)生成具有 2 個 Y 軸(“%”和“計數”)的圖表是易於管理的。 請參閱下面的代碼。
問題:有時我們會為我們的一些人群獲得額外的讀數。 例如,只有人口 B 和 E 會有稱為“熒光”的第三種信息。 這些將作為列“B 3”和“E 3”導入到同一個表中。
由於這些人口可能因進口而異,我需要編寫一個腳本,能夠將“B 3”識別為“B”的成員,並在人口“B”圖中創建第三個 Y 軸(以及本例中的“E 3”相同)。 但是為此我不夠聰明/經驗不足。
當然,我嘗試重新排列表格,創建新行而不是新列並使用“換行”。 但是我們沒有為每個 Y 軸自動縮放。 還嘗試了三種信息類型的關聯數組,但由於缺乏編碼經驗而失敗。
也許你們中的一個人有一個想法,這可能會有所幫助,謝謝
Names Default To Here( 1 );
dt = Current Data Table();
dt << clear select;
win = New Window( "Test", Outline Box( "", hb = V List Box() ) );
loopstart = Contains(dt << get column names, Column("A 1"));
loopend = (Contains(dt << get column names, Column("A 2")))-1;
icounts = (loopend+1)-loopstart;
For( i = loopstart, i <= loopend, i++,
gb = Graph Builder(
Size( 1500, 900 ),
Show Control Panel( 0 ),
Grid Color( "Black" ),
Graph Spacing( 2 ),
Legend Position( "Bottom" ),
Variables( X( :Group ), Y( Eval( i ) ), Y( Eval( i + icounts ) ), Color( :Subjects ) ),
Elements( Position( 1, 1 ), Points( X, Y, Legend( 11 ) ), Box Plot( X, Y, Legend( 13 ) ) ),
Elements( Position( 1, 2 ), Points( X, Y, Legend( 12 ) ), Box Plot( X, Y, Legend( 14 ) ) ),
SendToReport(
Dispatch( {}, "Graph Builder", OutlineBox, {Set Title( "DATA" ), Image Export Display( Normal )} ),
Dispatch( {}, "graph title", TextEditBox, {Set Text( "Title" )}, {Set Font Size( 16 )} ),
Dispatch( {}, "Y title", TextEditBox, {Set Font Size( 14 ), Set Font Style( "bold" ), Set Text( " [%]" )} ),
Dispatch( {}, "Y1 title", TextEditBox, {Set Font Size( 14 ), Set Font Style( "bold" ), Set Text( " Count" )} ),
Dispatch( {}, "X title", TextEditBox, {Set Font Size( 14 ), Set Font Style( "bold" )} ),
Dispatch(
{},
"400",
LegendBox,
{Set wrap( 12 ), Set Title( "" ), font( "Segoe UI", 12, "Plain" ), Legend Position(
{11, [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, -1], 13, [-1], 12, [-1], 14, [-1]
}
), Orientation( "Vertical" )}
)
)
);
hb << Append( Report( gb ) << child );
hb << append( Page Break Box() );
gb << close window;
);