#Bland-Altman chapter
install.packages("MethComp")
library(MethComp)

data(ox) 
ox

BA.plot( ox, model=NULL, eqn=TRUE, pl.type="BA", sd.type="lin" )

BA.plot( ox, eqn=TRUE, sd.type="lin" )