根据帖子link，我学会了一种处理传递变量的方法，因为列要使用setTimeout(function() {
var bar = $('#bar');
var parent = bar.parent();
var index = parent.children().index(bar);
bar.detach();
$("#re-attach").one('click', function() {
if (index === 0) {
parent.prepend(bar);
}
else {
parent.children().eq(index-1).after(bar);
}
});
}, 5000);
和enquo()。
示例代码：
!!aa <- tibble(n1=1:4, n2=2:5)
foo <- function(dat, var)
{
var1 <- enquo(var)
dat %>% select(!!var1)
}
foo(aa, `n1`)
foo(aa, `n2`)
因为对象v <- `n1`
foo(aa, v)
不存在。
有快速补救措施吗？