knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(lin.Reg)

This function can also be used for real world dataset. Use example dataset (gala in library(faraway)) or direcly use the csv provided.

## checking the sample dataset
gala <- read.csv("gala.csv")
head(gala)

building univariate model

# Y: Species
# X: Endemics      

lmodel <- lin.Reg(gala$Species, gala$Endemics)

#display
summary_lin.Reg(lmodel)

building multivariate model

# Y: Species
# X: Endemics, Area, Nearest  

X <- cbind(gala$Endemics, gala$Area, gala$Nearest)

lmodel2 <- lin.Reg(gala$Species, X)

#display
summary_lin.Reg(lmodel2)


liulim-Liu/lin.Reg documentation built on Dec. 21, 2021, 10:52 a.m.