722308_zh-TW

liliconcom

自動註釋圖

我創建了一個腳本來獲取規範文件並將規範限制和註釋應用於資料文件。我試圖想出一種方法來自動將註釋輸入作為註釋添加到後續繪圖中。

我在用戶社群的幫助下想出了這個方案。想知道是否有明顯的機會使腳本在可以自動註釋的繪圖類型方面更加靈活？

clear Globals();

Delete Symbols();



dt=Current Data Table();

cd=Column Dialog(

       exy =

       ColList( "Y",

              Min Col( 1 ),

              Max Col( 100 ),

       ),

       exx =

       ColList( "X",

              Min Col( 1 ),

              Max Col( 10 ),

       ),



);





eval(cd[1]);eval(cd[2]);

yyy=expr(y());

xxx=expr(x());

xval = exx[1];

for (i=1, i<=nitems(exy), i++,

insert into(yyy, exy[i]));

for (i=1, i<=nitems(exx), i++,

insert into(xxx, exx[i]));



nw = New Window( "Annotated Multiple Plots", V List Box( vlb = v List Box() ) );



For( i = 1, i <= N Items( exy ), i++,

Notes = exy[i] << Get Property( "Notes" );

       plots = V List Box(

       oneway( x( exx[1] ), y( exy[i] ),

              SendToReport(

              Dispatch(

                     {},

                     "Oneway Plot",

                     FrameBox,

                     Add Text Annotation(

                           Text( "Category: " || Notes ),

                           Fixed Size( 0 ),

                           Text Box( {0, 0, 0, 0} ),

                           Filled( 0 ),

                           Font( "Segoe UI", 10, "Bold" )

                     )

              ) )

       ));

       vlb << append( plots );

);

如果您發現任何改進此腳本的機會，我願意接受建議？

謝謝

十二月

自動化和腳本編寫回覆：自動註釋圖表

您的 Y 列輸入需要受到限制以確保只能指定數字列。