Description Usage Format Source Examples
Part of an experiment on propagation of plant genera Acer and Pyrus. Cuttings were taken from motherplants of age 5 and age 20, from top or base, and were treated with 0, 0.5 and 2 percent IBA to induce rooting. Treatments were arranged in a completely randomized design, among other variables, the number of cuttings with and without roots was recorded.
1  | 
A data frame with 48 observations on the following 6 variables.
Agea numeric vector: age of mother plants
Positiona factor with levels B and T, for "base" and "top" cuttings
IBAa numeric vector, specifying the concentration of IBA
Repa numeric vector, number of replication
roota numeric vector, number of cuttings with successfull rooting, out of 12 trials
noroota numeric vector, number of cuttings showing no rooting, out of 12 trials
Data taken from Msc thesis by Dawit Mamushet Yifru, Institute of Floriculture, Tree Nursery Science and Plant Breeding, University of Hannover, 2005.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16  | data(rooting)
rooting$IBAf<-as.factor(rooting$IBA)
rooting$Rep<-as.factor(rooting$Rep)
fitB<-glm(cbind(root,noroot)~Rep+(Age + Position + IBA)^2,
 data=rooting, family=binomial)
fitQB<-glm(cbind(root,noroot)~Rep+(Age + Position + IBA)^2,
 data=rooting, family=quasibinomial)
summary(fitB)
summary(fitQB)
anova(fitB, test="Chisq")
anova(fitQB, test="F")
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.