SORU
12 HAZİRAN 2013, ÇARŞAMBA


Tasarruf kılavuz.() dosya düzenlemek için arsa

Birden fazla araziler ggplot2, düzenlemeye kullanarak grid.arrange()kullanarak çizmek için çalışıyorum. Biri var sorunun tam olarak ne olduğunu tarif buldum beri, link sorun açıklaması alıntı var:

grid.arrange(), yani sonra ggsave() kullanıyorum

grid.arrange(sgcir1,sgcir2,sgcir3,ncol=2,nrow=2)
ggsave("sgcirNIR.jpg")

Kılavuz arsa ama son bireysel ggplot falan kurtarmadım. Orada hiç aslında grid.arrange() kullanarak gösterilen arsa kurtarmanın yolu 10* *veya ona benzer bir şey? Eski yolu kullanmaktan başka

jpeg("sgcirNIR.jpg")
grid.arrange(sgcir1,sgcir2,sgcir3,ncol=2,nrow=2)
dev.off()

Aynı bağlantıyı çözümü verir:

require(grid)
require(gridExtra)
p <- arrangeGrob(qplot(1,1), textGrob("test"))
grid.draw(p) # interactive device
ggsave("saving.pdf", p) # need to specify what to save explicitly

Ancak, ggsave() link dan alınan aşağıdaki kodu grid.arrange() arama, kaydetmek için çıkış nasıl kullanılacağını çözemedim:

library(ggplot2)
library(gridExtra)
dsamp <- diamonds[sample(nrow(diamonds), 1000), ] 

p1 <- qplot(carat, price, data=dsamp, colour=clarity)
p2 <- qplot(carat, price, data=dsamp, colour=clarity, geom="path")

g_legend<-function(a.gplot){
tmp <- ggplot_gtable(ggplot_build(a.gplot))
leg <- which(sapply(tmp$grobs, function(x) x$name) == "guide-box")
legend <- tmp$grobs[[leg]]
return(legend)}

legend <- g_legend(p1)
lwidth <- sum(legend$width)

## using grid.arrange for convenience
## could also manually push viewports
grid.arrange(arrangeGrob(p1   theme(legend.position="none"),
                                        p2   theme(legend.position="none"),
                                        main ="this is a title",
                                        left = "This is my global Y-axis title"), legend, 
                     widths=unit.c(unit(1, "npc") - lwidth, lwidth), nrow=1)

# What code to put here to save output of grid.arrange()?

CEVAP
12 HAZİRAN 2013, ÇARŞAMBA


grid.arrange doğrudan cihaz üzerinde çizer. arrangeGrob diğer taraftan, bir şey çizmek yok ama ggsave(file="whatever.pdf", g) arinc iletebilir g döndürür.

Bu nedenle işler daha farklı olan ggplot nesneleri, nerede varsayılan olarak geçen arsa olarak kayıtlı ise belirtilmedi olduğunu ggplot2 görünmez tutar son olaylar, sanmıyorum grid.arrange gerektiği dağınık olan bu sayaç, özel paket.

Bunu Paylaş:
  • Google+
  • E-Posta
Etiketler:

YORUMLAR

SPONSOR VİDEO

Rastgele Yazarlar

  • Baby Big Mouth

    Baby Big Mou

    5 Mart 2013
  • Bobbylee Budde

    Bobbylee Bud

    13 ŞUBAT 2011
  • EatingIn

    EatingIn

    12 EKİM 2013