Ho creato uno script per prendere un documento delle specifiche e applicare i limiti e le note delle specifiche a un file di dati. Stavo cercando di trovare un modo per aggiungere automaticamente le note immesse come annotazione alle trame successive.
L'ho ideato con molto aiuto da parte della comunità degli utenti. Ti chiedi se esistono ovvie opportunità per rendere la sceneggiatura più flessibile in termini di tipi di trama che possono essere annotati automaticamente?
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 );
);
Se vedi qualche opportunità per migliorare questo script, sono aperto a suggerimenti?
Grazie
dicembre
È necessario impostare una restrizione sull'input della colonna Y per garantire che possano essere specificate solo colonne numeriche.
