可以预测r闪亮的单个值

Question

我正在创建一个带有R Shiny的仪表板，但是由于在模拟预测期间有些问题，它行不通。奇怪的是，完全相同的代码可用于另一个预测：

sim_pred_data <- na.omit(sim_pred_data)

sim_pred_data <- as.matrix(sim_pred_data)

sim_predicted_output <-predict(lasso_best, s=lambda_best, newx=sim_pred_data)

在执行过程中，我会收到以下错误：

警告：H中的错误：在选择函数'a as.matrix'的方法中评估参数'x'时的错误na'to dup_mmatrix_as_dgematrix

我在此处删除as.matrix行时也会遇到相同的错误，但是对于第二个提到的情况，需要该行。

该模型已经预先拟合。

更改以下代码会引发另一个错误：

警告：对比度＆lt; - ：对比度的错误只能应用于具有2个或更多级别的因素，

sim_pred_data <- na.omit(sim_pred_data)

sim_pred_data <- as.matrix(sim_pred_data)
sim_dummy <- dummyVars(" ~ .", data=sim_pred_data)

sim_pred_data <<- data.frame(predict(sim_dummy, newdata =          
sim_pred_data))

sim_predicted_output <-predict(lasso_best, s=lambda_best, 
newx=sim_pred_data)

所提供的数据只有一个观察结果和命名列，以预测该值。

我希望有人可以帮忙。谢谢

Answer 1

尝试此而不是使用omit（）：

if (is.na(sim_pred_data)){}
else {
  sim_pred_data <- as.matrix(sim_pred_data)
  sim_predicted_output <-predict(lasso_best, s=lambda_best, 
  newx=sim_pred_data)
}