我被一个R案例研究困住了。我需要用数据集中的特定值绘制一个图表。我很难找到正确的密码。我该怎么写?
数据集是:
data <- read.csv(file = "https://raw.githubusercontent.com/ScPoEcon/ScPoEconometrics/master/inst/datasets/airline-safety.csv")问题是:
提出一个显示这两个时期之间致命事故数量演变的vizualization。
我想用我在x轴上的两段时间来绘制一个条形图,y轴上的事故次数。
下面是我成功编码的程度:
graph_1 <- summarise(group_by(data, type, period), sum_1 =sum(value) )
ggplot((data = graph_1),
aes(x=period, y=type))
geom_bar()它输出的图形是:x轴上的两个周期,y轴上的事故类型。
然而,它并没有使用每种事故类型的事故数量。
我希望:
谢谢你对我的照顾!
发布于 2019-10-07 17:09:56
只需添加一个填充的美学。通常,您希望在y列中包含数字值,并在fill或color中包含分类值(如type )。
# SUMMARY DATA
graph_1
# # A tibble: 6 x 3
# # Groups: type [3]
# type period sum_1
# <fct> <fct> <int>
# 1 fatal_accidents 1985_1999 122
# 2 fatal_accidents 2000_2014 37
# 3 fatalities 1985_1999 6295
# 4 fatalities 2000_2014 3109
# 5 incidents 1985_1999 402
# 6 incidents 2000_2014 231
# PLOT OUTPUT
ggplot((data = graph_1), aes(x=period, y=sum_1, fill=type)) +
geom_col(position="dodge") # OR geom_bar(stat="identity", position="dodge")

https://stackoverflow.com/questions/58273591
复制相似问题