我有一个自定义功能，而且效果很好.
Gplot = function(mydata, AE){
ggplot(mydata)+
...
geom_vline(aes(xintercept = breaks[2]), color = "seagreen", linetype = "dashed"))
}
...
有时我不需要垂直线，那么使用时如何删除geom_vline呢？
我知道我可以在函数中删除这句话，但大多数时候我都需要它.所以我只是想用一些特定的变量来删除它.
我有一个自定义功能，而且效果很好.
Gplot = function(mydata, AE){
ggplot(mydata)+
...
geom_vline(aes(xintercept = breaks[2]), color = "seagreen", linetype = "dashed"))
}
...
有时我不需要垂直线，那么使用时如何删除geom_vline呢？
我知道我可以在函数中删除这句话，但大多数时候我都需要它.所以我只是想用一些特定的变量来删除它.
使用条件并且仅在添加线参数为True时添加垂直线:
Gplot = function(mydata, AE, addline=TRUE){
gp <- ggplot(mydata)+
...
if(addline){
gp <- gp + geom_vline(aes(xintercept = breaks[2]))
}
return(gp)
}
...