ż como se pueden cambiar estos colores, gray.colors a otros

 

library("KernSmooth")

 cps_bkde <- bkde2D(cbind(cps$experience, log(cps$wage)),

                      bandwidth = c(3.5, 0.5), gridsize = c(200, 200))

 

 

 

image(cps_bkde$x1, cps_bkde$x2, cps_bkde$fhat,

      col = rev(gray.colors(10, gamma = 1)),  ####
pregunta?como se pueden cambiar estos colores

      xlab = "experience", ylab = "log(wage)")

 box()

 lines(fit ~ experience, data = cps2)

 lines(lwr ~ experience, data = cps2, lty = 2)

 

 



--

Este mensaje le ha llegado mediante el servicio de correo electronico que ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema Nacional de Salud. La persona que envia este correo asume el compromiso de usar el servicio a tales fines y cumplir con las regulaciones establecidas

Infomed: http://www.sld.cu/




	[[alternative HTML version deleted]]

