378728_de-DE

liliconcom

Bivarate lineare Anpassung mehrerer Regressionen - Skripten einer kombinierten Datentabelle aus Parameterschätzungen

Ich habe an der Erstellung von Skripten für einige in JMP durchgeführte Datenanalysen mit mehreren tabellarischen Schritten, Y by X Bivarate Fit und geteilten Tabellenschritten gearbeitet. Ich konnte Skripte für alles generieren, außer für den Schritt, in dem ich mit der rechten Maustaste in eine Tabelle mit Parameterschätzungen aus dem Bericht "Anpassungsgruppe" klicke und "Kombinierte Datentabelle erstellen" auswähle.

 

Irgendwelche Vorschläge, wie dies erreicht werden kann?

 

Meine Skriptsprache ist hier:

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;

AnalytikSkripting