tt <- c(1:10,1:10)
nrge <- c(rep(0,10),rep(1,10))
St <- c(1,3,3,1,5,6,8,4,3,6)
Nt <- c(3,2,4,7,5,4,8,3,2,4)
fit <- lm(log(c(St,Nt)) ~ tt + I(tt*nrge))
By using three parameters and no more than two equations, write down the model that the person who wrote this code wants to fit to the data
Thank you so much for your help