使用多个变量绘制geom bar时的一个问题
在使用多个变量绘制geom bar时，可能会遇到一个问题。这个问题是当我们有多个变量需要在同一个图表中展示时，如何正确地设置x轴和y轴的映射关系。
解决这个问题的方法是使用“堆叠”或“分组”两种方式来展示多个变量。具体选择哪种方式取决于数据的特点和展示的需求。
- 堆叠方式（Stacked）：
- 分组方式（Grouped）：
综上所述，使用多个变量绘制geom bar时，可以选择堆叠方式或分组方式来展示。堆叠方式适用于比较总量和占比的情况，推荐使用腾讯云云服务器、腾讯云数据库、腾讯云对象存储等产品。分组方式适用于比较差异和趋势的情况，推荐使用腾讯云云函数、腾讯云容器服务、腾讯云人工智能等产品。
相关·内容
我正在研究别人的工作，但理解这行代码的目的时遇到了问题：
ggplot(data, aes(x = Group, y = Value)) + geom_bar(stat="identity", position = "dodge", lwd = 1, aes(fill = Group))
以下是数据的一个示例
Group Value
1 A 20
2 B 74
3 B 50
...
n A 24
我认为使用代码的目的是绘制一个条形图，总结A组和B组的值。但是，我认为A组和B组的每个元素都绘
浏览 15提问于2020-03-09得票数 0
2回答
我试着用ggplot2制作一个条形图，但是有问题。
基本上，我想要生成一个水平条形图，包括：
Y轴的地理位置；
沿x轴的人口数。
但是，我有一个具有以下结构的dataframe：
data.frame(Park = c("Northumberland","South Downs","Dartmoor"),
count = c(22.5,24.4,26.0))
和预期的一样，人口数是直接绘制到x轴上，而我希望它在y轴上绘制。
有什么想法吗？
对不起，这是个简单的问题。
浏览 2提问于2017-09-20得票数 2
回答已采纳
这是一个名为P的大型数据集的峰值，其中有10个特许权(CS)，它们具有不同的商店(SHP)和几个数值。数据集按周(WK) 2 tm 52列出它们。它会创建一个大文件。进入前6行的峰值：
WK,MND,CS,SHP,RevCY,RevLY,TCY,TLY,ACY,ALY
=========================================
2,JAN,AAA,AAA Shop 1,16834,16686,1837,1983,2853,3002
2,JAN,AAA,AAA Shop 2,95919,114696,9742,11813,20521,24673
2,JAN,BBB,
浏览 1提问于2014-01-23得票数 3
回答已采纳
1回答
我试图想出一种简洁的方法来绘制一个R数据框架中所有列的网格视图。问题是我的数据有离散值和数值。为了简单起见，我们可以使用R提供的示例数据集，称为iris。我会使用par(mfrow(x, y))来分割我的情节，或者使用一个mapply来循环每一列？我不知道这里最好的是什么。
我在想一些类似于：
ggplot(iris, aes(Sepal.Length))+geom_density()
而是为每一列绘制了图。我关心的是“物种”栏是离散的。也许"geom_density“不是在这里使用的合适的图，但是我们的想法是在一个图中看到每个数据帧的变量分布--甚至是离散的。离散值的条形图将达到这个
浏览 0提问于2018-01-29得票数 3
回答已采纳
1回答
我正在努力提高我的R语言技能，但我发现了一个问题。
#Load the library.
library(ggplot2)
#Execute a simple code
ggplot(mtcars, aes(x = cyl, fill = am)) + geom_bar()
我的主要问题是，我做得不好，为什么填充美学没有被绘制出来
浏览 5提问于2017-08-10得票数 1
3回答
我有一个数据框架：
>picard
count reads
1 20681318
2 3206677
3 674351
4 319173
5 139411
6 117706
如何在柱状图(Log10)上绘制计数(Count)与读取(Log10)？
我试过了：
ggplot(picard) + geom_bar(aes(x=log10(count),y=log10(reads)))
但它不接受y=log10(读取)。我如何绘制我的y值？
浏览 1提问于2013-10-16得票数 8
回答已采纳
您可以使用以下命令创建数据集：
structure(list(month = structure(c(5L, 4L, 8L, 1L, 9L, 7L, 6L, 2L, 12L, 11L, 10L, 3L, 5L, 4L,8L, 1L, 9L, 7L, 6L, 2L, 12L, 11L, 10L, 3L),.Label = c("Apr", "Aug", "Dec", "Feb", "Jan", "Jul", "Jun", "Mar", "May", &
浏览 0提问于2020-02-04得票数 1
1回答
我计算了一个预定义并发连接数的服务器的最大响应时间数据帧如下：
> print(summary_data)
max no_of_threads
1.1801799 10
1.0883594 20
0.9556356 30
0.9130625 40
3.2130118 50
1.1573432 60
当我使用geom_bars()用ggplot绘制这个数据帧时，我得到了一个带有条形图的图：
h <- ggplot(summary_data, aes(no_of_threads, max))
浏览 1提问于2011-11-08得票数 1
回答已采纳
假设我想用以下公式绘制直方图(我知道这不是最好的，但它会说明问题)：
set.seed(1)
dframe <- data.frame(val=rnorm(50))
p <- ggplot(dframe, aes(x=val, y=..count..))
p + geom_bar()
效果很好。然而，让我们假设，由于某种原因，频率除以一个耳机定义的数字。我的机会是：
k <- 5
p <- ggplot(dframe, aes(x=val, y=..count../k))
p + geom_bar()
然而，我得到了这个恼人的错误：
Error in eval(expr
浏览 0提问于2013-07-24得票数 18
回答已采纳
我正在使用ggplot绘制条形图，每个名称都有两个关联的值，一个值是正值，另一个是负值。我希望图表中的条形图按正值降序排列，而不是按名称的字母顺序排列。
如果有一个通用的手动覆盖的名称排序，我也会对此感兴趣。
我已经在网上探索过其他ggplot线程，当你只有一个变量时，它们会按降序排列条，我知道如何做到这一点。然而，当我尝试这样做时，当有两个变量时，我就会遇到这个问题。
下面是我的数据和我编写的plot函数的一个类似示例：
example_data <- data.frame(NAME = rep(c('C', 'D', 'A', '
浏览 5提问于2019-10-30得票数 1
1回答
我刚刚开始使用R，我试图绘制一些我作为数据加载的虚拟数据，但是，经过大量的尝试和错误搜索之后，我尝试对其中的一些列绘制一个标示图，而下面的代码没有工作：
Termcount <- count(dummydata$Term)
ggplot(data=dummydata, aes(x=Term, y=Termcount, fill=Term)) + geom_bar(stat = "identity")
然而，下面的代码确实产生了我想要的情节，但我不明白为什么。
ggplot() + aes(dummydata$Term, fill=dummydata$Term) + geo
浏览 2提问于2017-08-10得票数 0
回答已采纳
我的问题和这个Legends for multiple fills in ggplot很接近，但又不一样。让我解释一下。 我有一个数据帧，看起来像这样： df <- data.frame(
'sf'=c('a', 'a', 'a', 'b', 'b', 'b', 'c', 'c', 'c'),
'totalsf'=c(28, NA, NA, 32, NA, NA, 40, NA, NA),
'
浏览 7提问于2019-05-21得票数 1
回答已采纳
2回答
我目前正试图为我的实验中的每一个物种/处理组合绘制变量pt的平均值。这是我使用的代码：
ggplot(data = data, aes(x=treat, y=pt, fill=species)) +
geom_bar(position = "dodge", stat="identity") +
labs(x = "Treatment",
y = "Proportion of Beetles on Treated Side",
colour = "Species") +
theme(
浏览 1提问于2020-01-21得票数 0
回答已采纳
我正在尝试绘制一个折线图(数据点在0和2.5之间，间隔为0.5)。我想在同一图表中的右手轴上绘制一些条形图(介于0和60之间，间隔为10)。我在我的代码中犯了一些错误，使得条形图绘制在左手轴上。 以下是一些示例数据和代码： Month <- c("J","F","M","A")
Line <- c(2.5,2,0.5,3.4)
Bar <- c(30,33,21,40)
df <- data.frame(Month,Line,Bar)
ggplot(df, aes(x=Month)) +
geom_
浏览 16提问于2020-09-03得票数 0
回答已采纳
1回答
我有一个带有cols "x“、"y”和普通行的数据框架("x“和"y”可以看作是数字的集合)。我只想画一个条形图，x与"x“相连，y与"y”相连。尝试使用geom_bar(stat='identity')，但它给我带来了意想不到的结果--当我计算出它与条形x值对应的所有y值之和时。当尝试使用stat_identity(geom='bar')时，结果很好，但是出现了一个问题:我不知道如何为stat_identity设置固定的alpha (看起来它是自动绑定到与条形x值对应的样本数上的)。以下是一些例子：
ggplot
浏览 2提问于2016-10-26得票数 3
回答已采纳
1回答
我正在用ggplot2绘制一个简单的桶形图，我需要在图的每一条上显示一些东西(一个数字或一个字符串.)这与我正在使用的数据集无关。例如，使用以下说明：
ggplot(diamonds,aes(cut))+geom_bar()
我得到了这张图：
我想在条形图上展示数组的元素：
val<-c(10,20,30,40,50)
得到一个类似于另一张图的结果
我尝试以这种方式使用geom_text：
ggplot(diamonds,aes(cut))+geom_bar()+
geom_text(aes(label=val))
但我得到以下错误消息
Error: Aestheti
浏览 2提问于2016-03-07得票数 1
回答已采纳
我正在尝试用ggplot2制作一个只有一个变量的平铺图。数据如下所示：
fruit numbers
apples 6
peaches 2
grapes 10
cherries 2
... many more fruit
我可以绘制与x和y变量相同的数据，我可以使用以下代码：
p <- qplot(fruit,fruit) + geom_tile(aes(fill=numbers))
输出如下所示：
上面的图正是我想要的图；但是，我需要将数据排列在一个水平的一维图中。如何创建具有1个变量的1D水平标题图？
浏览 2提问于2012-02-14得票数 1
回答已采纳
绘制两列数据框架的条形图工作得很好：
library(tidyverse)
tibble(.group = c("A","B","A","B","B","A","A","A","A") %>% factor,
.value = c( 1L, 1L, 3L, 3L, 2L, 2L, 3L, 3L, 1L)) %>%
ggplot() +
geom_bar(aes(x=.value, y=..prop.., fill=.gro
浏览 0提问于2019-05-29得票数 1
回答已采纳
2回答
只显示一条条
、、、
我刚刚开始使用R，所以很抱歉，如果我的问题太基本了，我有一个excel表，下面是链接：
在这里，我试图绘制一个简单的酒吧情节如下：
X =我希望它是我的示例名，文件Y =中名为OTU ID的列，我希望它是每个示例变量的和，文件中名为sum的列
到目前为止，我已经安装并调用了ggplot2的库，并试图绘制我的数据框架，但当我这样做时，它只显示一个栏，我不知道哪里出了问题
install.packages("readxl")
install.packages("ggplot2")
library(readxl)
library(ggplot2)
ZOTU <
浏览 10提问于2022-03-29得票数 0
回答已采纳
1回答
我是R编程的新手，我有一个数据框架df，它有分类变量w，x，y，z。
不包括所有的零，我需要使用ggplot来绘制x和y的条形图。
我使用代码创建了一个表
graph1 <- table(df$x, df$y)
我用了密码
barplot(unlist(graph1[1, graph1[1, ] != 0])
若要为所有非零项绘制条形图，请执行以下操作。如何使用ggplot2获得相同的结果？
浏览 3提问于2022-11-22得票数 0
1回答
用函数绘制数据
、、、
我想用函数绘制数据。例如：
制作数据和加载库：
# Load ggplot2
library(ggplot2)
# Create Data
data <- data.frame(
group=LETTERS[1:5],
value=c(13,7,9,21,2)
)
这一阴谋工作的目的是：
# Basic piechart
ggplot(data, aes(x="", y=value, fill=group)) +
geom_bar(stat="identity", width=1, color="white") +
coo
浏览 1提问于2019-10-21得票数 2
回答已采纳
2回答
这一定是惹恼了某人在过去，所以请原谅，如果这是一个副本，我会删除它。在使用geom_bar时，跨图例的斜杠可能会很烦人。例如：
x <- c("a","b")
y <- c(1,2)
df <- as.data.frame(cbind(x,y))
a <- ggplot(df,aes(x=x,y=y,fill=x))
a + geom_bar(colour="black") + scale_fill_manual(values=c("white", "black"))
当我使
浏览 0提问于2012-05-19得票数 21
回答已采纳
我想用ggplot2来绘制一个桶形图，但是它总是显示相同的错误。
County avginc
1 Los Angelos 116.01993
2 San Diego 70.04367
3 Orange 29.15055
4 San Bernardino 28.32888
5 Riverside 24.1085
ggplot(data=a,aes(x=County,y=avginc)) + geom_bar("identity")
错误：mapping必须由
浏览 0提问于2019-04-03得票数 0
我正在绘制一个数据文件，x值是“第一”、“第二”.等等。
ggplot函数将它们按字母而不是数字绘制。
我试着用
scale_fill_discrete(
breaks = c("First", "Second", "Third", "Fourth", "Fifth", "Sixth")
)
这个条形码仍然是错误的，这是完整的代码。
gender_1 %>%
ggplot(aes(x = `Call Attempt`, y = `Count`, fill = `Gender`)) +
浏览 3提问于2022-10-27得票数 1
给定的数据集为：
df <- data.frame(var =c("a","b","c","a","b","d") , value = c(1:6))
> df
var value
1 a 1
2 b 2
3 c 3
4 a 4
5 b 5
6 d 6
> str(df)
'data.frame': 6 obs. of 2 variables:
$ var : Factor w/
浏览 3提问于2018-07-20得票数 0
1回答
使用dplyr选择并绘制最高频率
、、、、
目标是选择/过滤数据帧中出现频率最高的前3个(或n个)事件，然后在ggplot2中使用条形图绘制这些事件。
示例：
library(dplyr)
df <- data.frame(
type=c("car","bike","horse","boat","yacht","train"),freq=c(20,2,5,60,11,10))
到目前为止，我可以安排df
df_order <- df %>%
arrange(desc(freq))
[1] df_
浏览 0提问于2015-08-21得票数 2
回答已采纳
3回答
将原始数据转换为频率
、、、
我在尝试使用我拥有的数据集绘制某些图形时遇到了一些问题，该数据集类似于：
Year Count ENSO NAO
1 1900 5 0.49063600 -0.073333333
2 1901 7 -0.34351300 -0.461666667
3 1902 5 1.43181000 -1.065000000
4 1903 9 -0.48638500 0.335000000
5 1904 5 0.66698600 -0.103333333
6 1905 3 1.1
浏览 0提问于2012-10-29得票数 0
回答已采纳
她想找出美国各州的犯罪情况。因此，她绘制了数据集"USArrests“，以构建一个条形图，在不同的州谋杀的数量。
下面的命令给出了错误: ggplot(USArrests，aes(x = row.names(USArrests)，y=USArrests$谋杀，实验室)+ geom_bar() +axis.text.x=element_text(angle=90，hjust=1))
错误："stat_count()不能与y美学一起使用“。她能做些什么来纠正这个问题？
我是否应该删除row.names -应该是x=USArrest$State ?？
我应该使用主题(axis
浏览 0提问于2018-05-17得票数 0
2回答
我正试图创造一个相当复杂的情节。结果应该是一个堆叠和分组的条形图，并以第二个y轴为基础附加线。到目前为止，我成功地创建了叠加和分组的条形图(伪分组，对我来说已经足够了)，但是我在将线部分分配到第二个y轴时很痛苦。
library(tidyverse)
library(magrittr)
df <- data.frame(
DATE = c("2019-01-01", "2019-01-08", "2019-01-15")
, XXX_TY_T = c(20, 30, 25)
, XXX_TY_C = c(10, 5, 15)
浏览 0提问于2019-03-19得票数 1
回答已采纳
1回答
R图条形图
、、
考虑以下代码：
d <- data.frame(y = sample(LETTERS[1:8]), x = c(-1.6,-1.4,-1.2,0,0,1.2,1.3,1.4), stringsAsFactors = FALSE)
ggplot(d, aes(y=x, x=y)) + geom_bar() + coord_flip()
谁能告诉我如何强制ggplot不按字母顺序排列数据？我使用了stringsAsFactors = FALSE，所以我的字符不是factor类型。此外，为什么我必须将x和y从aes(y=y, x=x)交换到aes(y=x, x=y)，使我的y数据沿着y轴绘制
浏览 0提问于2013-06-07得票数 1
我有一个DF
a b
A 1
B 1
C 1
B 1
B 1
A 1
我试图用ggplot绘制条形图，DF$a在x轴上，DF$b在y轴上。我使用以下方法
p <- ggplot(DF, aes(a,b)) + geom_bar(stat="identity")
但看来ggplot只画出了来自DF$a的唯一字母，而我想画出所有这些字母。我该怎么做呢？谢谢你的帮助。
浏览 6提问于2016-05-17得票数 2
回答已采纳
我试图利用其他类似问题的线索，在ggplot2中为hlines和ablines创建一个传奇。用下面的代码(和示例图像)，我几乎可以得到我所需要的东西，但我似乎无法摆脱跨越传奇图标的额外行。
p <- ggplot(mtcars, aes(x = wt, y=mpg, col = factor(cyl))) + geom_point()
p + geom_hline(aes(lty="foo",yintercept=20)) +
geom_hline(aes(lty="bar",yintercept=25)) +
geom_hline(aes(lty
浏览 4提问于2017-08-22得票数 1
回答已采纳
我一直在尝试编写一个R代码，它可以读取excel文件中的数据，并根据用户的输入绘制不同的图表(如: bar、行、点或饼)，并使用ggplot包。
为此，我使用了3-4个不同的函数：
1)绘制条形图的功能：
bar <- function() {
plot <- ggplot (data= df, aes(x= Dates, y= Values))
barPlot <- plot + geom_bar(stat="identity", fill="red", width=1)
print(barPlot)
}
2)同样，对于线条图：
浏览 4提问于2015-05-14得票数 1
回答已采纳
我想在同一条形图中绘制两个数据系列(相同类型和数量的度量，但在两个时间点测量)。优选地，第一系列以灰色绘制，而第二系列以透明的彩色绘制，使得系列1数据仍然可见。我拥有的数据格式如下：
MyData = data.frame(
method=rep(c("A","B","C","D","E"),times=3),
time1=rnorm(30,10,3),
time2=rnorm(30,8,2),
lab=rep(rep(c(1,2,3),each=5),times=2),
cat=rep(c(1
浏览 0提问于2015-07-09得票数 1
2回答
我试图一次绘制多个因素列，使用ggplot2作为绘图引擎。
绘制多个度量列是直接的：
library(ggplot2)
library(dplyr) # dplyr 0.5.0 select_if
library(purrr)
data(diamonds)
diamonds %>%
select_if(is.numeric) %>%
gather %>%
ggplot(aes(x = value)) +
geom_histogram() +
facet_wrap(~key)
然而，我没有成功地在一次绘制多因素(定性)列。我希望以编程
浏览 4提问于2016-07-04得票数 3
回答已采纳
我有一个数据集，例如
outcome <- c(rnorm(500, 45, 10), rnorm(250, 40, 12), rnorm(150, 38, 7), rnorm(1000, 35, 10), rnorm(100, 30, 7))
group <- c(rep("A", 500), rep("B", 250), rep("C", 150), rep("D", 1000), rep("E", 100))
reprex <- data.frame(outcome, group)
我可以使
浏览 37提问于2020-02-03得票数 4
1回答
我使用的由jbryer，并希望可视化的数据堆叠条形图。这些条形图的大小/宽度取决于图中有多少条，也就是说，只有一个条形图很宽，而条形图绘制得越多，条形图就越细。
我想要昂贵地设置条形图的大小/宽度，使它们保持不变，不管在图中画了多少条，也就是说，对于l29_5和l29_2的图形来说，条形图的大小是相同的。
library(ggplot)
library(likert)
data(pisaitems)
items29_5 <- pisaitems[,substr(names(pisaitems), 1,5) == 'ST25Q']
colnam
浏览 2提问于2020-02-14得票数 5
回答已采纳
1回答
我有一个问题，如何应用ggplot的色阶梯度。我有一个数据集，其中响应变量是一个连续变量，包括正数和负数，而自变量是一些独立的站点。我试图用这样的方式来绘制数据，这样我就可以绘制背景中的所有数据，然后对覆盖数据负值范围的响应数据应用色阶梯度。到目前为止，我使用的示例数据集模拟了实际数据集的结构。
tr_sim <- data.frame(site_id = seq(1,100,1), estimated_impact =
rnorm(100,18,200), impact_group = rep(c(1,2),each = 50))
rng_full <- r
浏览 0提问于2017-11-20得票数 1
回答已采纳
1回答
我试图用ggplot()绘制直方图，但是我无法处理极值。我希望把它们放在一个垃圾桶内(例如，称为"500及以上“)。
我尝试过scale_x_continuous(breaks = seq(0,500, by = 50))函数，但它只是删除了x轴的标签(附在下面)，对如何处理这个问题有什么想法吗？
浏览 1提问于2016-02-10得票数 4
回答已采纳
library(ggplot2)
library(reshape)
df1<-data.frame(id=c("a","b","c","d"),
var1=c(2,4,4,5),
var2=c(5,6,2,6),
var3=c(5,3,2,1))
df1.m <- melt(df1,id.vars = "id")
ggplot(df1.m, aes(x = id, y = value,fill=variab
浏览 1提问于2018-04-05得票数 0
可能是个愚蠢的问题。我有一个data.frame，看起来像：
Sample3 Sample1 Sample4 Sample5 Sample10 Gene1 6.90 6.45 6.56 3.4 2.0 Gene2 3.4 4.98 0.12 1.5 0.56 Gene3 3.24 0 0.12 0.56 0.22 .....................
还有另一个data.frame (Sam
浏览 0提问于2019-07-12得票数 0
我认为这是一个问题的顺序，我是如何安排每一个尊重。这是相关代码。
有点像正态分布。将其融化并绘制每个分布图。
df <- as.data.frame(r_data_frame)
names(df) <- c('Length','Unique','Donor Unique','All')
library(ggplot2)
library(reshape2)
ndf <- melt(df,id.vars='Length')
print(ndf)
graph <- ggpl
浏览 0提问于2014-01-08得票数 0
回答已采纳
2回答
我正在使用R和ggplot2绘制一个带有误差条的非常基本的条形图，但是我在强迫它们位于我创建的条形图的中心时遇到了麻烦。
我的代码如下：
library(ggplot2)
Type <- c("A", "A", "A", "B", "B", "B")
Time <- c(0, 24, 48, 0, 24, 48)
CellCount <- c(321,213,123,432,234,324)
Error <- c(12,32,12,34,23,21)
df <- d
浏览 1提问于2015-06-28得票数 2
我正面临着ggplot2的行为，订购和堆叠的条形码，我无法理解。
我读过一些关于它的问题(，等等)，但不幸的是，我找不到适合我的解决方案。也许答案很简单，但我看不见。希望这不是个骗局。
我的主要目标是根据排序列(这里称为ordering)，独立地对每个堆栈进行排序。
这里我有一些数据：
library(dplyr)
library(ggplot2)
dats <- data.frame(id = c(1,1,1,2,2,3,3,3,3),
value = c(9,6,4,5,6,4,3,4,5),
orderin
浏览 1提问于2018-12-03得票数 5
回答已采纳
1回答
我正在处理来自R的泰坦尼克号数据集，我想使用ggplot (堆叠和分组条形图)来分析该数据集。所以我想把表格转换成数据框，这样我就可以画出图表了。我使用以下代码进行转换：
df<-as.data.frame(Titanic)
View(df)
然而，即使在查看时，我发现我的df更像是一个数据表。此外，当我试图使用它来绘制一个函数时，使用的是代码：
ggplot(data=df) + geom_bar(aes(x=Class,y=Sex))
它所显示的只是一个空的图，只有x和y轴上的标签，以及性别为男性和女性，班级为第一，第二，第三和船员的分类值。更让我困惑的是，它从数据集中提取分类值，而
浏览 0提问于2015-03-04得票数 0
1回答
我在使用ggplot绘制堆叠的条形图时遇到了问题。我的数据如下所示：
timeInterval TotalWilling TotalAccepted SimID
1 16 12 Sim1
1 23 23 Sim2
1 63 60 Sim3
1 69 60 Sim4
1 61 60
浏览 1提问于2016-03-29得票数 0
我试图把一些数据绘制成从x轴上出来的条形图'bp‘。然而，当我绘制它时，条子来自y轴，“峰值”。我不能为我的一生找出原因。我试着把x轴画成绝对的，但我需要它是连续的。任何帮助都非常感谢！
[
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
