40367_it-IT

liliconcom

Passare attraverso più colonne e sostituire le celle

Ciao a tutti,

 

Sto tentando di eseguire iterazioni su più tabelle e sostituire qualsiasi valore> 6 sigma con un ".". Di seguito è riportato il mio tentativo di eseguire iterazioni su grandi classi e sostituire i valori di peso e altezza superiori a 1 sigma con a.; tuttavia, non funziona come previsto. Penso di confondermi con le due corde. 

 

Names Default To Here( 1 );
Clear Globals();



dt = Open("...\SAS\JMP\13\Samples\Data\Big Class.jmp");


mycol = J( N Rows( dt ), 1 );
list_col_names = dt << Get Column Names( String );


For( i = 1, i <= N Items( list_col_names ), i++, 

 cur_col = (list_col_names[i]);
 
 
 If( Left( cur_col,1 ) == "ei", 
 
  mycol = dt << get as matrix( cur_col );
   
  q25 = Quantile( 0.25, mycol );
  q50 = Quantile( 0.50, mycol );
  q75 = Quantile( 0.75, mycol );
  
  mycol1 = ((mycol - q50) / ((q75 - q25) / 1.35));
  
  For( r = 1, r <= N Rows( dt ), r++,
   If(
    mycol1[r] > 1, mycol1[r] = .,
    mycol1[r] < -1, mycol1[r] = .
   ));
  
 );
);

Grazie!

 

Ri: scorrere attraverso più colonne e sostituire le celle

Questo è il mio problema, funziona benissimo! Grazie per l'aiuto!

Ri: scorrere attraverso più colonne e sostituire le celle

I problemi principali che sto vedendo sono che non hai identificato le colonne Hieght e Peso e che una volta trovate le righe sopra o sotto 1 sigma, i valori non sono stati riportati alla tabella dei dati.

Ecco una modifica al tuo codice che corregge tali problemi.

Names Default To Here( 1 );
Clear Globals();

dt = Open("$SAMPLE_DATA\Big Class.jmp");

mycol = J( N Rows( dt ), 1 );
list_col_names = dt << Get Column Names( String );

For( i = 4, i <= N Items( list_col_names ), i++, 
 cur_col = (list_col_names[i]); 
 If( Contains(cur_col,"ei") > 0,  
  mycol = dt << get as matrix( cur_col );   
  q25 = Quantile( 0.25, mycol );
  q50 = Quantile( 0.50, mycol );
  q75 = Quantile( 0.75, mycol );  
  mycol1 = ((mycol - q50) / ((q75 - q25) / 1.35));
  
  For( r = 1, r <= N Rows( dt ), r++,
   If(
    mycol1[r] > 1, column(dt,cur_col)[r] = .,
    mycol1[r] < -1, column(dt,cur_col)[r] = .
   ));
    
 );
);