poner - manual ggplot2

ggplot2 plot sin ejes, leyendas, etc.

Question

Quiero usar el hexbin del bioconductor (lo cual puedo hacer) para generar un diagrama que llene toda la región de visualización (png) - sin ejes, sin etiquetas, sin fondo, sin nuthin ''.

Answer 1

¿Hace esto lo que quieres?

 p <- ggplot(myData, aes(foo, bar)) + geom_whateverGeomYouWant(more = options) +
 p + scale_x_continuous(expand=c(0,0)) + 
 scale_y_continuous(expand=c(0,0)) +
 opts(legend.position = "none")

Answer 2

Las respuestas actuales son incompletas o ineficientes. Aquí está (tal vez) la forma más corta de lograr el resultado (usando theme_void() :

data(diamonds) # Data example
ggplot(data = diamonds, mapping = aes(x = clarity)) + geom_bar(aes(fill = cut)) +
      theme_void() + theme(legend.position="none")

El resultado es:

Si le interesa simplemente eliminar las etiquetas , los labs(x="", y="") hacen el truco:

ggplot(data = diamonds, mapping = aes(x = clarity)) + geom_bar(aes(fill = cut)) + 
      labs(x="", y="")

Answer 3

Re: cambio de opts al tema, etc. (para gente perezosa):

theme(axis.line=element_blank(),
      axis.text.x=element_blank(),
      axis.text.y=element_blank(),
      axis.ticks=element_blank(),
      axis.title.x=element_blank(),
      axis.title.y=element_blank(),
      legend.position="none",
      panel.background=element_blank(),
      panel.border=element_blank(),
      panel.grid.major=element_blank(),
      panel.grid.minor=element_blank(),
      plot.background=element_blank())

Answer 4

Según mi comentario en la respuesta de Chase, puedes eliminar muchas de estas cosas usando element_blank :

dat <- data.frame(x=runif(10),y=runif(10))

p <- ggplot(dat, aes(x=x, y=y)) + 
        geom_point() +
        scale_x_continuous(expand=c(0,0)) + 
        scale_y_continuous(expand=c(0,0))   

p + theme(axis.line=element_blank(),axis.text.x=element_blank(),
          axis.text.y=element_blank(),axis.ticks=element_blank(),
          axis.title.x=element_blank(),
          axis.title.y=element_blank(),legend.position="none",
          panel.background=element_blank(),panel.border=element_blank(),panel.grid.major=element_blank(),
          panel.grid.minor=element_blank(),plot.background=element_blank())

Parece que todavía hay un pequeño margen alrededor del borde del .png resultante cuando guardo esto. Quizás alguien más sepa cómo eliminar incluso ese componente.

(Nota histórica: desde ggplot2 versión 0.9.2 , opts ha quedado obsoleto. En su lugar, use theme() y reemplace theme_blank() con element_blank() .

Answer 5

''opts'' is deprecated.

en ggplot2 >= 0.9.2 uso

p + theme(legend.position = "none") 

Answer 6

xy <- data.frame(x=1:10, y=10:1)
plot <- ggplot(data = xy)+geom_point(aes(x = x, y = y))
plot
panel = grid.get("panel-3-3")

grid.newpage()
pushViewport(viewport(w=1, h=1, name="layout"))
pushViewport(viewport(w=1, h=1, name="panel-3-3"))
upViewport(1)
upViewport(1)
grid.draw(panel)