• File: air-data.R
"alpha" <- 4.48        
"beta" <- 0.76         
"sigma2" <- 81.14      
"J" <- 3               
"y" <-
c(21, 20, 15)
"n" <-
c(48, 34, 21)
"Z" <-
c(10, 30, 50)