gridextra

    3熱度

    1回答

    我想知道如何安排一個grob對象(表)到另一箇中。請看下面的例子: library(ggplot2) library(gridExtra) p1 <- qplot(data=mtcars, x = mpg, y = hp, facets = ~ hp, geom="point") t1 <- tableGrob(head(mtcars)) print(arrangeGrob(p1, t1

    2熱度

    1回答

    我想在r的gridExtra包中重新使用tableGrob對象的主題/模板/默認值。 library(gridExtra) tableGrob(df, cols = c("Custom Name", "Custom Name2"), show.rownames = FALSE, h.even.alpha = 0) tableGrob(df2, cols = c("Differ

    0熱度

    2回答

    雖然 作品就好了, test <- do.call("arrangeGrob", c(plots.list[1:2],ncol=2,main=textGrob("test"))) 提供了以下錯誤: "Error in arrangeGrob(list(grobs = list(list(x = 0.5, y = 0.5, width = 1, : input must be grobs!" 我

    1熱度

    1回答

    我正在嘗試使用grid.table生成表格的圖像,以便使用Rstudio-knitr-pandoc在Word文檔中進行放置。這是相當大的長列名稱。我想要完成的解決方案是將列標題旋轉90度。這是可能的與grid.table或任何其他手段? 我已經試過 toxinsGrob<-tableGrob(cyano.x.t,name='toxins',edits=gEdit(gPath='gpar.colte

    1熱度

    1回答

    我試圖用gridExtra在表格正文周圍放一個比較粗的線(比如lwd = 2)。這裏有一個從文檔page略有修改的MWE。 gtable正在開展工作,但gtable的文檔很薄;看代碼沒有多大幫助。 g <- tableGrob(iris[1:4, 1:3], rows = NULL) separators <- replicate(1, segmentsGrob(x1 = unit(0

    0熱度

    1回答

    每當我在R中使用tableGrob時,我無法垂直對齊內部文本的行,列& Row,但是對於水平選項存在,core.just =「left」 ... 有沒有辦法垂直對齊文本,因爲它始終居中。

    0熱度

    3回答

    的名單上調用grid.arrange這個問題是與這一個位置: Related post 我現在的問題是:在我的代碼通過調用lapply生成一個列表ggplots列表。我首先使用lapply,因爲我執行了相當多的類似ggplots,並且手動生成每個ggplots會非常麻煩。我如何概括我的代碼? p <- qplot(rnorm(30)) plist <- lapply(c(1:10),FUN=f

    2熱度

    1回答

    我試圖將多個ggplot2圖組排列成一個輸出/網格。我希望情節(不考慮標籤)是相同的大小。我找到了一種方法來做this,但是現在我想調整兩張圖之間的空間。 例如: 在這個情節,我想,以減少兩個地塊之間的空間量。我嘗試調整邊距,刪除滴答等,這已經刪除了一些空間。 有沒有一種方法來在諸如這些情況地塊之間的間距調整的更多的控制權? library(MASS) data(iris) library(g

    1熱度

    1回答

    我使用ggplot通過for循環創建了多個圖,並將每個圖保存到列表plots中。 plots <- list() for (i in 1:238) { gene <- row.names(geneExpression)[i] df.sub <- df[ , c("source", gene)] names(test.sub) <- c("source",

    0熱度

    2回答

    使用gridExtra包中的漂亮功能tableGrob()打包由Rmarkdown和knitr生成的html文檔中的表格時,存在以下問題。 這裏是一個重複的例子: library(datasets) library(dplyr) mtcars$cyl <- as.factor(mtcars$carb) carb.mpg <- mtcars %>% select(carb,mpg