在R错误中绘制残差

Question

我试图在R中绘制我的拟合，我收到以下错误：

Error in xy.coords(x, y, xlabel, ylabel, log) : 'x' and 'y' lengths differ

这是我的代码：

exercise <- as.factor(c(10, 10, 20, 20, 10, 10, 20, 20))
time <- c("pm", "am", "am", "pm", "am", "pm", "pm", "am")
glucose <- c(71.5, 103, 83.5, 126, 125.5, 129.5, 95, 93)

fit1 <- aov(glucose ~ exercise + time)
summary(fit1)



par(mfrow = c(2, 2))
plot(fit1)

Answer 1

您需要确保time是一个因素。

time <- as.factor(c("pm", "am", "am", "pm", "am", "pm", "pm", "am"))

然后你的情节会奏效。传递一个字符向量时，aov看起来有点混乱。