scale_color_gradient(low = "blue", high = "red") 以下两步是完全等效的: scale_color_continuous(low = "white", high = "blue",type = "gradient") scale_color_gradient(low = "white", high = "blue") 如果想要设置中间过渡颜色,可以借助scale_color_gradient2()函数—— scale_color_gradient2...
# 创建ggplot对象并绘制散点图 p <- ggplot(data, aes(x, y, color = group)) + geom_point() # 全局定义颜色条的美学 p + scale_color_manual(values = c("red", "blue", "green"), labels = c("A", "B", "C")) 在上述示例中,我们使用scale_color_manual()函数来定义颜色条的美学...
1)scale_color_manual 最常用的调整颜色的一个函数是 scale_color_manual,可以按照自己的想法任意配色。 p <- ggplot(data=mtcars, aes(x=mpg, y=disp, color=factor(cyl))) + geom_point() p 上图使用的是默认配色,如果想要换成自己想要的配色,就可以用 scale_color_manual 函数指定,比如: p + scale_...
在ggplot2中,我们可以使用scale_fill_manual()或scale_color_manual()函数来添加自定义图例到柱状图上。 以下是一种常见的方法: 首先,需要使用geom_bar()函数创建柱状图,同时指定fill参数或color参数来设置柱子的颜色。 接下来,使用scale_fill_manual()或scale_color_manual()函数来设置自定义图例。在函数中,需...
scale_size_*:点的大小和线的粗细标度; scale_x_*:横坐标轴标度; sclae_y_*:纵坐标轴标度。 该类函数是ggplot2包中最复杂的一类函数。前文使用cyl变量将散点的颜色分为三组,这里使用scale_color_manual函数手动指定每组的颜色,使用scale_x_continuous调整横坐标轴的刻度: ...
data(Salaries,package="car")ggplot(data=Salaries, aes(x=yrs.since.phd, y=salary, color=rank)) +scale_color_manual(values=c("orange","olivedrab","navy")) +geom_point(size=2) 图19-20 薪水与助理教授、副教授、教授经验对比的散点图 ...
2.1 离散型变量,scale_fill_manual()自定义颜色 ggplot(data = mtcars, mapping = aes(x = gear, fill = as.factor(gear)))+ geom_bar()+ scale_fill_manual(values = c("#003f5c", "#bc5090", "#ffa600")) 2.2 连续型变量,scale_color_manual()自定义颜色 ggp...
001、基础绘图 ggplot(data=mtcars, aes(x=mpg, y=disp, color=factor(cyl))) + geom_point() 02、手动调整颜色 ggplot(data=mtcars, aes(x=mpg, y=disp, color=factor(cyl))) + geom_point() +scale_color_manual(values= c("red","black","blue")) ## 增加该句 ...
ggplot(ToothGrowth, aes(x=dose, y=len,color=dose)) +geom_boxplot()+scale_color_manual(values=c("#999999","#E69F00","#56B4E9")) 4,设置Legend 的位置 说明(Legend)是对箱线图的解释性描述,默认的位置是在画布的右侧中间位置,可以通过theme()函数修改Legend的位置,lengend.position的有效值是top...
可以通过scale_color_manual(value= c("name_1"="color_code_1", "name_2"="color_code_2"))的方式指定修改 kk <- as.data.frame(list(aa=LETTERS[1:3], bb=1:3)) ggplot()+geom_point(data = kk, aes(x=aa, y=bb, color=aa), size=7)+theme_bw()+scale_color_manual(values=c("A...