คำถามติดแท็ก gridextra

ฉันพยายามที่จะพล็อตหลายแปลงโดยใช้การจัดพวกเขาโดยใช้ggplot2 grid.arrange()เนื่องจากฉันสามารถหาคนที่อธิบายปัญหาที่แท้จริงได้ฉันจึงอ้างจากคำอธิบายปัญหาจากลิงค์ : เมื่อฉันใช้ggsave()หลังจากgrid.arrange()นั้นคือ grid.arrange(sgcir1,sgcir2,sgcir3,ncol=2,nrow=2) ggsave("sgcirNIR.jpg") ฉันไม่ได้บันทึกพล็อตกริด แต่เป็น ggplot แต่ละรายการสุดท้าย มีวิธีใดในการบันทึกพล็อตตามที่แสดงโดยgrid.arrange()ใช้ ggsave()หรือสิ่งที่คล้ายกันหรือไม่? นอกเหนือจากการใช้วิธีที่เก่ากว่า jpeg("sgcirNIR.jpg") grid.arrange(sgcir1,sgcir2,sgcir3,ncol=2,nrow=2) dev.off() ลิงค์เดียวกันให้คำตอบด้านล่าง: 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 อย่างไรก็ตามฉันไม่สามารถหาวิธีใช้ggsave()เพื่อบันทึกผลลัพธ์ของการgrid.arrange()โทรในรหัสต่อไปนี้ซึ่งนำมาจากลิงค์ : library(ggplot2) library(gridExtra) dsamp <- diamonds[sample(nrow(diamonds), 1000), ] p1 <- qplot(carat, price, …

141 r  ggplot2  gridextra 

ฉันมีสอง ggplots grid.arrangeซึ่งผมสอดคล้องกับแนวนอน ฉันได้ดูโพสต์ในฟอรัมมากมาย แต่ทุกสิ่งที่ฉันพยายามดูเหมือนจะเป็นคำสั่งที่ได้รับการปรับปรุงและตั้งชื่ออย่างอื่น ข้อมูลของฉันเป็นแบบนี้ # Data plot 1 axis1 axis2 group1 -0.212201 0.358867 group2 -0.279756 -0.126194 group3 0.186860 -0.203273 group4 0.417117 -0.002592 group1 -0.212201 0.358867 group2 -0.279756 -0.126194 group3 0.186860 -0.203273 group4 0.186860 -0.203273 # Data plot 2 axis1 axis2 group1 0.211826 -0.306214 group2 -0.072626 0.104988 group3 -0.072626 …

138 r  ggplot2  legend  gridextra 

ฉันใช้ ggplot และมีกราฟสองกราฟที่ฉันต้องการแสดงด้านบนของกันและกัน ฉันใช้grid.arrangeจาก gridExtra เพื่อวางซ้อนกัน ปัญหาคือฉันต้องการให้ขอบด้านซ้ายของกราฟจัดแนวเช่นเดียวกับขอบด้านขวาโดยไม่คำนึงถึงป้ายกำกับแกน (ปัญหาเกิดขึ้นเนื่องจากป้ายกำกับของกราฟหนึ่งสั้นในขณะที่อีกกราฟหนึ่งยาว) คำถาม: ฉันจะทำสิ่งนี้ได้อย่างไร? ฉันไม่ได้แต่งงานกับกริดจัด แต่ ggplot2 เป็นสิ่งจำเป็น สิ่งที่ฉันได้ลอง: ฉันลองเล่นกับความกว้างและความสูงเช่นเดียวกับ ncol และ nrow เพื่อสร้างตาราง 2 x 2 และวางภาพในมุมตรงข้ามจากนั้นเล่นกับความกว้าง แต่ฉันไม่สามารถรับภาพในมุมตรงข้ามได้ . require(ggplot2);require(gridExtra) A <- ggplot(CO2, aes(x=Plant)) + geom_bar() +coord_flip() B <- ggplot(CO2, aes(x=Type)) + geom_bar() +coord_flip() grid.arrange(A, B, ncol=1)

105 r  ggplot2  gridextra  gtable