fork download
  1. ##
  2. ## 可行的
  3. x = sample(1:10, 25, replace=TRUE)
  4. y = 1+3*x
  5. xy = data.frame(x, y)
  6. colnames(xy)
  7. fit = lm(y~x, data=xy)
  8. ##
  9. ## 不可行
  10. target <- "y"
  11. fit = lm(target~x, data=xy)
Success #stdin #stdout #stderr 0.18s 176448KB
stdin
Standard input is empty
stdout
[1] "x" "y"
stderr
Error in model.frame.default(formula = target ~ x, data = xy, drop.unused.levels = TRUE) : 
  variable lengths differ (found for 'x')
Calls: lm -> eval -> eval -> <Anonymous> -> model.frame.default
Execution halted