如何使用grid.arrange更改绘图大小
grid.arrange是R语言中的一个函数，用于将多个绘图对象组合在一起并在同一页面上显示。通过grid.arrange函数，可以更改绘图的大小。
要更改绘图的大小，可以使用参数width和height来指定所需的宽度和高度。以下是使用grid.arrange函数更改绘图大小的示例代码：
library(gridExtra)
# 创建两个示例绘图对象
plot1 <- ggplot(data = iris, aes(x = Sepal.Length, y = Sepal.Width)) +
geom_point() +
labs(title = "Plot 1")
plot2 <- ggplot(data = iris, aes(x = Petal.Length, y = Petal.Width)) +
geom_point() +
labs(title = "Plot 2")
# 使用grid.arrange函数组合并更改绘图大小
grid.arrange(plot1, plot2, ncol = 2, width = 8, height = 4)在上述示例中，我们首先加载了gridExtra包，然后创建了两个示例绘图对象plot1和plot2。接下来，我们使用grid.arrange函数将这两个绘图对象组合在一起，并通过设置参数ncol为2将它们排列在一行中。最后，我们使用参数width和height将绘图的大小设置为8英寸和4英寸。
这样，我们就可以使用grid.arrange函数更改绘图的大小。在实际应用中，可以根据需要调整width和height的数值来满足具体的要求。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云官网：https://cloud.tencent.com/
- 云服务器CVM：https://cloud.tencent.com/product/cvm
- 云数据库MySQL：https://cloud.tencent.com/product/cdb_mysql
- 云原生应用引擎TKE：https://cloud.tencent.com/product/tke
- 人工智能平台AI Lab：https://cloud.tencent.com/product/ailab
- 物联网平台IoT Hub：https://cloud.tencent.com/product/iothub
- 移动开发平台MPS：https://cloud.tencent.com/product/mps
- 云存储COS：https://cloud.tencent.com/product/cos
- 区块链服务BCS：https://cloud.tencent.com/product/bcs
- 腾讯云元宇宙：https://cloud.tencent.com/solution/virtual-universe
相关·内容
我在设计绘图方面是个新手，我尝试过用以下工具构建barplot：
bar <- ggplot(month1, aes(x=variable, y=value, fill=merge1)) + geom_bar(stat="identity")
bar_f <- bar + ggtitle("k = 0") + theme(axis.text=element_text(size=12, color="gray0"),
axis.title=element_blank())
+ scale_y_continuous(breaks=
浏览 1提问于2018-04-12得票数 2
1回答
我有几个情节，都是从不同数字的侧面构建出来的，但都有固定的高宽比(见图)。我如何将它们合并在一个图中，其中各个方面具有相同的大小，同时最小化未使用的空间(这里是绿色的)。
我试着用cowplot::plot_grid和rel_hight、rel_width和填充图来做。什么样的作品，但是乏味的，并取决于最终的图像大小(ggsave宽度)。感觉必须有一个更有力和可靠的方法来实现这一点吗？
#Combing the Plots
plot_grid(
plot_grid(p1,p2, nrow = 2, rel_widths = c(1,1), labels = c(&
浏览 7提问于2022-05-19得票数 0
关于如何使用grid.arrange增加两个地块之间的空间，我似乎找不到解决方案。我找不到任何关于如何进行的线索。我不想改变地块的大小或任何类似的东西。
grid.arrange(plot1, plot2, ncol=2)
(下面的内容是后来添加的)：
这是我拥有的代码：
x11()
cs <- grid.arrange(arrangeGrob(b, a, ncol=2, top = textGrob(
"B", vjust = 0.5, hjust = 19.5, gp = gpar(
f
浏览 0提问于2016-09-15得票数 15
回答已采纳
我使用Rmarkdwon并排添加了这两个(ggplot)图，但由于我不想复制轴标签，因此右边的条形图区域变得比左边的更宽。你知道如何在不改变高度的情况下手动调整宽度吗(编织成pdf，见下面的例子)？ ```{r, F-ES3-reg-SS, fig.cap ="2 figures.", fig.subcap = c("F.a", "F. b"), out.width = '50%', message=FALSE，echo=FALSE，results='hide'} F_reg_ES3_PS F_reg_ES3
浏览 21提问于2019-10-01得票数 0
回答已采纳
1回答
我使用的是R编程语言。我在ggplot2中制作了几个绘图，现在我尝试将它们排列在同一个页面上： library(dplyr)
library(ggplot2)
date= seq(as.Date("2014/1/1"), as.Date("2016/1/1"),by="day")
var <- rnorm(731,10,10)
group <- sample( LETTERS[1:4], 731, replace=TRUE, prob=c(0.25, 0.22, 0.25, 0.25) )
data = data.fram
浏览 13提问于2021-01-13得票数 0
回答已采纳
如何增加具有一个基于系数的轴和一个数值轴的图表的灰色绘图区域，以便geom_text()绘图中的文本标签显示在视图中，并且不会延伸到绘图区域之外？
特别是，我想扩展灰色区域，以便在绘图区域中提供一个允许文本标签完整显示的空白区域。
还是有更好的方法？
浏览 1提问于2012-09-18得票数 15
1回答
我在文档中找不到任何东西。代码
library("Vennerable")
data(StemCell)
Vstem <- Venn(StemCell)
Vstem3 <- Vstem[, c("OCT4", "SOX2", "NANOG")]
tl <- "masi"
plot(Vstem3, doWeights = TRUE, type = "circles")
尝试失败
plot(..., main = tl)
plot(..., title = tl)
plot
浏览 7提问于2016-11-14得票数 8
回答已采纳
1回答
从列表R中提取图
、、、
我做了一个函数：
mtcars_plot_fun <- function(cyl_in, gear_in) {
car_data <- mtcars %>%
filter(cyl == cyl_in,
gear == gear_in)
p <- car_data %>% ggplot(aes(x = disp, y = qsec, fill = gear)) +
geom_point()
print(p)
}
然后是生成绘图并将其存储在列表对象gg_obj中的循环
cyls <- c(4, 6)
gear
浏览 4提问于2021-05-12得票数 0
1回答
我想把一个boxplot放在直方图下面。我已经想出了如何做到这一点，但是boxplot和直方图大小相等，我想精简boxplot。当我缩小宽度时，边缘的空格保持不变。不过，我想缩小整件事的宽度。
，这是我到目前为止拥有的：
library(ggplot2)
h = ggplot(mtcars, aes(x=hp)) +
geom_histogram(aes(y = ..density..)) +
scale_x_continuous(breaks=c(100, 200, 300), limits=c(0,400)) +
geom_density(, linetype="dot
浏览 1提问于2014-03-31得票数 2
回答已采纳
1回答
我正在尝试使用R中的ggplot2一次显示多个图。
数据中有200多个城市，但我只创建了一个随机样本数据，如下所示：
#sample data
df <- data.frame(
city = c('paris', 'tokyo', 'seoul', 'shanghai', 'berlin', 'rome')
, week = c(41,42)
, type = c('A','B','C')
, count =
浏览 2提问于2016-11-02得票数 0
我正在构建一个图，其中每个点都具有基于两个单独列中的线性渐变的大小和颜色
df1 <- data.frame (x = c(1:10), y = c(1:10), pointSize = 1:10, pointCol = 1:10)
ggplot(df1, aes(x = x, y = y, colour = pointCol, size = pointSize)) + geom_point() +
scale_colour_gradient(low = "steelblue", high = "yellow")
表中编码颜色和点大小的列的最大值是
浏览 1提问于2017-10-17得票数 2
我正在尝试整理来自qicharts的多个图表。通过一些工作，我得到了它，所以grid.arrange可以做任何事情，但它只显示最后一项，而不是两项都显示。
library(qicharts)
library(grid)
library(gridExtra)
y <- rnorm(24, 12, 3)
a <- qic(y,chart="i")
b <- qic(y,chart="mr")
grid.arrange(grob(plot(a)),grob(plot(b)))
浏览 9提问于2016-09-19得票数 1
回答已采纳
我已经生成了一个包含25个ggplot元素的列表，我想将它们全部绘制在一个页面上。由于我找不到一种使用par()的方法来绘制图，所以我使用了gridextra包，特别是函数grid.arrange()。 对于base-R的plots....My尝试，它不如par()方便，我想知道是否有更有效的方法来编写它？ 提前感谢！ plot_collection <- grid.arrange(DBScan_plots[[1]], DBScan_plots[[2]], DBScan_plots[[3]], DBScan_plots[[4]], DBScan_plots[[5]],
浏览 24提问于2020-09-11得票数 0
回答已采纳
1回答
锁定部分网格的纵横比
、、、
我正在尝试写一个函数，我们的公司徽标在导出时自动添加到每个图形中，作为函数的一部分，在标题和副标题旁边。每个输出的大小将取决于当时的需求，因此设置一个大小并不是特别有帮助。
为了做到这一点，我已经生成了一系列网格，将所有内容放在一起，如下所示(使用虹膜数据集)。
library(datasets)
library(tidyverse)
library(gridExtra)
library(grid)
library(png)
m <- readPNG("Rlogo.png") # download from: https://www.r-project.org/logo
浏览 9提问于2018-02-14得票数 3
回答已采纳
2回答
在ggplot2中，如何将情节标题放在情节的底部。
qplot(rnorm(100)) + ggtitle("My Title")
将标题放在绘图的中间和顶部，而我希望它位于图的中间和底部的。
浏览 5提问于2015-05-04得票数 13
回答已采纳
我是ggplot2的新手，我有一个问题我找不到答案。我已经创建了以下玩具数据来帮助解释：
data <- data.frame(tech=c(rep(letters[1:15],2)),
sep=c(rep(c("SitutationA", "SitutationB"),each=15)),
error=c(runif(15,min=-0.2, max=0.5), runif(15, min=0.3, max=1)))
我想绘制一个geom_bar图，显示使用facet_grid划分为两种不同情况(SituationA和Situat
浏览 1提问于2013-03-19得票数 1
3回答
我有几个主题，我需要为其生成一个图，因为我有许多主题，我希望在一页上有几个图，而不是一个主题的图形。以下是我到目前为止所做的工作：
读取包含主题名称的txt文件
subjs <- scan ("ListSubjs.txt", what = "")
创建保存地块对象的列表
pltList <- list()
for(s in 1:length(subjs))
{
setwd(file.path("C:/Users/", subjs[[s]])) #load subj directory
ifile=paste("C
浏览 1提问于2015-02-17得票数 5
在我的shinydashboard中，我希望我的模式窗口显示49个temp1，它们都存储在list list中。我可以让模式窗口显示任何绘图，如下所示：
observeEvent(input$modalTrigger1,
{
temp1 <- plotList(data)
showModal(modalDialog(plotOutput("trigger1plot1")))
output$trigger1plot1 <- renderPlot(temp1[[1]])
}
)
但我想创建一个for循环，当按下modalTrig
浏览 2提问于2017-06-12得票数 0
我有一个两行的图形，它是由第一行的一个图和第二行的一个情节列表组成的。
有了knitr我就做了
\documentclass{article}
\begin{document}
<<plots, fig.width='\\textwidth', echo = FALSE, fig.height=5, fig.width = 10, warning = FALSE>>=
require(ggplot2)
plot <- ggplot() + geom_point(data=cars, aes(speed, dist)) + labs(x=NU
浏览 2提问于2016-03-13得票数 3
回答已采纳
2回答
并排两列的方框图
、、
我有以下格式的数据集
value1 value2 group
10 20 A
20 30 A
67 45 B
98 76 C
102 11 A
11 22 B
10 10 B
19 20 C
我试着为三组(A，B和C)制作盒子样地，而第一列和第一列的方框应该并排。我可以做两个像下面这样的单独的情节，但无法搞清楚如何将它并排放在一起。
p1 <- ggplot(x, aes(x=group, y=value1)) + geom_boxplot()
p2 <- ggplot(x, aes(x=group, y=value)) + geom_boxplot()
我很感谢你的帮助。我是R和
浏览 3提问于2021-05-28得票数 0
回答已采纳
我有这样的代码：
plotfn= function(u) {
flt = filter(d, utensil ==u)
ggplot(flt,aes(x=p)) + geom_histogram(binwidth = 0.5, position= position_dodge(0.5), color="black",fill="cadetblue4")+ ggtitle("Histogram of P")+labs( x="P", y="Number of Observations")
}
lapply(u
浏览 3提问于2017-04-12得票数 7
回答已采纳
我正在尝试自动化一系列的分析，这些分析的目的是保存一些地块供以后检查。其中一个地块将附有一张价值表。我希望它们在相同的pdf中，这样用户就不必在文件之间跳转。
我已经检查了许多关于将数据帧输出到pdf的问题，以下是现有答案在我的例子中不能令人满意的两个原因：
不熟悉针织品/汗衫
批量生成数字意味着我不能通过RStudio查看器手动完成
基于grid.table的解决方案不会生成整个表。
这就引出了我的问题，比如说我有一张比例为48x5的桌子。如果我尝试用grid.table(geno)绘制它，它会产生一个裁剪表，在中间显示大约20-30行。如果我使用grid.table(g
浏览 0提问于2016-08-02得票数 2
我绘制了几个随机游动的时间序列图，现在我知道如何提取其中的某一部分，以及如何将滴答从几年变成几个月。但是即使经过长时间的测试，我也无法正确地操作图形中的x轴。
现在，它显示50年的步骤，只有每一秒白色垂直网格线被标记(为什么？在我看过的每一个教程中，所有的行都有标签)。我想要实现的是改变比例，这样水平使用的空间就更少了(即减少x轴上所有滴答之间的空间)，所以第一个滴答是在2000年，第二个(而不是现在的情况)在2050年，依此类推。我认为这在breaks中应该是可以实现的，但我无法理解。最后，情节的开始和结束太早在左边和右边，但我相信我能处理。
情节如下：
set.seed(21)
n &l
浏览 9提问于2016-05-21得票数 1
回答已采纳
1回答
我编写了一个for循环来生成一个图表矩阵，但是我编写了如下代码
par(mfrow = c(4, 4))
for (i in c(6:17)) {
print(ggpubr::ggboxplot(logdat,
x = "Diagnostic",
y = names(logdat)[i] ,
color = "Diagnostic",
add
浏览 1提问于2018-10-02得票数 0
回答已采纳
我想在一个图上组合多个等高线图。我的代码如下所示。
d1<- read.table("/home/amy/Desktop/data.csv",sep=",",header=T)
ax<-d1$c1
ay<-d1$c2
library(MASS)
density1 <- kde2d(ax, ay)
par(mfrow=c(1,2))
filled.contour(density1, xlab= "x axis",
ylab= "y axis ", main ="first plot",
浏览 0提问于2016-02-17得票数 0
我正在尝试使用ggplot2和annotation_custom嵌入一个图(这个图实际上是我用来替换图例的一个地图)。然而，我也使用facet_wrap来生成多个面板，但是当与annotation_custom一起使用时，这会在每个方面中再现情节。是否有一种简单的方法只插入一次地块，最好是在绘图区域之外？
下面是一个简单的例子：
#Generate fake data
set.seed(9)
df=data.frame(x=rnorm(100),y=rnorm(100),facets=rep(letters[1:2]),
colors=rep(c("red&
浏览 9提问于2013-10-30得票数 0
回答已采纳
2回答
我有四幅图，我想用同样的数字来绘制：
library(gridExtra)
grid.arrange(plot1,plot2,plot3,plot4)
默认情况下，grid.arrange将在顶部绘制前两个图，在底部绘制另外两个。例如，有没有办法把所有四个情节都画在一起？
浏览 7提问于2014-02-22得票数 2
回答已采纳
我使用来自的函数将表单graph<-ggplot(...)的众多图形与行叠加起来
png(filename = "qwerty.png", width = 1024, height = 1024, units = "px",
pointsize = 11, bg = "white", res = 150)
multiplot(graph1,graph2,...., layout=matrix(c(1,2,3,4,5,6,7,8), nrow=8,
byrow=TRUE))
dev.off()
我想在第一张图
浏览 0提问于2015-03-11得票数 1
回答已采纳
2回答
我正在尝试构建一个ggplot图形列表，稍后将绘制该列表。到目前为止，我以Anscombe的四重奏为例，是： library(ggplot2)
library(gridExtra)
base <- ggplot() + xlim(4,19)
plots = vector(mode = "list", length = 4)
for(i in 1:4) {
x <- anscombe[,i]
y <- anscombe[,i+4]
p <- geom_point(aes(x,y),colour="blue")
q <
浏览 19提问于2021-08-03得票数 0
我希望使用ggplot2实现以下绘图配置，其中红色区域是绘图的“主要”图形，蓝色区域是一个完全不同的图形，我希望在显示的比例中包含该图形。这两个图形都是正方形的。 ? 我知道这在基数r中是可能的，但不知道这在ggplot中是否可行。这有可能吗？如果是这样的话，我如何在一个图中得到两个这样配置的空白图呢？
浏览 11提问于2020-08-22得票数 0
回答已采纳
我在使用rasterVis和gridExtra在R中绘制地图时遇到了困难。这是我的代码的样子(对不起，它肯定不是很优雅)：
require(rasterVis)
require(gridExtra)
p1 <- levelplot(avit_bac12, margin=FALSE, xlab=NULL, ylab=NULL, par.settings = RdBuTheme, main=NULL, scales=list(draw=FALSE))
p2 <- levelplot(avit_bac17, margin=FALSE, xlab=NULL, ylab=NULL, p
浏览 18提问于2019-08-22得票数 1
回答已采纳
2回答
必须绘制：
pl1 <- qplot(x=trade.date, y=price1, data=finalfutff, geom='line')+scale_y_continuous(name='')+scale_x_date(name='', expand=c(0,0))+opts(panel.background=theme_rect(),panel.grid.major=theme_blank(), panel.grid.minor=theme_blank(), plot.margin = unit(c(1,0,0,0), "
浏览 5提问于2011-05-26得票数 2
我正在尝试使用ggplot2和gridExtra并排绘制平面图。但是，所生成的地块没有缩放/对齐，见下面的图片和代码。
我如何才能产生这样的数字，使细胞是对齐的，具有相同的维度？
Code
library(ggplot2)
library(gridExtra)
## make date frames
one <- floor(runif(56, min=0, max=5))
data.one<- cbind(one,expand.grid(h = seq(1,8,1), w = seq(1,7,1)))
two <- floor(runif(35, min=0,
浏览 0提问于2018-07-06得票数 2
回答已采纳
我已经用网格创建了一个qicharts2图的网格，但是当我尝试用PowerPoint发送它时，我得到了这个错误。
doc_parse_raw中的错误(x，编码=编码，base_url = base_url，as_html = as_html，：StartTag:无效元素名称68
这是我的密码：
library(qicharts2)
library(gridExtra)
library(officer)
library(rvg)
#24 random numbers from a normal distribution for example.
y1 <- rnorm(24)
y2
浏览 0提问于2018-01-23得票数 3
回答已采纳
我正在研究一个具有两个连续预测因子的logistic回归模型。我想使用ggplot2和利用facet_wrap来呈现结果，以显示使用多个级别的分类预测器的回归线。我知道我可以使用stat_smooth来拟合曲线，但我的问题是，我的预测值之间的关系根据组的不同而不同，因此我既有显着的线性项和二次项，也有不显着的关系。我编写了一个函数，允许我根据时间将正确的曲线拟合到我的数据中，而不是拟合到每个方面。但是，我如何使用facet_wrap应用这一点，并将不同的回归线(线性或二次)添加到每个方面？
举个例子：
data <-data.frame (x=c(21.0,21.0,22.8,21.4,
浏览 2提问于2014-09-30得票数 0
我遇到了一个问题，当保存一个to图为pdf。我想把两个ggplot2图像并排绘制成一个使用pdf()的pdf。然而，在pdf中没有出现任何内容。有没有办法将grid.arrange()对象与pdf()一起使用？
再现问题的示例代码：
library(ggplot2)
library(gridExtra)
p1<-ggplot(mtcars, aes(mpg))+stat_ecdf()
p2<-ggplot(mtcars, aes(cyl))+stat_ecdf()
p3<-grid.arrange(p1,p2, ncol=2)
浏览 5提问于2022-07-13得票数 0
1回答
尝试将多个绘图绘制为PDF时出现错误。我已经使用中的代码创建了我的循环，但是我不确定是什么导致了这个错误。
PDF编译完成，但它只是一张1页的空白。我已经重新创建了下面的问题，它似乎是一个数据维度问题，但我不清楚它应该如何解决。可以从绘图查看器手动将绘图保存到PDF，但它似乎在循环中失败了。我的期望是得到一个3页长，每页一个图表的PDF。
library(ggplot2)
library(naniar)
library(visdat)
library(gridExtra)
p = list()
head(iris)
p[[1]] = gg_miss_var(iris)
p[[2]] =
浏览 8提问于2020-03-11得票数 1
回答已采纳
我正在尝试使用ggplot2绘制多个绘图，并使用grid.arrange()对它们进行排列。由于我设法找到了描述我所遇到的确切问题的人，我引用了来自的问题描述
当我在grid.arrange()之后使用ggsave()时，即
grid.arrange(sgcir1，sgcir2，sgcir3，ncol=2，nrow=2) ggsave("sgcirNIR.jpg")
我没有保存网格图，而是保存了最后一个单独的ggplot。有没有什么方法可以使用ggsave()或类似的东西来保存grid.arrange()显示的绘图？而不是使用旧的方法
jpeg("sgcirNIR
浏览 509提问于2013-06-12得票数 156
回答已采纳
背景
我想改变ggplot使用的主题，但是我很难理解theme_update()文档和示例。
我使用align_plots()将一个盒子图放在密度图上，但我发现这些代码都没有造成错误，只留下了一个最小的例子。我怀疑错误是由使用theme_blank()引起的，但我不知道为什么会发生错误，也不知道如何修复它。
因此，在这里，我提供了一个最小的可重复的错误示例，我正在得到：
library(ggExtra)
align.plots(qplot(1))
但在我更新主题之后，它就中断了：
newtheme <- theme_update(axis.text.y = theme_blank(),
浏览 6提问于2011-03-28得票数 8
回答已采纳
我尝试使用for循环来筛选(="TAB_tmp2")，并在列表(="ListeGRAPH")中添加新的图。我认为问题来自过滤器数据表(="TAB_tmp2")的差异。
我在网上读过几个关于这方面的话题，但我找不到一个在这种情况下可行的解决方案。
我的代码：
rm(list=ls()) # delete objects
#====================================
# Create data for the example
#====================================
TAB =
浏览 1提问于2018-12-05得票数 0
回答已采纳
我不明白为什么这不起作用，或者我需要什么才能让它起作用。
为了重现，创建一个简单的WPF应用程序并替换主窗口的构造函数：
public MainWindow()
{
InitializeComponent();
// simple visual definition
var grid = new Grid { Width = 300, Height = 300 };
var text = new TextBlock
{
浏览 27提问于2009-12-10得票数 20
回答已采纳
我想使用ggplot2创建散点图矩阵。我部分地处理了我的问题。我使用ggplot2创建了三部分图:下三角-散点图、对角变量名称和上三角相关系数(R^2)。下面我给出一段数据+生成图表的代码。我的数据：
f =
C xval V yval corr V1
1 1622 1 1622 1 2ng
1 1622 2 1639 0.997 2ng
1 1622 3 1584 0.992 2ng
1 1622 4 1549 0.99 2ng
1 1622 5
浏览 7提问于2016-02-09得票数 4
回答已采纳
1回答
我对R很陌生，很难理解如何处理本地和全球环境。我检查了局部变量和全局变量的，但是找不到它。
例如，如果我想使用一个函数制作几幅图，并将它们保存如下：
PlottingFunction <- function(type) {
type <<- mydata %>%
filter(typeVariable==type) %>%
qplot(a,b)
}
lapply(ListOfTypes, PlottingFunction)
并没有产生预期的结果。我试着使用assign()函数，
浏览 2提问于2015-12-21得票数 2
回答已采纳
我刚刚在我的Mac上更新了R、R Studio和一堆包，包括ggplot2和gridExtras。现在gridExtras在基本绘图中失败，并显示以下错误：
“gList”中仅允许“grobs”
下面是一些应该可以工作但却不能工作的代码：
library(ggplot2)
p1 = qplot(1:10,rnorm(10))
p2 = qplot(1:10,rnorm(10))
library(gridExtra)
grid.arrange(p1, p2, ncol=2, main = "Main title")
这将转储以下错误：
Error in gList(list(gr
浏览 4提问于2016-01-17得票数 43
回答已采纳
在base R中，我有一些代码可以在图表下面写一个统计表。我想用一个'ggplot‘图表和一个'gt’表做一个类似的过程。做这件事最好的方法是什么？我下面使用gridExtra的尝试失败了。 # load requried packages
require(tidyverse)
require(gt)
require(gridExtra)
# make a ggplot chart
GGP <- ggplot(dat = iris, aes( x= Sepal.Width, y = Sepal.Length, colour = Species)) + geom_p
浏览 33提问于2021-07-25得票数 3
回答已采纳
1回答
我正在尝试给我的维恩图添加一个主标题和一个副标题，这个图是我用R创建的，我已经阅读了R‘VennDiagram’包的文档，但没有成功。我还尝试将gird.arrange()与textGrob和结果代码中的图形一起使用，但收到了一个错误，指出所有输入都必须是grobs。
require(VennDiagram)
draw.triple.venn(
area1 = 396,
area2 = 273,
area3 = 147,
n12 = 266,
n23 = 86,
n13 = 143,
n123 = 83,
category = c("Study"
浏览 5提问于2014-01-18得票数 13
回答已采纳
1回答
链接解释了如何在同一个总体图中绘制多个图。
现在我有三个现有的图，png1，png2，png3。我想要像下面这样的布局。如何做到这一点？
非常感谢您的回答，请记住安装这些软件包：
install.packages("png")
library(png)
install.packages("gridExtra")
library(gridExtra)
在使用gridExtra之后，我将三个图表组合在一起。然而，它们的分辨率很低。我怎样才能使他们至少与原来的决议相同呢？
浏览 0提问于2018-05-13得票数 1
回答已采纳
如何在windows系统下将图形保存为a4大小的pdf文件？在R中，将图形保存为a4文件很容易，但是如何将其保存为pdf大小的文件呢？
浏览 2提问于2013-05-28得票数 11
我正在尝试创建一个在函数体中包含ggplot的函数，并在每次调用中生成两个或更多绘图。 我已经采取了最初测试我的函数的方法，只生成了一个绘图，并且它已经工作了。我已经在函数外部调用了我的绘图，以确保我对它们进行了正确的编码，并且它们在单个基础上工作。以下代码仅生成y轴缩放为1的单个条形图，没有错误： library(tidyverse)
cat_plots <- function(dat, var1, var2){
nums <- ggplot(dat) + geom_bar(aes_string(var1, fill = var2))
props <- g
浏览 13提问于2019-06-07得票数 0
回答已采纳
我正在使用来自fpp2软件包的数据集和来自预测软件包的预测函数的组合进行森林预测。此预测的输出是带有SNAIVE_MODELS_ALL的对象列表。此对象包含两个系列的独立数据，其中第一个是电力，第二个是水泥。你可以看到下面的代码： # CODE
library(fpp2)
library(dplyr)
library(forecast)
library(gridExtra)
library(ggplot2)
#INPUT DATA
mydata_qauselec <- qauselec
mydata_qcement <- window(qcement, start = 195
浏览 84提问于2019-08-28得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
