I'm building a function for many model types which needs to extract the formula used to make the model. Is there a flexible way to do this? For example:

x <- rnorm(10)
y <- rnorm(10)
z <- rnorm(10)
equation <- z ~ x + y
model <- lm(equation)

I what I need to do is extract the formula object "equation" once being passed the model.

Edit
Report