选中xtab错误未定义列

Question

x = data.frame(a=c(T,F))
x['foo'] = c(T,F)
lm(foo ~ ., data = x)  # works
lm(. ~ foo, data = x)  # fails
xtab(. ~ foo, data = x)  # fails

最后一行是我真正想要的那一行，但它会抛出“未定义的列选择”错误。我需要设置x维度的维度，因为维度的名称来自变量。

我现在已经搞砸了一段时间而无法解决这个问题。我做错了什么？

Answer 1

如果你引用基础R中的xtabs，请改变你的公式，使.位于~

的右侧

> xtabs(foo ~ ., data = x)
# a
# FALSE  TRUE 
#     0     1 
> xtabs(a ~ ., data = x)
# foo
# FALSE  TRUE 
#     0     1 

同样适用于lm