# Extract ETA from the model
mod <- exmodel()
eta(mod)
# Coerce numeric values
eta(0.1, 0.2, c(0.3, 0.4), list(0.5, 0.6))
eta(rnorm(4))
# Generate a sequence from scratch
eta(n = 3)
eta(n = 3, val = 0.001)
Run the code above in your browser using DataLab