我正在尝试以下方法:
model_lr <- lm(metrics$Rev_Per_Player~metrics$Promo + metrics$DoW)
DoW <- wday(c(2,3,4,5,6,7,1), label = TRUE)
Promo <- c("","A","","B", "A","B", "")
Players <- c(3000,4000,4000,5000,6000,6000,7000)
new_ds <- data.frame(Promo,DoW,Players)
predict(model_lr,newdata = new_ds[,1:2])
我最终得到了这个警告:
Warning message:
'newdata' had 7 rows but variables found have 182 rows
我发现的这个问题的所有解释都与不恰当地命名新数据集的输入功能有关,这是我已经考虑的事情。
答案 0 :(得分:0)
我建议您尝试:$file = file_get_contents('./data.txt'); // you can use a full http address if your server allows it
$searchnum = 'zero';
if (stripos($file, $searchnum) !== false) { echo 'number found'; }
示例:
lm(Rev_Per_Player ~ Promo + DoW, data = metrics)
为什么呢?
我认为这与模型框架的不同有关,这取决于您如何指定分析中使用的变量。 mod1 <- lm(mpg ~ hp, data = mtcars)
mod2 <- lm(mtcars$mpg ~ mtcars$hp)
newdata <- data.frame(mpg = 5, hp = 200)
## Works
predict(mod1, newdata)
## Doesn't Work
predict(mod2, newdata)
使用model.frame实际运行回归算法。
尝试以下方法。命名约定是不同的。
lm()