48140_it-IT

liliconcom

Percorso di soluzione interattiva di regressione generalizzata

Ciao, in una mia sceneggiatura vorrei rilevare il momento in cui un utente interagisce con il percorso della soluzione in gen reg (trascinando la linea verticale nel grafico del percorso della soluzione), al fine di generare alcuni grafici personalizzati in base al modello selezionato.  Qualche suggerimento? Grazie in anticipo Matteo

Ri: Percorso di soluzione interattiva di regressione generalizzata

Ho trovato una soluzione possibile usando la trappola per topi (), ahimè con alcuni inconvenienti

1) sul primo clic utente all'interno del frame del percorso della soluzione, verrà visualizzato un pulsante di aggiornamento. Successivamente, l'interattività del percorso della soluzione viene ripristinata come al solito.

2) quando l'utente fa clic sul pulsante di aggiornamento, la situazione iniziale viene ripristinata. 

 

Metterò quindi le funzioni di elaborazione dei modelli all'interno dello script del pulsante di aggiornamento.

 

Stavo cercando una soluzione migliore non così visibile all'utente / che non richiede intervento, sarei felice se qualcuno potesse dare un suggerimento per migliorare il codice qui sotto.

 

Grazie
Matteo

 

 

 

m = Fit Model(
 Y( :Y ),
 Effects( :X1, :X2, :X3 ),
 Personality( "Generalized Regression" ),
 Generalized Distribution( "Normal" ),
 Run( Fit( Estimation Method( Lasso( Adaptive ) ), Validation Method( AICc ) ) )
);

f1 = (m << report)[Outline Box( "Solution Path" )][frame box( 1 )];
f2 = (m << report)[Outline Box( "Solution Path" )][frame box( 2 )];


setSolutionPathTraps = Function( {fb1, fb2, bb},
 Eval(
  Eval Expr(
   fb1 << add graphics script(
    Mousetrap(
     bb << visibility( "visible" ),
     Expr( fb2 ) << remove graphics script( 1 );
     Expr( fb1 ) << remove graphics script( 1 );
    )
   );
   fb2 << add graphics script(
    Mousetrap(
     bb << visibility( "visible" ),
     Expr( fb1 ) << remove graphics script( 1 );
     Expr( fb2 ) << remove graphics script( 1 );
    )
   );
  )
 );
 bb << visibility( "collapse" );
);

New Window( "a", bb = Button Box( "Refresh", setSolutionPathTraps( f1, f2, bb ) ) );


setSolutionPathTraps( f1, f2, bb );