运行测试出错：“缺少需要TRUE / FALSE的值”

I'm fairly new to R and I'm trying to simulate some data, fit it to a model, and do a runs test of the residuals. However, I get a strange type error when performing the runs test. Here is my code:I'm fairly new to R and I'm trying to simulate