239354_es-ES

liliconcom

¿Existe un código eficiente que implemente múltiples columnas de todas las filas no nulas?

Solo puedo hacerlo de esta manera, si son más de 100 columnas es demasiado ineficiente.

¡Gracias!

dt=Open("$SAMPLE_DATA\Missing Data Pattern.jmp");
dt << Select Where(
 abs(As Column(1))>=0&abs(As Column(2))>=0&abs(As Column(3))>=0&abs(As Column(4))>=0
);
Wait( 0 );
d3 = dt << Subset( Output Table( "text" ), Selected Rows( 1 ), selected columns( 0 ) );
Wait( 0 );

Re: ¿Existe un código eficiente que implemente múltiples columnas de todas las filas no nulas?

Podrías hacer algo como esto:

dt = Current Data Table();

//Get list of current names:
cols = dt << Get Column Names();

//Build a string iteratively to select non-missing from each column
str = "dt << Select Where(!Is Missing(:Name(\!""||char(cols[1])||"\!")) ";
for(i = 2, i<= N Items(cols), i++,
 str = str||"& !Is Missing(:Name(\!""||char(cols[i])||"\!"))"
);
str = str ||")";

//parse and evaluate the string
eval(parse(str));