问题
I am working on a data set where I have to generate formula to be passed to lm dynamically. So, I am using reformulate to do this.
formula = reformulate(termlabels = c('feature1', 'feature2', 'feature3'), response="y")
y is continuous.
This gets me the formula as y ~ feature1+feature2+feature3
However I want the formula to be log(y+1) ~ feature1+feature2+feature3
How do I do this using reformulate?
回答1:
Pass in the response as a quoted expression:
x <- c("feature1", "feature2", "feature3")
reformulate(x, response=quote(log(y+1)))
Or you could just construct the formula manually. This is what reformulate does under the hood.
formula(paste("log(y + 1) ~", paste(x, collapse="+")))
来源：https://stackoverflow.com/questions/26374106/reformulate-in-r-logy1