scale_colour_manual
凡例で可能なキーを指定するために使用しています。ただし、stat_function
カスタム関数をプロットするために使用すると、凡例が表示されません。
なぜこれが起こるのですか?
library(ggplot2)
MyFun <- function(x, p) {
res <- x^(1 / p)
return(res)
}
my.df <-data.frame(x = c(0,1))
plt <- ggplot(my.df, aes(x=x)) +
stat_function(fun = MyFun, n = 1000, args = list(p = 10), colour = "red") +
stat_function(fun = MyFun, n = 1000, args = list(p = 3), colour = "blue") +
stat_function(fun = MyFun, n = 1000, args = list(p = 2), colour = "green") +
stat_function(fun = MyFun, n = 1000, args = list(p = 1), colour = "orange") +
scale_colour_manual(values = c("red", "blue", "green", "orange"))
print(plt)