Re: Script para guardar el informe actual como .ppt, activado por el clic del botónEl mensaje << SavePresentation () es válido para los objetos del cuadro de visualización, por lo que necesitará algo como esto para obtener el informe de la plataforma que ha creado:
(obj << Report) << Save Presentation( "$DOCUMENTS/report.pptx" )
Alternativamente, puede usar el Informe actual (), pero eso conlleva algunos problemas si hace otra cosa después de crear el informe y antes de exportar Powerpoint. Lo mismo se aplica a la creación de su informe también. Probablemente sea una buena idea usar:
obj = dt << Gaussian Process(...)
El 'dt' ayudará a garantizar que se use la tabla correcta, y puede agregar Nombres Predeterminados a Aquí (1) en la parte superior para asegurarse de que estas variables JSL que cree no entren en conflicto con otras.
Re: Script para guardar el informe actual como .ppt, activado por el clic del botónHola, muchas gracias por la claridad. He implementado los cambios que sugirió pero no puedo lograr que el botón haga clic para iniciar el guardado del informe como .pptx todavía. El clic del botón aparece para cargarse durante un microsegundo, pero no se guarda nada en el escritorio.
// "//!" placed at the first line of script results in auto-run rather than to open the script
// //!
Names Default To Here(1);
//opens a new window
w = New Window( "Load Your Data Table",
Text Box( "Choose an Excel file in which your data is linearized into
columns and transformed into Log10[x]." ),
//button to load data
Button Box( "1. Load data table", dt = Open( ) ),
//button to set column type
Button Box( "2. Set column type to Numeric/Continuous", dt = current data table();
for (i = 1, i <= ncols(dt), i++, column(dt, i) << data type(numeric);
column(dt, i) << set modeling type(continuous))),
//button to initiate Gaussian modeling
Button Box( "3. Gaussian modeling", obj = dt << Gaussian Process(Estimate Nugget(1),
Set Correlation Function("Cubic"), Profiler(1),
SendToReport( Dispatch( {}, "Model Report", OutlineBox, {Close( 1 )})),
//automatically saves the Gaussian analysis as a script to the data table
<< Save Script to Data Table(
"Gaussian modeling",
<<PROMPT></PROMPT>
Script para guardar el informe actual como .ppt, activado por el clic del botón* Encontré un par de publicaciones muy similares que se resolvieron en el pasado, pero no he utilizado las soluciones ... perdón por ser una publicación duplicada.
Estoy tratando de agregar una secuencia de comandos activada por un clic de botón que puede guardar el informe abierto actualmente generado a partir del modelado de procesos gaussiano como un archivo .pptx. He encontrado un ejemplo relevante de << guardar presentación (... ) en el índice de secuencias de comandos, pero no han podido colocar esto como un argumento funcional de la Caja de botones ("prueba", [aquí]).
Aquí está mi guión hasta ahora:
// "//!" placed at the first line of script results in auto-run rather than to open the script
// //!
//opens a new window
w = New Window( "Load Your Data Table",
Text Box( "Choose an Excel file in which your data is linearized into
columns and transformed into Log10[x]." ),
//button to load data
Button Box( "1. Load data table", dt = Open( ) ),
//button to set column type
Button Box( "2. Set column type to Numeric/Continuous", dt = current data table();
for (i = 1, i <= ncols(dt), i++, column(dt, i) << data type(numeric);
column(dt, i) << set modeling type(continuous))),
//button to initiate Gaussian modeling
Button Box( "3. Gaussian modeling", obj = Gaussian Process(Estimate Nugget(1),
Set Correlation Function("Cubic"), Profiler(1),
SendToReport( Dispatch( {}, "Model Report", OutlineBox, {Close( 1 )})),
//automatically saves the Gaussian analysis as a script to the data table
<< Save Script to Data Table(
"Gaussian modeling",
<<PROMPT></PROMPT>