## Simple regression model
tip.est <- ols (y ~ x, data = data.tip)
## Check its class
class(tip.est)
#> [1] "desk" "lm"
## Standard regression output
print(tip.est) # same as tip.est
## Regression output with details rounded to 2 digits
print(tip.est, details = TRUE, digits = 2)
Run the code above in your browser using DataLab