378728_it-IT

liliconcom

Adattamento lineare bivarato di più regressioni: script di una tabella di dati combinati dalle stime dei parametri

Ho lavorato allo scripting di alcune analisi dei dati eseguite in JMP con più tabelle, Y di X Bivarate Fit e passaggi di tabella divisa. Sono stato in grado di generare script per tutto tranne che per il passaggio in cui faccio clic con il pulsante destro del mouse in una tabella delle stime dei parametri dal rapporto Fit Group e seleziono "Crea tabella dati combinata"

 

Qualche suggerimento su come eseguire questa operazione?

 

Il mio linguaggio di script è qui:

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;

AnalyticsScripting