rggplot堆栈标识

6ojccjat 于 2023-01-28 发布在其他

关注(0)|答案(1)|浏览(80)

enter image description here
我想把这个图像..
我的数据很难公开，所以我做了一个任意的数据。
结果总数1 800 40 2 700 30 3 650 27 4 600 25 5 500 20
我试过了。
ggplot（数据，不良事件（x=否，y=总计））+your text几何条形图（统计信息=“同一性”）your text几何条形图（统计信息=“同一性”）+your text实验室检查（x=“否”，y=“总计”）+your text比例_y_连续（中断=顺序（900，100））+your text主题_最小值（）
我想做
enter image description here
黑条表示总数，灰条表示结果。
请帮帮我。
我写这个题目用的是papago，所以......句子会很别扭......我请求你的理解。！！

来源：https://stackoverflow.com/questions/75243866/r-ggplot-stack-identity

1条答案

按热度按时间

mo49yndu1#

为了可视化所需的图表，您需要透视数据。
可以使用reshape2::melt()透视（使宽数据变长

df <- data.frame(
  no = 1:5,
  total = c(800,700,650,600,500),
  outcome = c(40,30,27,25,20)
)

require(ggplot2)
require(reshape2)
df_long <- melt(df,
                id.vars='no',
                measure.vars=c('total','outcome'))

ggplot(df_long, aes(x=no, y=value, fill=variable))+
  geom_col()+
  scale_fill_manual(values = c('black','grey')) +
  scale_y_continuous(breaks=seq(0,900,100))+
  theme_minimal() +
  labs(x='No', y='Total')

请注意，geom_bar(stat='identity')等于geom_col()。

赞(0）回复(0）举报 2023-01-28

我来回答

rggplot堆栈标识

1条答案

相关问题

热门标签

最新问答