0

我正在运行以下以获得预测/拟合值:

library(RCurl)
data <- getURL("https://gist.githubusercontent.com/aronlindberg/a8a6644a639c35ceb9d9/raw/5b7c13bbcd439dacbca70e07c96b6c33804273d2/data.csv")
object <- read.csv(text = data)
mod <- nls(formula = "solution_complexity ~ problem_complexity", data=object, start = list(problem_complexity=0))
predict(mod)

然而,这只给了我一个单一的价值。我怎样才能得到所有的预测值?

4

1 回答 1

1

如果我做

predict(mod, newdata = object[, "problem_complexity", drop = FALSE])

[1]  2  6  4  3  3  4  8 16  7  5  3 12  4  3  9  2  1  5  1  1  4  6  2  5 

它似乎工作。

于 2016-03-10T19:32:52.700 回答