286511_es-ES

liliconcom

Re: guardar script en tabla de datos sin abrir gráfico

Desea utilizar la opción Invisible en la declaración del Generador de gráficos y también cerrar el objeto invisible al final.

a = Expr(

 new_graph = Graph Builder(
  invisible,
  Size( 1000, 800 ),
  Show Control Panel( 0 ),
  Variables( X( :variable1 ), Y( :variable1 ) )
 );

 a << Save script to data table( "name_of_graph_script" );
 
 new_graph << close window;

)

Guardar el script en la tabla de datos sin abrir el gráfico

Escribí un script que se repite y genera gráficos a partir de una tabla en función de las condiciones. Quiero guardar cada uno de esos gráficos en la tabla como un script para que, si necesito ver esos datos, pueda volver a ellos. Cuando utilizo la función "<< Guardar script en la tabla de datos", el script gráfico se guarda correctamente en la tabla. También abre el gráfico una vez que se completa el bucle. Me preguntaba si había una forma de guardar el script en la tabla sin abrir el gráfico (o ejecutar el script que se está guardando).

 

Una versión resumida del guión guardado se ve así ...

 

a = Expr(
    new_graph = Graph Builder(
        Size( 1000, 800 ),
        Show Control Panel( 0 ),
        Variables( X( :variable1 ), Y( :variable1 ) )
    )
);

a << Save script to data table( "name_of_graph_script" );

 

 

** También probé la última línea como la siguiente, pero el gráfico aún aparece después de ejecutar esto ...

a << Save script to data table( "name_of_graph_script", <<PROMPT></PROMPT>

ScriptingRe: guardar script en tabla de datos sin abrir gráfico

los Nuevo comando de secuencia de comandos también puede serle útil, por ejemplo

 

Data Table( "my table" ) << New Script(
    "name_of_graph_script",
    new_graph = Graph Builder(
        Size( 1000, 800 ),
        Show Control Panel( 0 ),
        Variables( X( :variable1 ), Y( :variable2 ) )
    )
);

Re: guardar script en tabla de datos sin abrir gráfico

Expandiendo esto un poco para aplicarlo a múltiples columnas:

 

Names default to here(1);

dt = Open("$Sample_Data/Semiconductor Capability.jmp");

AddGraphScript = function( {dt, v1, v2},
 Eval( Eval Expr(
  dt << New Script( 
   "Graph: " || ( v1 << Get Name) || " v " || (v2 << Get Name);
  , 
   new_graph = Graph Builder(
     Size( 1000, 800 ), 
     Show Control Panel( 0 ), 
     Variables( X( Expr( Name Expr( v1 ) ) ), Y( Expr( Name Expr( v2 ) ) ) )
   );
  ) 
 ) )
);

//for a single graph
AddGraphScript(dt, Expr( :NPN1 ), Expr( :PNP3) );

//for a selected columns
dt << Select Columns( {:PNP3, :IVP1, :PNP4} );
cols = dt << Get Selected Columns();
for( c = 1, c <= n items( cols ), c++, AddGraphScript( dt, Expr( :PNP2 ), cols[c] ) );