shorthand R 中长表达式的名称

Question

在构建R代码时，例如，为了绘制一些东西，通常需要添加后续的"layers"（标签、轴、标记）等编码的复杂表达式。这里的示例来自 "leaflet" 包，层是通过管道运算符添加的 %>%:

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

shorthand R 中长表达式的名称

shorthand names for long expressions in R

variables

expression

r

names