Take one `sra` as one sample and another `sra` as another sample, fitting the model to `b1` and make predictions on `b2` ` b1 <- Baaijens[Baaijens$sra == unique(Baaijens$sra)[1], ] ` ` b2 <- Baaijens[Baaijens$sra == unique(Baaijens$sra)[2], ] `
Take one
sraas one sample and anothersraas another sample, fitting the model tob1and make predictions onb2b1 <- Baaijens[Baaijens$sra == unique(Baaijens$sra)[1], ]b2 <- Baaijens[Baaijens$sra == unique(Baaijens$sra)[2], ]