year1984 <- c(1,6,16,23)
year1985 <- c(27,39,31,30)
year1986 <- c(43,51,63,70)
year1987 <- c(88,97,91,104)
year1988 <- c(110,113,149,159)

rbind(year1984,year1985,year1986,year1987,year1988)

x<-c(1:20)
y<-c(1,6,16,23,
     27,39,31,30,
     43,51,63,70,
     88,97,91,104,
     110,113,149,159)

m1 <- glm (y~x,family=poisson)
m1