ggplot气泡图自定义颜色

时间:2017-07-28 13:18:03

标签: r ggplot2

我有这个数据框,我正在尝试使用自定义颜色

data <- data.frame(condition=c('1','1','1','1','1','2','2','2','2','2','3','3','3','3','3'), AssessmentGrade=c('400','410','420','430','440','500','510','520','530','540','300','310','320','330','340'), Freq=c('1','2','1','5','7','9','1','5','3','4','5','8','1','3','5'), MathGrade=c('A+','B-','C-','D','F','A-','B','C+','D-','F','A+','D','D','F','C'), Condition=c('Condition 1','Condition 1','Condition 1','Condition 1','Condition 1','Condition 2','Condition 2','Condition 2','Condition 2','Condition 2','Condition 3','Condition 3','Condition 3','Condition 3','Condition 3'))

我使用ggplot来获取abubble图,但我想知道如何编辑它以使用我公司的标准颜色

p <- ggplot(data, aes(x = MathGrade, y = AssessmentGrade, size = Freq, fill = Condition)) +
 geom_point(aes(colour = Condition)) +
 ggtitle("Main Title") +
 labs(x = "First Math Grade", y = "Math Assessment Score")

我有一个名为colors的矢量:

colors
[1] "#101820" "#AF272F" "#EAAA00" 

我尝试用它绘制图形:

p&lt; - p + scale_fill_manual(values = color)

没有改变。我尝试按照here的指示,但没有改变。有人可以帮忙吗?

1 个答案:

答案 0 :(得分:3)

您创建了一个调色板:

my_colors<- c("#101820", "#AF272F", "#EAAA00")

然后当你在剧情中使用它时:

 p <- ggplot(data, aes(x = MathGrade, y = AssessmentGrade, size = Freq, fill = Condition)) +
 geom_point(shape=21) +
 ggtitle("Main Title") +
 labs(x = "First Math Grade", y = "Math Assessment Score") +
 scale_fill_manual(values=my_colors) #or you could enter the color numbers directly here

这在测试过程中起作用,但是ggplot不喜欢你在主要美学中如何使用尺寸。

enter image description here