He estado trabajando en la creación de scripts de algunos análisis de datos realizados en JMP con tabulados múltiples, Y por X Bivarate Fit y pasos de tablas divididas. He podido generar scripts para todo excepto el paso en el que hago clic con el botón derecho en un Cuadro de tabla de estimaciones de parámetros del informe de Grupo de ajuste y selecciono 'Crear tabla de datos combinados'
¿Alguna sugerencia sobre cómo lograr esto?
Mi lenguaje de script está aquí:
Names Default To Here( 1 );
dt = Open( "data file directory" );
obj = dt << Tabulate(
Add Table(
Column Table( Analysis Columns( :KT3, :Log Age, :k31, :N1 ), Statistics( Mean ) ),
Row Table( Grouping Columns( :Batch No., :Age ) )
)
);
obj << Make into Data Table;
New Window( "",
V List Box(
Fit Group(
Bivariate(
SendToByGroup( {:Batch No. == "By Variable 1"} ),
SendToByGroup( {:Batch No. == "By Variable 1"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 1", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 1", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 2"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 2", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 2", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 3"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 3", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 3", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 4"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 4", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 4", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 5"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 5", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 5", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 6"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 6", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 6", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 7"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 7", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 7", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
SendToByGroup( {:Batch No. == "By Variable 8"}, Y( :Name( "Mean(KT3)" ) ) ),
SendToByGroup(
{:Batch No. == "By Variable 8", Platform Index( 2 )},
Y( :Name( "Mean(k31)" ) )
),
SendToByGroup(
{:Batch No. == "By Variable 8", Platform Index( 3 )},
Y( :Name( "Mean(N1)" ) )
),
X( :Name( "Mean(Log Age)" ) ),
Fit Line( {Line Color( {212, 73, 88} )} ),
By( :Batch No. )
)
)
)
);
Report( Fit Group[1] )["Parameter Estimates"][Table Box( 3 )] << Make Combined Data Table;