gpt4 book ai didi

r - geom_point 未由 scale_fill_manual 填充

转载 作者:行者123 更新时间:2023-12-05 03:05:00 25 4
gpt4 key购买 nike

我想用 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'))

结果我得到了未填充的圆圈和正方形。我怎样才能修复它,使正方形和圆圈充满特定的颜色?

enter image description here

附加问题:我想在图中添加一条 geom_line,连接每组中的三个点。但是,我无法调整线型和宽度。它总是采用 scale_*_manual 的值,这非常不利,尤其是在大小的情况下。

感谢您的帮助!

最佳答案

您需要更改指定的形状,如下所示:

  scale_shape_manual(values = c(21,22,23)) +

对于您的附加问题,如果您在代码的第一部分(在 ggplot(data=... 下)设置 aes(size=) 应该可以解决) 然后手动指定 geom_line 下的 size=1 为 +geom_line(size=1....`

关于r - geom_point 未由 scale_fill_manual 填充,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/51613073/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com