https://dplyr.tidyverse.org/articles/programming.html
没有什么是免费的，但 dplyr 传参也太头疼了，造成了意想不到的bug。数据过滤函数一定要像下面这样写才最安全，尤其是数据框列名和传入参数名称相同时。
dat_filter <- function(data,dataset,drug,target){
data <- dplyr::filter(data,
.data$dataset %in% {{dataset}},
.data$drug %in% {{drug}},
.data$target %in% {{target}}
)
data
}
