92893_es-ES

liliconcom

Cómo conservar el color de la celda después de guardar la tabla de datos en el diario o en una nueva ventana

/*
After save dt into Journal, the cell color from data data table was changed into the font color in the journal
*/
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt << Color by Column( :age);
Wait( 0 );
dt << Color Rows by Row State;
dt<<SAVE></SAVE>

 

Re: Cómo conservar el color de la celda después de guardar la tabla de datos en el diario o en una nueva ventanaGracias.
Mi versión JMP JMP14, (64 bits); No modifiqué el script, ejecute el script exacto a continuación:
Nombres predeterminados hasta aquí (1);
dt = Abrir ("$ SAMPLE_DATA / Big Class.jmp");
dt << Color por columna (: edad);
Espera (0);

// El siguiente comando no guarda los colores de la celda.
// dt << Color Filas por fila Estado;
dt << Borrar selección de columna ();
dt << borrar seleccionar;

// obtener los colores únicos
nr = N Fila (dt);
// hacer una lista del tamaño de la tabla para obtener los colores de las filas y ubicar las filas de un color dado

_clr = Como lista (J (nr, 1, 0));

Para (i = 1, i <= N Fila (dt), i ++,
_clr [i] = Color a RGB (Color de (estado de fila (i)))
);

// crea una lista de colores únicos
clr_keys = Array asociativo (_clr) << obtener claves;

// para cada color (j), localice a qué filas se le asigna ese color usando Loc (_clr, ...)
Para (j = 1, j <= N elementos (clr_keys), j ++,

idx = Loc (_clr, clr_keys [j]);
// Colorea las celdas en filas idx y cada columna
Para (i = 1, i <= N Col (dt), i ++,
Columna (dt, i) << celdas de color (Color RGB (clr_keys [j]), idx)
);

);

// ahora registre la tabla
dt << revista;Re: Cómo conservar el color de la celda después de guardar la tabla de datos en el diario o en una nueva ventana

¿Qué versión de JMP tienes? ¿Usaste este script o un script modificado? Si se modifica, por favor adjunte.

Re: Cómo conservar el color de la celda después de guardar la tabla de datos en el diario o en una nueva ventanaNo se pudo duplicar el resultado de retener el color de la celda en la revista,
No estoy seguro de si es porque usas JMP-Pro y el mío no.
Gracias.Re: Cómo conservar el color de la celda después de guardar la tabla de datos en el diario o en una nueva ventana

El mensaje de la mesa dt << Color Filas por fila Estado () Parece ser una declaración de "vista". La vista de tabla se cambia, pero guardar la tabla y abrirla o registrar por diario no mantiene las celdas de colores.  El registro en diario de esa tabla creará un informe en el Diario con los colores de fuente de la tabla que coinciden con los colores del estado de la fila. 

Sin embargo, col << Células de color (clr, filas) Es un mensaje de columna. Este mensaje se almacena en los atributos de la columna de la tabla. También al mantener el diario el color de la celda se mantiene.

 

Abajo tanto el script como el resultado se muestran a continuación. Tenga en cuenta que otro método (que podría ser más directo) sería obtener las claves únicas para cada grupo (edad), obtener las filas para cada edad, luego elegir un color y aplicarlo a esas filas de cada columna. 

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt << Color by Column( :age );
Wait( 0 );

//This next command does not save the cell colors.
//dt << Color Rows by Row State; 
dt << Clear column selection();
dt << clear select;

//get the unique colors
nr = N Row( dt );
//make a list the size of the table to get the row colors and locate rows of a given color

_clr = As List( J( nr, 1, 0 ) );  

For( i = 1, i <= N Row( dt ), i++,
 _clr[i] = Color To RGB( Color Of( Row State( i ) ) )
);

//creates a list of unique colors
clr_keys = Associative Array( _clr ) << get keys;

//for each color (j), locate which rows are assigned that color using Loc( _clr, ...)
For( j = 1, j <= N Items( clr_keys ), j++,
 
 idx = Loc( _clr, clr_keys[j] );
//Color the cells in rows idx and each coloumn 
 For( i = 1, i <= N Col( dt ), i++,
  Column( dt, i ) << color cells( RGB Color( clr_keys[j] ), idx )
 );
 
);

//now journal the table
dt << journal;