
Cordial saludo.
 
estoy tratando de realizar el siguiente grafico
 
library("ggplot2")
graf<-function()
{
polys <- data.frame(  
  id = rep(factor(c("1","2","3","4")),each=4), 
  x = c(70,85,85,70,85,100,100,85,85,100,100,85,70,85,85,70), 
  y = c( 0, 0,50,50, 0,  0, 50,50,50,50,100,100,50,50,100,100), 
  value = rep(c(40, 15, 10,15), each=4) )  
 
p <- ggplot(polys, aes(x=x, y=y)) + geom_polygon(aes(fill=value,group=id))
return(p)}
graf()
 
He tenido problemas porque no encuentro la forma de cambiar los colores a los que yo deseo, yo quiero que cada cuadro tenga un color especifico.
 
De antemano gracias por la intención prestada y espero me puedan ayudar

ANDRÉS FELIPE FLÓREZ RIVERA 
UNIVERSIDAD NACIONAL DE COLOMBIA
ESTADISTICA 2010 		 	   		  
	[[alternative HTML version deleted]]

