r - 更改 Bar ggplot 的边框和颜色,但仅适用于一组
问题描述
我正在尝试为条形图添加边界线。具体来说,下图有没有边界的条形图。如果我添加linetype
两个组都将带有边界线,但我只需要带有黑色虚线边界线的“黑色”组,并保持“白色”组颜色但没有边界线。
df1<- data.frame(
score = scores,
count=c(white,black),
race =rep(c("White","Black"),c(length(white),length(black))))
ggplot(df1, aes(score,count,fill=race)) +
geom_bar(aes(fill=race),stat="identity",position="identity") +
scale_fill_manual(values = alpha(c("#ff1212","#1212ff"), 0.25)) +
labs(title="Chart for Phil", y="Percent", x="Score")
以下解决方案的结果:
解决方案
scores
不幸的是,由于变量,您的示例无法重现black
,white
但我做了一个:
library(ggplot2)
df1<- data.frame(
score = rep(1,1),
count=c(8,5),
race =c("White","Black"))
ggplot(df1, aes(score, count, fill=race, col=race, linetype=race)) +
geom_bar(aes(fill=race),stat="identity",position="identity") +
scale_fill_manual(values = alpha(c("#ff1212","#1212ff"), 0.25)) +
scale_color_manual(values = c("black","black")) +
scale_linetype_manual(values = c("dashed", "blank")) +
labs(title="Chart for Phil", y="Percent", x="Score")
推荐阅读
- google-sheets - 查找与字符串的部分匹配
- iis - SSAS 数据泵 - 找不到 IsapiModule
- python - 在模拟期间更新 matplotlib 图
- angular - 新选项卡目标空白 url 在 Chrome 和 IE 中打开,但在 Microsoft Edge 中不打开
- python-3.x - 如何使用 .insert 方法向列表添加值
- javascript - NodeJS 类总是返回 undefined
- robotframework - 机器人框架。等到关键字成功 5m 10s {keyword {keyword {keyword}}}
- c++ - 用于 QT/C++ 开发的 QTCreator 的免费替代品
- python - BufferError:本地:Python 中的队列已满
- webgl - 渲染警告:绑定到纹理单元 0 的纹理不可渲染。它可能是非 2 的幂或具有不兼容的纹理过滤(也许)?