R中的长表达式的简写名称

Question

构建R代码时，例如，绘制某些东西时，通常需要添加后续的“图层”（标签，轴，标记）等，以复杂的表达式编码。这里的例子来自“小册子”包，层通过管道运营商添加％>％：

library("leaflet") 
library("leaflet.minicharts") 
mymap <- leaflet() %>% addTiles() %>% addMinicharts(0, 0, chartdata = 1:3, layerId = "c1") 

我现在要增加一些复杂的东西：

mymap %>% addCircleMarkers(0,0,radius=10,labelOptions=labelOptions(noHide=T,textOnly=TRUE,direction="bottom", offset=c(0,5))) 

我想分配一个短名这样的构成，可以说，“mycircle”，然后用它的命令：

mymap %>% mycircle 

它是如何可以这样做？通过 mycircle分配< -addCircleMarkers（0,0，...）不起作用

Answer 1

试试这个：

mymap <- leaflet() %>% addTiles() %>% 
    addMinicharts(0, 0, chartdata = 1:3, layerId = "c1") 
mycircle <- function(x) { 
    addCircleMarkers(map=x, 0, 0, radius=10, 
        labelOptions=labelOptions(
         noHide=T, textOnly=TRUE, direction="bottom", offset=c(0,5))) 
} 

mymap %>% mycircle