如何在ggplot中叠加geom_rect和geom_boxplot？
在ggplot中叠加geom_rect和geom_boxplot可以通过以下步骤实现：
- 首先，确保已经安装了ggplot2包，可以使用以下命令安装：
install.packages("ggplot2")- 加载ggplot2包：
library(ggplot2)- 创建一个数据框，包含需要绘制的数据：
data <- data.frame(x = c(1, 2, 3, 4, 5),
y = c(2, 4, 6, 8, 10),
group = c("A", "A", "B", "B", "B"))- 使用ggplot函数创建一个基础图层，并指定数据和映射关系：
p <- ggplot(data, aes(x = x, y = y, fill = group))- 使用geom_rect函数添加矩形图层，可以通过指定xmin、xmax、ymin和ymax参数来确定矩形的位置和大小：
p <- p + geom_rect(aes(xmin = 1.5, xmax = 2.5, ymin = -Inf, ymax = Inf), fill = "gray", alpha = 0.2)- 使用geom_boxplot函数添加箱线图层，可以通过指定group参数来分组绘制箱线图：
p <- p + geom_boxplot()- 最后，使用print函数打印图形：
print(p)这样就可以在ggplot中叠加geom_rect和geom_boxplot了。在这个例子中，我们创建了一个包含x、y和group三个变量的数据框，其中x和y分别表示横轴和纵轴的值，group表示分组信息。然后使用ggplot函数创建一个基础图层，并指定数据和映射关系。接着使用geom_rect函数添加一个矩形图层，通过指定xmin、xmax、ymin和ymax参数来确定矩形的位置和大小。最后使用geom_boxplot函数添加箱线图层，通过指定group参数来分组绘制箱线图。最终使用print函数打印图形。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云计算服务：https://cloud.tencent.com/product/cvm
- 腾讯云数据库服务：https://cloud.tencent.com/product/cdb
- 腾讯云服务器运维服务：https://cloud.tencent.com/product/css
- 腾讯云音视频处理服务：https://cloud.tencent.com/product/mps
- 腾讯云人工智能服务：https://cloud.tencent.com/product/ai
- 腾讯云物联网服务：https://cloud.tencent.com/product/iotexplorer
- 腾讯云移动开发服务：https://cloud.tencent.com/product/mobdev
- 腾讯云存储服务：https://cloud.tencent.com/product/cos
- 腾讯云区块链服务：https://cloud.tencent.com/product/baas
- 腾讯云元宇宙服务：https://cloud.tencent.com/product/mu
相关·内容
1回答
我试着为不同的群体创造方块情节。我想在三个水平波段给背景着色。一个中心点，那里有接近整体平均值的所有观测结果。
平均(重量)-0.5<x<平均(重量)+0.5
另外两个波段分别是下面和上面的。
这是我的阴谋
library(ggplot2)
bp <- ggplot(data=PlantGrowth, aes(x=group, y=weight, fill=group)) + geom_boxplot()
bp
浏览 1提问于2015-04-26得票数 7
回答已采纳
对于这类数据：
set.seed(123)
df <- data.frame(
Q = c(rep("q_pol",10), rep("q_wh",10)),
slope = c(rnorm(10,-0.5), rnorm(10, 0.5)),
Recipient = rep(c("A", "B"),10)
)
如何将这些方块的主题(或背景)涂成两种不同的颜色:值>0的上半部分，例如，"lightblue"和值< 0的下半，例如“深蓝色”。
library(ggplot2)
ggplo
浏览 2提问于2022-01-11得票数 0
回答已采纳
2回答
我只是在尝试用R/GGPLOT2 2创建可视化。我正在尝试的图表是一个浮动条形图(一个使条形图从一个最小值变为一个最大值)。然而，叠加在这上面，我想要一个趋势线，是在一个第二轴。到目前为止，这是我的尝试：
# first, your data
table1 <- read.table(text = 'X A B C D E F G H I J K L
1 "BAR TOP" 31.5 31.8 30.3 28.0 24.9 24.4 21.7 20.9 24.5 25.4 26.0 28.7
浏览 2提问于2017-08-31得票数 1
回答已采纳
我想要绘制几个类别的箱图，如果有一个色带显示整个数据集的平均+/-标准差，我发现非常方便。
我可以很容易地获得这些值，并使用geom_hline()函数将它们放入绘图中，但是，我希望mean(x) + sd(x)和mean(x) - sd(x)之间的区域着色以获得更好的可见性。我在考虑在那里添加geom_ribbon()，但是我遇到了一个问题，我的值是cathegorical，我希望这些线完全覆盖x轴上的背景。
library(tidyverse)
library(reshape2)
df <- data.frame(
a = rnorm(1000, 20, 40),
b
浏览 0提问于2019-08-21得票数 1
我的问题是:我试图让坐标系统的一部分被阴影化，但是主要的网格线仍然是可见的(如img 1)。对于这个，我使用(因为没有更好的选项)。我有用于测试数据集的代码，如第一个代码片段所示。
当我用另一个data.frame，尝试相同的代码时，由于我使用了一个长程序和一些API(有关它的描述，请参阅下面的说明)，所以我无法共享它，而则没有得到相同(预期的)结果：阴影更深，更重要的是，它覆盖了网格线。
片段1:
test<-data.frame(a=c('1','1','2','2'),b=c(2,-2,4,-3),d=c('m
浏览 1提问于2017-05-19得票数 1
回答已采纳
我有这样的数据：
structure(list(diff = structure(c(113, 6, 0, -18, -4, -3, -3,
-6, -6, -250, -7, -27, -8, 0, 0, -4, 0, 2, -1, -3, 0, -5, -5,
-5, -5, -8, -8, -8, -1, -1, 0, -1, -11, 0, 0, 0, 0, -1, -7, -8,
-3, -11, -60, -1, 0, 0, 0, 0, -124, -123), class = "difftime", units = "days")), row
浏览 3提问于2021-05-11得票数 0
回答已采纳
2回答
我正在尝试使用alpha来控制图形填充的透明度。我知道alpha函数已经被移到scales包中了，但是我仍然不能让它工作。
数据集：
library(scales)
library(ggplot2)
Groups <- data.frame(Level=c("High", "Above Average", "Average", "Below Average", "Low"),
Start=c(7.5, 5.5, 4.5, 2.5, .5), End=c(
浏览 1提问于2012-06-17得票数 4
回答已采纳
我需要用不包含色彩美学的'Geom_Boxplot‘覆盖一个用颜色着色的'Geom_Point’。
我想把这些情节叠加起来
ggplot(Spheriod, aes(Cellline_Stim, Total.Area, colour = Experiment.No.)) +
geom_point(alpha = 0.8)
和
ggplot(Spheriod, aes(Cellline_Stim, Total.Area)) +
geom_boxplot()
我的尝试是：
ggplot(Spheriod, aes(Cellline_Stim, Total.Area,
浏览 10提问于2020-05-04得票数 0
回答已采纳
我正在用geom_rect来着色一个多面的盒子情节。当我用scale_fill_manual手动设置填充颜色时，我无法区分盒图填充和geom_rect填充，这会扭曲我的图例：
mtcars$type <- "Small"
mtcars$type[mtcars$cyl >= 6] <- "Medium"
mtcars$type[mtcars$cyl >= 8] <- "Big"
mtcars$type <- factor(mtcars$type)
mtcars$typeColor <- "
浏览 1提问于2013-10-17得票数 1
回答已采纳
我如何修改下面的代码，其中的“注释函数”只适用于oj部分。我的意思是( setosa.VC和versicolor.VC)
data("ToothGrowth")
data('iris')
iris2<-iris[c(1:10,50:60,100:110,61:70,11:20,111:118),]
big_data<-cbind(iris2,ToothGrowth) #dummy data
big_data$com <- with(big_data, interaction(Species,supp), drop = TRUE)
big_d
浏览 11提问于2017-08-14得票数 0
回答已采纳
我正在尝试使用ggplot来覆盖一些盒子图下的geom_rect。我希望灰色矩形将在箱形图的后面，但由于某些原因我不能这样做。
这是我使用的代码：
ggplot(data, aes(x = reorder(genotype, -Shann.div, FUN = median), y = Shann.div)) +
geom_jitter(color="black", size=0.3, alpha=0.9) + geom_boxplot(outlier.shape = NA, coef = 0) +
geom_hline(yintercept = avg, colo
浏览 4提问于2021-02-23得票数 0
回答已采纳
我有一个相当复杂的分面框图，我想让两个组更容易区分，例如，通过给分面的背景着色，但分组2 facet_grids也是可能的，或者在两个区域周围添加边界。
我尝试基于变量的因子来修改facet_grid中某些网格的背景颜色：
mtcars$type <- "Small"
mtcars$type[mtcars$cyl >= 6] <- "Medium"
mtcars$type[mtcars$cyl >= 8] <- "Big"
mtcars$type <- factor(mtcars$type)
mtcars$t
浏览 8提问于2013-10-17得票数 1
我想在方格图中画出相间的阴影/矩形，类似于本文中的第二张图片：
下面是我使用mtcar作为示例的代码。我将carb和cyl转换成因子，以更好地匹配我的真实数据和代码。
library(ggplot2)
odd_numbers <- seq(1,33,2)
mtcars$carb <- as.factor(mtcars$carb)
mtcars$cyl <- as.factor(mtcars$cyl)
ggplot(mtcars) +
geom_boxplot(aes(x = carb, y = mpg, fill = cyl), position = pos
浏览 2提问于2019-07-02得票数 0
回答已采纳
1回答
在这个例子中，我有一个简单的ggplot框图
library(ggplot2)
dat <- ToothGrowth
ToothGrowth$dose <- as.factor(ToothGrowth$dose)
p <- ggplot(ToothGrowth, aes(x=dose, y=len)) +
geom_boxplot() +
facet_grid(~supp)
p
目标：
我想要不同颜色的分位数框，如下图所示。
一个提示可能是这个链接：。
但我不知道如何才能解决这些问题。此外，我在我的情节中有一个facid_grid，在那里的颜色也应该是工作的。
浏览 6提问于2022-03-16得票数 1
回答已采纳
嗨，我想用R脚本创建一个类似的图表，如下所示：
摘自：
这是我在R中的代码：
library(ggplot2)
ifile <- read.table("C:/ifiles/test.txt", skip = 2, header = TRUE, sep="\t")
ifileVI <- data.frame(ifile["VI"], ifile["Site"])
x<-quantile(ifileVI$VI,c(0.01,0.99))
data_clean <- ifileVI[bfileVI$
浏览 0提问于2018-03-25得票数 4
回答已采纳
1回答
我正在尝试绘制一个小的多重迷你图，以便每个迷你图的背景根据一个变量(var4)进行着色。我可以用R中的ggplot来做这件事，但它不能很好地转换为Plotly。
ggplot(data, aes(x=var1, y=var2, group=var3, text=var3)) +
geom_rect(data = data, aes(xmin = -Inf, xmax = Inf, ymin = -Inf, ymax = Inf, fill = var4), alpha = 0.4) +
geom_line() +
scale_fill_gradient2(l
浏览 0提问于2015-02-13得票数 0
1回答
我有一个不同维度(A，B，C，D)的分数(从0到100)的数据集。使用以下代码： dat=stack(dat)
dat$ind <- factor(dat$ind,levels=rev(unique(dat$ind)))
ggplot(dat, aes(values,ind)) +
geom_boxplot() +
xlab("Dimension Score") +
ylab ("Dimension") 我创建了一个如下所示的图： ? 现在我需要突出显示每个维度的特定范围： A: 45 to 60
B: 70 to 85
C: 40 to
浏览 13提问于2020-10-21得票数 2
回答已采纳
有办法把两个不同x轴的情节叠加起来吗？
我有一个数据数据的收缩压的病人，在不同的日子，他们在服用不同的药物。我想在日期之前创建他们SBP的零散图，并在每种药物上叠加他们SBP的盒图。我分别创建了这两个地块，但不知道如何将它们合并成一个图形。
library(ggplot2)
library(lubridate)
df <- data.frame(date = c(ymd("2014-09-01") + c(1:5), ymd("2014-09-11") + c(1:5), ymd("2014-09-21") + c(1:5)), sbp1
浏览 6提问于2017-10-10得票数 0
回答已采纳
我想用ggplot2在R中创建一个图，其中有图形背景，使用geom_rect和刻面来创建漂亮的标签(我认为刻面带可以比x轴标签更清晰)。 我遇到的问题是将面框连接在一起，以删除它们之间的任何空间。我尝试使用theme(panel.spacing = unit(0 , 'lines')，但是这并没有完全消除小平面面板之间的空间。 require(ggplot2)
#Create a numeric Species variable for positioning the geom_rect objects.
iris$Species_num <- as.integer(
浏览 5提问于2020-12-18得票数 1
1回答
我有以下数据：
d <- data.frame(id = rep(2,6), type = c(letters[1:6]), abund = c(27.3,2.7,2.3,2.1,1.2,0.3))
id type abund
1 2 a 27.3
2 2 b 2.7
3 2 c 2.3
4 2 d 2.1
5 2 e 1.2
6 2 f 0.3
我想要在ggplot，中创建一个堆叠的，但是当我尝试时，它不能正常工作：
library(ggplot2)
ggplot(data = d, aes(x = a
浏览 0提问于2018-06-17得票数 1
回答已采纳
我想要制作一个方格图后的水平矩形(或以上的不透明度)。我不知道如何使用分类的x轴值来实现这一点，并强迫它扩展整个绘图区域的宽度。很有帮助，但我不知道如何将矩形扩展到绘图区域的边缘。
比方说，我们想在diamonds上做一个矩形，从3000美元到5000美元之间。我已经尝试了下面的代码，但它并没有扩展到情节的边缘。
rectangle <- data.frame(x = c("Fair","Good","Very good", "Premium", "Ideal"),
浏览 0提问于2018-09-15得票数 1
回答已采纳
为了对不同的组和整个人口进行基准测试，我尝试将人口箱线图的人口框添加到该图中。当轴是数值时，这很容易通过geom_area和geom_hline来实现
m <- median(mtcars$mpg)
Q1 <- quantile(as.numeric(mtcars$mpg), c(0.25))
Q3 <- quantile(as.numeric(mtcars$mpg), c(0.75))
ggplot(mtcars, aes(x=cyl, y=mpg))+
geom_rect(aes(xmin = -Inf , xmax = Inf , ymin = Q1 , ymax =
浏览 3提问于2013-05-29得票数 0
回答已采纳
1回答
R格图背景色盒
、、
我有一个像这样的数据：
value = runif(n = 1000)
type = rep(c("a","b","c","d"),250)
type2 = rep(c("a","b"),500)
number = sample(1:4, 1000, replace=TRUE, prob=c(0.25, 0.25, 0.25, 0.25) )
feature = c(rep("small",500),rep("big",500))
allResults <
浏览 1提问于2018-11-21得票数 1
回答已采纳
我希望灰色背景高亮显示与我插入到我的情节中的两条垂直虚线排列起来。我可以得到突出与"nd“和”个人电脑“，但我希望背景之间的两个时间点(前/后处理)。
我尝试将突出显示的边框识别为x= 1.5和4.5，就像我对虚线所做的那样，但结果是得到了"Error: Discrete value supplied to continuous scale"。
数据：
> dput(LipCon)
structure(list(ChillTime = structure(c(1L, 1L, 1L, 1L, 2L, 2L,
2L, 2L, 3L, 3L, 3L, 3L, 4L,
浏览 6提问于2017-06-20得票数 3
回答已采纳
是否可以在ggplot2中仅对条形图的一部分进行着色？
我想要横杆之间的彩色区域：“平均日最大值”和“平均日最小值”。这是我的数据：
temperature <- read.table(text = 'X 1 2 3 4 5 6
1 "Highest temperature" 31 40 39 34 39 42
2 "Mean daily maximum" 27 34 32 30 34 35
浏览 3提问于2018-11-25得票数 3
最简单的解释方法是通过这个图像：
我想要做一个叠加的图形，它显示(以值，而不是百分比)一个值的累积和随着时间的推移，同时，这个值的总“潜力”在背景中。
我认为数据集需要如下所示：
+------------+-------+------------------+-----------------+
| Date | Value | Cumulative Value | Potential Value |
+------------+-------+------------------+-----------------+
| 2017-01-01 | 100 |
浏览 0提问于2019-06-29得票数 2
回答已采纳
我试图在我的facet_wrap图的每一个偶数面板上得到阴影矩形。但是，当我使用geom_rect时，它只在第二个面板上生成矩形。我试过使用annotate和geom_tile，但没有成功。我想我在这里遗漏了一些简单的细节，可能是因为我的X变量是绝对的，而不是数字的，但是我已经和它斗争了几个小时了…
这是我的代码：
even_numbers <- seq(2,nrow(df.plt),2)
ggplot(df.plt) +
geom_rect(data = df.plt[even_numbers, ],
xmin = even_numbers - 0.5,
浏览 13提问于2022-07-04得票数 1
回答已采纳
1回答
我绘制了一个分组框图，并试图更改每个面板的背景色。我可以使用panel.background函数来改变整个情节背景。但是如何才能为单独的面板做到这一点呢？我发现了一个类似的问题，。但我没能在我的计划中采用密码。
我输入数据的前几行看起来像
代码
p<-ggplot(df, aes(x=Genotype, y=Length, fill=Treatment)) + scale_fill_manual(values=c("#69b3a2", "#CF7737"))+
geom_boxplot(width=2.5)+ theme(text = elem
浏览 0提问于2021-03-30得票数 2
回答已采纳
我想为时间序列创建一个盒子图，在这里我可以用矩形(geom_rect)对背景着色，并将标签指定为字符。
我可以绘制盒图，但是由于需要连续的缩放来指定矩形，所以我无法将标签绘制为字符。
在这里，我把我写的代码：
1:创建数据集
# load packages
library (dplyr)
library (ggplot2)
Order <- rep (seq (1:24), 100)
Values <- runif (2400, 0, 1)
Season <- rep ( (rep (c( rep("Spring", 3), rep ("Summer&
浏览 1提问于2016-08-06得票数 0
回答已采纳
我在R中有一个数据集，其中包括6个定量变量和另一个二进制变量。我的目标是，对于每一个转位变量，创建一个方格图来比较这个变量在二进制变量的两个级别上的值，我希望使用ggplot将这6幅图像放到R中的一个数字中。
考虑下面的例子来展示我正在说的话。到目前为止，我已经知道如何使用R中默认的“box图”函数来解决这个问题：
X = data.frame(a = c(rep("T", 5), rep("F", 5)),
b = rnorm(10),
c = runif(10))
par(mfrow = c(
浏览 0提问于2019-01-22得票数 1
回答已采纳
1回答
由于一些不清楚的原因，我必须画一个没有明显中值的盒子图。我如何做到这一点(首选使用ggplot，但如果有必要，我将切换到boxplot)请？
有关答复：
使用fatten参数:我尝试将胖参数设置为0，在回答之后。剩下一条细线。
使用geom_segment：我尝试使用方法将一个白色段叠加到中位数上。但是将白色段叠加到中线上是不能令人满意的，因为盒子的边缘也被擦去了。我认为这种方法使用boxplot是可行的，因为可以看到可以在不影响框的边缘的情况下改变中值的颜色。
浏览 2提问于2017-05-15得票数 5
回答已采纳
1回答
目标：绘制跨越绘图窗口的矩形(geom_rect)。
Problem：无法让ggplot2接受xlims。
示例
library(lubridate)
library(ggplot2)
#Data frame
df <- data.frame(time=seq(ymd_hm('2016-01-26 08:00'),ymd_hm('2016-01-26 18:00'), length.out = 100), y=rnorm(100), facto=rep(c('a','b'), each=50))
#Call to ggp
浏览 1提问于2016-01-27得票数 3
回答已采纳
1回答
我正试着做一张图解，并排显示三件事。首先是显示个人随时间的变化。接下来是显示他们的同龄人组随时间的变化。最后是显示整个人口随时间的变化。
每次观察我都有四个时间点。我想看到的是两组相邻的盒子，一组是同龄人，另一组是人群。覆盖在每一个上面的都是给定个人的数据点。每组将显示time1、time2、time3和time4上的数据。叠加的点将传达个体在每一时间所处的位置，因此信息可以用两组方框来传递。
下面是模拟我正在处理的数据类型的代码，以及我创建阴谋的无效尝试。
peer <- c(rep(1, 15), rep(2, 41))
year <- rep(c(1, 2), 28)
pct
浏览 3提问于2015-06-04得票数 3
回答已采纳
我可以使用ggplot2来生成这样的图，但它有点令人困惑，因为较大的框没有覆盖x的整个范围，并且人们将其解释为排除了第一组和最后一组数据。当与aes(group=1)一起使用时，geom_boxplot不响应width=参数。下面给出了一个示例。
library(ggplot2)
p <- ggplot(mpg, aes(class, hwy))
p +geom_boxplot()+geom_boxplot(aes(group=1),width=0.1,col="red",fill=NA)
我还在中打开了一个问题。
浏览 0提问于2017-01-19得票数 0
回答已采纳
我想要使用R中的ggplot创建一个方格图，我想要的是将不同的背景色设置为每个x值，例如下面的图像。我找不到任何选项来改变每个x轴的bgcolor。我唯一发现的就是改变整个背景色，比如'theme_bw()‘选项
在第一，第四，第五个x轴上，bgcolor是蓝色的。但是，在第二，第三，第六x轴上没有值，所以我想把红色设置为bgcolor。
耽误您时间，实在对不起!
浏览 3提问于2014-08-12得票数 0
回答已采纳
1回答
我目前正在使用ggplot绘制各种地图。我检查了以下轴线型是否可以使用oceanmap包在x轴和y轴上绘制，但我找不到使用ggplot实现这一点的方法。有没有办法将以下线型应用于ggplot中的x轴和y轴？
浏览 2提问于2021-06-25得票数 4
1回答
以mtcar数据为例，我生成了一个框图，并希望添加矩形。这是我的完整代码。 library(ggplot2)
d=data.frame(x1=c(1,3,1,5,4), x2=c(2,4,3,6,6), y1=c(10,10,20,14,30), y2=c(15,20,25,18,35), t=c('a','a','a','b','b'))
ggplot(mtcars, aes(x = as.factor(mtcars$carb), y = mpg)) + geom_boxplot() + geom_rec
浏览 74提问于2019-07-01得票数 2
回答已采纳
我有一盒数据，每个月有一组盒子图。但是，他们在一起很忙，不清楚哪一个盒子和哪个日期。有没有一种方法每隔一个垂直月淡灰一次，这样我就能很容易地看出哪一个月适合哪个月份？
编辑:我已经将geom_polygon用于我现在注释掉的情节的另一部分。
date <- seq(as.Date('2015-09-15'), as.Date('2016-09-30'), by = "2 days")
x <- rnorm(length(date))
date <- date[order(x)]
Date <- format(as.Dat
浏览 1提问于2021-05-26得票数 1
回答已采纳
我有一个非常基本的图表：
library(ggplot)
ggplot(mpg, aes(x=displ, y=manufacturer)) +
geom_point() +
geom_rect(aes(xmin=1.8, xmax=3.0, ymin='audi', ymax='audi', fill='red'))
我只想为y轴上的audi行添加一个从x轴值1.8到3.0的栏。有什么方法可以在ggplot中实现这一点吗？任何其他人可以在这个问题上提供的帮助，我们将不胜感激！
浏览 3提问于2020-05-21得票数 2
回答已采纳
在下面的图中，我希望将观察的数目(在本例中为40个)叠加在每个框图的顶部。当有fill美学时，下面的代码不起作用。文本需要水平调整(在这种情况下是1左，1中间，1右)，这样它们才能正确地覆盖相应的方框。
dt <- data.table(
x = factor(rep(1:2, each=120))
, f = rep(letters[1:3], 40)
, y = c(rnorm(120, 1:3), rnorm(120, 1:3*2))
)
table(dt$x, dt$f)
+--------------+
| a b c |
+------
浏览 4提问于2017-04-14得票数 1
回答已采纳
我在ggplot2中有一个条形图。我的数据集不平衡，我想在此图中添加一个部分，如下面output.png中所示。如何添加左第二灰色部分？下面请看我的代码和输出。
df2 <- data.frame(Class=rep(c("A", "B"), each=1),
AB_Event=rep(c( "Primary Output"),2),
Count=c(398, 4106))
p <- ggplot(data=df2, aes(x=AB_Event, y=Count
浏览 2提问于2021-07-08得票数 2
回答已采纳
2回答
我用一个类似于这个例子的因素来制作一个盒子情节：
p <- ggplot(mtcars, aes(factor(cyl), mpg))
p + geom_boxplot(aes(fill = factor(am)))
数据集中没有几个点，我想通过叠加数据点来直观地表达这一点。我想将用相同的"am“颜色表示的点叠加起来，我试图这样做：
p + geom_boxplot(aes(fill = factor(am))) + geom_jitter(aes(colour = factor(am)))
这些点是用"am“的因素着色的，但不是以间隔的形式放置在与之相关的方框上。相反，
浏览 3提问于2015-06-04得票数 3
回答已采纳
2回答
我想用ggplot2和自定义y限制绘制一个条形图。
Type <- LETTERS[1:5]
Y <- c(99, 99.5, 99.0, 98.8, 98.5)
df <- data.frame(Type, Y)
下面的代码对条形图很好：
library(ggplot2)
ggplot(data = df, mapping = aes(x = Type, y = Y, fill = Type)) +
geom_bar(stat = "identity") +
theme_bw()
但是，我不能设定y的限制。请看下面的代码。
ggplot(da
浏览 4提问于2017-12-23得票数 5
回答已采纳
我想使用geom_rect()用不同的背景色填充ggplot方面，但是对于这个传说的外观有一些不想要的副作用。我在这里尝试过引导()的帮助文件以及搜索和搜索答案，但是没有找到任何解决这个问题的方法。
例如，以这个数据集为例：
library("tidyverse")
expand_grid(A=1:3, B=1:3, iter=seq_len(50)) |>
filter(A!=B) |>
mutate(C = sample(c("c1","c2"), n(), TRUE), D = rnorm(n(), mean=
浏览 5提问于2022-01-26得票数 1
回答已采纳
1回答
我正在为2013、2014、2015三个不同年份绘制一个时间序列。
require(quantmod)
require(ggplot2)
getSymbols("AAPL", from='2013-01-1')
aapl.df = data.frame(date=time(AAPL), coredata(AAPL.Close))
ggplot(data=aapl.df, aes(x=date, y=AAPL.Close, group=1))+geom_line()
我如何在ggplot中绘制收盘价，这样每年都有不同的背景颜色地块在情节上？
浏览 1提问于2015-10-24得票数 5
回答已采纳
1回答
我有下面的代码来用plot绘图来绘制一些数据。我想知道如何在图中绘制一些背景颜色。例如，如果我能在第1组和第2组之间绘制灰色背景，在第16组和第18组之间绘制深灰色背景，那将是非常好的，我非常感谢任何帮助。致以问候。
dados <- read.table(text = 'subj var time group
1: 0.9995127 PT 0
2: 0.9994366 PT 0
3: 0.9997657 PT 0
4: 0.9996991 PT 0
5: 0.9938514 T1 1
6: 0.9985952 T1
浏览 0提问于2019-03-06得票数 0
回答已采纳
我所拥有的和我想要的
data<- data.frame(value= 1:10, Treatment= rep(c("A", "B"),5), Species=rep(c("alpha", "beta"), each=5))
众所周知，ggplot2::aes()函数可以根据引用的参数自动对数据进行分组，例如，ggplot(data=data)+geom_boxplot(aes(y= value, x= Treatment, fill=Treatment))通过Treatment对数据进行分离和分组。
并绘制成2不同的方
浏览 11提问于2017-10-17得票数 0
在当前版本的ggplot2中，框须图中的中线与其他行相比是粗体的：
library(ggplot2)
p <- ggplot(mtcars, aes(factor(cyl), mpg))
p + geom_boxplot()
我认为在一些较旧的版本中，情况并非如此。有没有办法单独调整中线的宽度？
浏览 2提问于2013-09-23得票数 1
回答已采纳
我正在使用ggplot，并试图添加一个带状以一个简单的矩形形式，我有一个条形图。这样做的目的是显示低于某一值的截止值。
酒壶很好，但我不能完全正确的丝带-我希望它显示得更宽一点，但它似乎被限制在条形图数据的宽度。
我尝试使用xmin和xmax，但这并没有增加阴影区域的宽度。
有没有一种显式控制geom_ribbon宽度的方法？
# Where df is a data frame containing the data to plot
library(cowplot)
ggplot(df, aes(x=treatments, y=propNotEliminated)) +
geom_ri
浏览 4提问于2015-07-08得票数 4
回答已采纳
当使用facet_wrap生成盒形图时，ggplot2在框之间留下了很大的空间。我想把它们弄得更宽。
library(ggplot2)
packageVersion("ggplot2")
ggplot(diamonds, aes(x = cut, y = price)) +
geom_boxplot(varwidth = FALSE) +
facet_wrap("color")
我认为这是因为它留下了空间，以防它需要绘制不需要在每个面板中绘制的因素层次的组合。为了检查这一点，我用一个新变量生成了一个类似的图，这个变量是cut by color，在x轴上
浏览 4提问于2017-11-09得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
