在构建 R 代码时,例如,为了绘制一些东西,通常需要添加用复杂表达式编码的后续“层”(标签、轴、标记)等。这里的示例来自“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,....) 不起作用
最佳答案
试试这个:
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
关于r - R 中长表达式的简写名称,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/45623235/