54224_es-ES

liliconcom

Manipulaciones de columnas

Tengo tablas que tienen datos en el siguiente orden:

Quiero que todas las mesas se vean así:

 

¿Cómo puedo lograr esto en jsl? 

Re: manipulaciones de columnas

@Aam_jmp ,
En su ejemplo específico, lo siguiente funcionaría: 

 

Clear Log(); Clear Globals(); 

dt = Current Data Table();  
dt2 = (dt << Tabulate(
      Set Format( N( 9, "Best" ) ),
      Add Table(
       Column Table( Analysis Columns( :Age, :Height, :Weight ) ),
       Column Table( Grouping Columns( :Result ) ),
       Row Table( Grouping Columns( :Name ) )
         )
          )
   ) << Make Into Data Table; 

dt2 << New Column("Result",Character,Nominal,Formula(If(:Fail==1,"Fail",If(:Pass==1,"Pass")))); 

Sin embargo, tendrá que ajustar la última columna cada vez en este enfoque. 
A continuación se muestra un enfoque más generalizado: 

 

Clear Log(); Clear Globals(); 

dt = Current Data Table(); 
CharValsAA = Associative Array(dt:Result); 
Results = CharValsAA << Get Keys; 

for(i = 1, i < N Items(Results), i++,
  If(!IsMissing(Results[i]),
   ,
   Remove From(Results,i);
    );
   );

dt2 = (dt << Tabulate(
      Set Format( N( 9, "Best" ) ),
      Add Table(
       Column Table( Analysis Columns( :Age, :Height, :Weight ) ),
       Column Table( Grouping Columns( :Result ) ),
       Row Table( Grouping Columns( :Name ) )
         )
          )
   ) << Make Into Data Table; 
nR = N Rows(dt2);

// Short sighted approach 
//dt2 << New Column("Result",Character,Nominal,Formula(If(:Fail==1,"Fail",If(:Pass==1,"Pass")))); 

// Generalized Approach 
dt2 << New Column("Test",Character,Nominal, Set Each Value("a")); 
for(i = 1, i <= N Items(Results), i++,
  VarName = Results[i]; 
  Eval(Parse(Eval Insert("\[ Temp_^i^ = Loc(dt2:^VarName^ << Get Values)  ; ]\" ))); 
  Eval(Parse(Eval Insert("\[ for(r = 1, r <= N Rows(Temp_^i^), r++,
           If(Temp_^i^[r] > 0,
           dt2:Test[Temp_^i^[r]] = Results[^i^];
             );
            ) ; ]\" ))); 
   );

Re: manipulaciones de columnas

Bueno, ese es mi único objetivo. Para hacer las tablas no obtengo nombres repetitivos en la columna. 

Re: manipulaciones de columnas

@Aam_jmp ,
Debido a que la naturaleza de los datos es carácter y no numérico, me pregunto si esto es posible de una manera directa. 

         Puedo pensar en una forma de hacerlo: asignando cada valor único de la columna de caracteres, tabulando con el equivalente numérico y volviendo a asignar los valores de los caracteres. No sé si querrás ir por ese camino y complicarlo innecesariamente. 

          Si tal vez compartiste todo tu objetivo, ¿quizás haya una mejor manera de manejar esto? 

Re: manipulaciones de columnas

@uday_guntupalli Ya he intentado hacer esto. Esto parece hacer una nueva columna para cada valor que está presente en la columna. Me gustaría saber si hay alguna opción en JMP que me ayude a adquirir algo como esto:

 

Re: manipulaciones de columnas

@Aam_jmp ,

Pienso que Tabulate todavía puede funcionar. Si tuviera una nueva columna "Prueba" y Tabulara, terminaría con algo como esto: 

 

dt = Current Data Table(); 
dt1 = (dt << Tabulate(
 Set Format( N( 9, "Best" ) ),
 Add Table(
  Column Table( Analysis Columns( :Age, :Height, :Weight ) ),
  Column Table( Grouping Columns( :Test ) ),
  Row Table( Grouping Columns( :Name ) )
 )
)) << Make Into Data Table

 Si esto no responde a lo que está preguntando, muestre amablemente cómo se ven sus datos (como una muestra), para que pueda ver dónde estoy. 

Re: manipulaciones de columnas

@uday_guntupalli ¿Qué pasa si una de las columnas que tengo tiene tipo de datos de caracteres?

Re: manipulaciones de columnas

@Aam_jmp ,
Use Resumir o tabular 

dt = Current Data Table();

dt1 = (dt << Tabulate(
 Add Table(
  Column Table( Analysis Columns( :Age, :Height, :Weight ) ),
  Row Table( Grouping Columns( :Name ) )
 )
)) << Make Into Data Table