ggplot中对齐图的危险性
问题 您如何将单独的图(GGPLOT2)与不同的Y轴和不同的绘图高度相结合,但保持对齐方式? 细节 将图与grid.arrange(方法1)与不同的y轴单元相结合时,它们不对齐.解决此问题的一种方法是使用gtable(方法2),但我无法调整图的相对高度. 示例 require(ggplot2) #Make two plots, with different y axis x = c(1, 5) y= c(.1, .4) data1
4 2024-01-23
编程技术问答社区
在R中,我怎样才能存储一个嵌套图,以便以后用grid.arrange来排列它?
我创建了一个图形,在其中我通过此命令插入另一个图(两个GGPLOT2对象): vp=viewPort(...) print(ggplotobject1) print(ggplotobject2, vp=vp) 这是我希望它如何的(一个大图(一个大图,带有自定义的小图在视口中指定的区域中绘制). 问题是,我以后需要使用此组合图,以再次与其他图一起通过: grid.arrange(arrangeGrob(..)) 有人知道我如何将合并的图作为grob存储? 确实非常感谢您! 编辑: 在这里回应Baptiste是一个可复制的例子: library(ggplot2) library(gtable) library(grid) data
4 2023-11-19
编程技术问答社区
不能禁止gridExtra的R标记输出(补充评论)。
在我的R Markdown报告中,我使用了2个块. 首先: ```{r, include = FALSE, echo=FALSE, results='asis'}``` 在哪里加载所有软件包并进行计算. 和第二个 {r, fig.margin = TRUE, fig.width=10, fig.height=4.5, echo=FALSE, results='asis', message=FALSE, warning = FALSE} 我有循环的地方,我在第一个块中过滤我生成的数据,并为每个i制作ggplots. 我的问题是,当我在第二个块中产生2个图时,我将它们结合在一个网格中,由Grid.Arrange.但是我不想显示其他评论. TableGrob (2 x 2) "arrange": 2 grobs z cells name grob 1 1 (1-2,1-1) arrange gtable[la
30 2023-08-11
编程技术问答社区
还有人注意到 tableGrob 的速度很慢吗?
我正在绘制数据库性能数据,主要是使用GGPLOT2.有8页相对复杂的图和2页的桌面.我刚刚启动了我的代码来弄清楚我在哪里花费时间,总共25秒钟,其中13秒在最后2页上,即tablegrobs.那25秒包括加载数据,对StringR进行认真解析等.这是输出的示例: 尽管这些时间的最后一页有75行和17列. 那么,这是别人看到的吗?是否有替代台面的替代方法可能更快? 我用来生产SQL表的代码是: sqlSummaryText1
16 2023-07-28
编程技术问答社区
R: gridExtra-如何将摘要绘制成表格?
我在绘制简单的摘要方面遇到了麻烦. library(gridExtra) SummaryTable 来自?tableGrob的第一个参数是矩阵或data.frame. t胁迫由summary返回的命名向量为具有尺寸一行的矩阵.另外,您可以使用as.matrix产生一个带有一列的矩阵. grid.newpage() grid.table(t(summary(mtcars$mpg))) grid.newpage() grid.table(as.ma
6 2023-07-27
编程技术问答社区
在 grid.arrange 的左上角找到标题
我有两个与gridExtra::grid.arrange并排布置的图.我可以用top参数将标题放在他们的顶部.问题是,我被要求在图的左上上找到标题. 可再现的示例: library(ggplot2) library(gridExtra) p1
10 2023-07-27
编程技术问答社区
R gridExtra 2.0.0:tableGrob 垂直和水平填充
我想知道如何在gridextra 2.0.0中做什么,我可以在以前的版本中更改表格宽度/高度填充,例如: grid.arrange(tableGrob(mtcars,padding.h=unit(1,"mm"),padding.v=unit(1,"mm"))) (对不起,我无法测试上面的代码 我不想缩小文本,只想将所有内容拧在一起,因此桌子适合将其放在PDF页面上. 我可以看到每个条目的"宽度"属性具有"+4mm" ,但是我不知道如何将它们更改为+2mm . 当然,如果有一个简单的"padding"我可以更改的属性. My question is in a similar vein as this one. 解决方案 您必须使用主题,并且作为 baptiste 注释,您可以使用ttheme_default显示默认主题的属性. ttheme_default() 将表"核心"的填充设置为1 mm: mytheme
8 2023-07-27
编程技术问答社区
绘制槽列表
披露:我不确定如何为这个问题做一个可再现的例子. 我正在尝试使用gridExtra软件包绘制grobs的列表. 我有一些看起来像这样的代码: ## Make Graphic Objects for Spec and raw traces for (i in 1:length(morletPlots)){ gridplots_Spec[[i]]=ggplotGrob(morletPlots[[i]]) gridplots_Raw[[i]]=ggplotGrob(rawPlot[[i]]) gridplots_Raw[[i]]$widths=gridplots_Spec[[i]]$widths } names(gridplots_Spec)=names(morletPlots) names(gridplots_Raw)=names(rawPlot) ## Combine spec and Raw traces g=list() for (i in 1:leng
10 2023-07-27
编程技术问答社区
GridExtra: 将文本向右对齐
我正在使用R. 我想对左侧的第二列的数量对齐,而不会更改第一列名称的对齐.是否可以? 谢谢! library(gridExtra) library(grid) names=c("name1","name2","name3","long name","very long name") values1=c(100000000,70000,20,600000000000000000,500) values1=format(values1,big.mark=".",decimal.mark=",",scientific=FALSE) d=data.frame(names=names,values1=values1) g1
10 2023-07-27
编程技术问答社区
如何在 R 中为使用 grid.arrange() 创建的每一列添加标题?
有人知道是否可以在用grid.arnange()创建的每一列图上给出标题? 我知道这可以给每个图提供一个总体标题和标题,但我只需要一个列标题. 非常感谢! grid.arrange(c1b, c2a, c3d, c2b, c3a, c2d, c3b, c1a, c1d, ncol=3, nrow=3) 解决方案 归功于 user20650 : library(tidyverse) library(gridExtra) #create a bunch of line graphs with the mtcars dataset graph1
8 2023-07-27
编程技术问答社区
R 抑制网格表中的角色名
我可以生产带有栅格的表: eg: library(gridExtra) grid.table(head(iris)) ,但这会产生Rownames 1:6. 有没有一种方法可以抑制rownames列,以免出现在表格中? 谢谢您的帮助. 解决方案 只需添加rows = NULL: grid.table(head(iris), rows = NULL)
8 2023-07-27
编程技术问答社区
R grid.table 栏标题字符旋转
我正在尝试使用网格.表格生成表格的图像,用于使用rstudio-knitr-pandoc放置在Word文档中.它很大,具有长列名称.我想完成的解决方案是将柱标题旋转到90垂直方向.这是否可以使用网格或任何其他方式? 我尝试了 toxinsGrob
12 2023-07-25
编程技术问答社区
网格垂直对齐Extra tableGrob (R 网格图形/grob)
在对齐网格图形对象时遇到一些困难 - 阅读了我能找到的所有文档,包括穆雷尔书,但没有成功.我认为我想做的事情很简单,所以希望我缺少简单. 这是一个可复制的示例,它将通过Hadley的hflights软件包中的目的地制造所有航空公司的PDF(镜像我在不同的数据集上要做的事情). require(hflights) require(gridExtra) require(Cairo) make_table
6 2023-07-25
编程技术问答社区
R: 删除 gridExtra 表中的重复行条目
问题: 我使用require("gridExtra") # Prepare data frame col1 = c(rep("A", 3), rep("B", 2), rep("C", 5)) col2 = c(rep("1", 4), rep("2", 3), rep("3", 3)) col3 = c(1:10) df = data.frame(col1, col2, col3) # Create table grid.arrange(tableGrob(df, show.rownames=F)) 输出: 问题: 我想摆脱重复的行条目并实现看起来像这样的跨越条目(此图像是用Photoshop制作的模型): 有什么想法在R? 中以编程方式实现这一目标 解决方案 我将使用gtable,并利用其更灵活的框架 require(gtable) require(plyr) ## build a rectGrob with parameters cell
24 2023-07-25
编程技术问答社区