Advertisement
Guest User

Untitled

a guest
Sep 16th, 2019
136
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
R 0.22 KB | None | 0 0
  1. dane = read.csv('~/Pobrane/dane1.csv', sep = ';')
  2. library(nlme)
  3. library(multcomp)
  4.  
  5. model = lme(imp.1.20 ~ szczep, random = ~1|mysz, data = dane)
  6. print(model)
  7. anova(model)
  8.  
  9. summary(glht(model, linfct=mcp(szczep="Tukey")))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement