R中的函数，该函数使用ggplot2为连续数据图的边框提供自定义颜色（从给定的间隔）

如果我使用ggplot2绘制连续数据图，则该函数应使用给定比例（低和高之间）的颜色作为边框颜色

> scale_colour_continuous <- function(...) {  
> ggplot2::scale_colour_gradient(..., low = "#FFFF00", high = "#3366FF",
>                                na.value = "#262626", aesthetics = "colour")

缩放颜色连续ggplot2:：缩放颜色渐变（…，低=“#FFFF00”，高=“#3366FF”， >na.value=“#262626”，美学=“颜色”）

---

不幸的是，我上面的代码似乎不起作用。我发现if非常有趣，因为对于相同的参数（

美学=“fill”

）来说，相同的填充效果也很好。我缺少什么？

您不需要显式调用

ggplot2

。如果需要，可以添加一条If语句，检查是否加载了ggplot2。这是需要的

my_theme<-function(...){
  scale_colour_gradient(..., low = "#FFFF00", high = "#3366FF",
            na.value = "#262626", aesthetics = "colour")

}
library(tidyverse)
iris %>% 
  ggplot(aes(Sepal.Length,Petal.Length,col=Sepal.Length))+
  geom_point()+
  my_theme()#wanted to make a theme so don't mind the naming.

我的主题%
ggplot（aes（萼片长度，花瓣长度，花柱=萼片长度））+
几何点（）+
my_theme（）#想制作一个主题，所以不介意命名。