[R-es] Texto en color rojo en celdas especificas de una tabla

[Rubén Gómez Antolí]

Hola:

El 09/05/13 02:16, Marcuzzi, Javier Rubén escribió:
> Lo encontré
> da <- data.frame(id=letters[1:5], score=1:5*2)
> da
> col <- function(x){
> ifelse(x>7,
> paste("\textcolor{blue}{", formatC(x, dig=2, format="f"), "}"),
> paste("\textcolor{red}{", formatC(x, dig=2, format="f"), "}"))
> }
> da$score.string <- col(da$score)
> da$score.string
> require(xtable)
> xtable(da[,c("id","score.string")])
> da

Javier, ¡que velocidad! Gracias. (No recordaba que hubiera salido el 
tema en la lista, perdón, tenía que haber mirado antes)

Mañana lo pruebo, tendré que adaptar a mi caso, que hoy voy a dar de 
mano ya. :^)

Salud y Revolución.

Lobo.
-- 
Libertad es poder elegir en cualquier momento. Ahora yo elijo GNU/Linux,
para no atar mis manos con las cadenas del soft propietario.
Porque la libertad no es tu derecho, es tu responsabilidad.
http://www.mucharuina.com
---------
Desde El Ejido, en Almería, usuario registrado Linux #294013
http://www.counter.li.org