如何修复“可变长度不同”错误？

Question

这是我的代码：

Income.x1 <- ifelse(Income ==1, "L", ifelse(Income == 2, "M",ifelse(Income == 3, "H",NA)))
gender.x2 <- ifelse(Gender==1, "M",ifelse(Gender == 2, "F",NA))
Happy.x3 <- ifelse(Happy==1,"A",ifelse(Happy==2,"B",ifelse(Happy==3,"C",NA)))

regr.x = lm(TVhours ~ Income.x1 + Happy.x3+ gender.x2)
sRegr.5 = summary(regr.x);sRegr.5

这是我的错误：

model.frame.default 中的错误（公式 = TVhours ~ Income.x1 + Happy.x3 + ： 可变长度不同（针对“gender.x2”找到）

为什么会出现变长问题？

Answer 1

您可能只是对一个变量有更多（更少）的观察，检查线性回归模型中涉及的每个变量的长度。看看我如何得到同样的错误：

x1 <- c(1,2,3,4)
x2 <- c(1,2,3,4,5)

length(x1)
length(x2)

lm(x1~x2)