R ggplot2中鞘层宽度的统计密度
我看到了ggplot2源硬代码R ggplot2中鞘层宽度的统计密度,r,ggplot2,R,Ggplot2,我看到了ggplot2源硬代码bw=“nrd0”。有没有办法通过传递一个参数将binwidth更改为bw=“SJ”,或者我必须用这个差异重新定义类 我想出了一个替代方案,通过它我可以构建传递给stat\u函数的函数 library(purrr) fit <- Y %>% split(.$from) %>% map(~ density(x = .$dist, bw = "SJ")) %>% map(approxfun) 缺点是我必须手动设置每种颜色。我只需
bw=“nrd0”
。有没有办法通过传递一个参数将binwidth更改为bw=“SJ”
,或者我必须用这个差异重新定义类
我想出了一个替代方案,通过它我可以构建传递给stat\u函数的函数
library(purrr)
fit <-
Y %>%
split(.$from) %>%
map(~ density(x = .$dist, bw = "SJ")) %>%
map(approxfun)
缺点是我必须手动设置每种颜色。我只需edit()
函数;但是我在其他情况下也经常遇到类似的问题,所以如果其他人有一个方便的建议,可能涉及到形式的,我很乐意听到!
...
Y %>%
ggplot(aes(x = x)) +
stat_function(fun = fit[[1]]) +
stat_function(fun = fit[[2]])