r - geom_point 没有被 scale_fill_manual 填充
问题描述
我想用 ggplot 为几个模型精度绘制图表。绘制结果的细节并不重要,但是,我在填充 geom_point 对象时遇到了问题。
可以在此处找到示例文件:https ://ufile.io/z1z4c
我的代码是:
library(ggplot2)
library(ggthemes)
Palette <- c('#A81D35', '#085575', '#1DA837')
results <- read.csv('test.csv', colClasses=c('factor', 'factor', 'factor', 'numeric'))
results$dates <- factor(results$dates, levels = c('01', '15', '27'))
results$pocd <- factor(results$pocd, levels = c('without POCD', 'with POCD', 'null accuracy'))
results$model <- factor(results$model, levels = c('SVM', 'DT', 'RF', 'Ada', 'NN'))
ggplot(data = results, group = pocd) +
geom_point(aes(x = dates, y = acc,
shape = pocd,
color = pocd,
fill = pocd,
size = pocd)) +
scale_shape_manual(values = c(0, 1, 3)) +
scale_color_manual(values = c(Palette[1], Palette[2], Palette[3])) +
scale_fill_manual(values = c(Palette[1], Palette[2], Palette[3])) +
scale_size_manual(values = c(2, 2, 1)) +
facet_grid(. ~ model) +
xlab('Date of knowledge') +
ylab('Accuracy') +
theme(legend.position = 'right',
legend.title = element_blank(),
axis.line = element_line(color = '#DDDDDD'))
结果,我得到了未填充的圆圈和正方形。如何修复它,以便正方形和圆形填充特定颜色?
附加问题:我想在图中添加一个 geom_line,连接每组中的三个点。但是,我无法调整线型和宽度。它总是取 scale_*_manual 的值,这非常不利,尤其是在 size 的情况下。
感谢您的帮助!
解决方案
您需要更改指定的形状,如下所示:
scale_shape_manual(values = c(21,22,23)) +
对于您的其他问题,如果您aes(size=)
在代码的第一部分(下)设置ggplot(data=...
,然后手动指定为 +geom_line(size=1....`size=1
geom_line
推荐阅读
- kubernetes - 如何在终端中登录 kubenetes 仪表板 pod
- python - 在自定义层中命名层的权重
- c# - SelectMany 嵌套在父级的 lambda 与 SelectMany 之后的 SelectMany
- php - PHP - 使用 TesseractOCR 从图像中读取文本
- validation - Vue 阻止页面渲染,直到验证通过
- python - Python中的符号->是什么意思?
- vim - Neovim:相对配置文件(init.vim)位置
- cron - 如何正确设置 cron 作业通知
- python - 从 python 抽象工厂中导入
- javascript - 使用 .env 文件中的变量来创建反应应用程序