library(knitr) traits <- params$traits geno <- params$geno data <- params$data maxp <- params$maxp data[, geno] <- as.character(data[, geno])
Existen r nlevels(as.factor(data[, geno]))
tratamientos, evaluados usando un diseno completo al azar. El modelo estadistico es:
$$
y_{ij} = \mu + \tau_i + \epsilon_{ij}
$$
donde
En este modelo asumimos que los errores son independientes y tienen distribucion normal con varianza comun, que es, $\epsilon_{ij} \sim N(0,\sigma_{\epsilon}^2)$.
out <- NULL for (i in 1:length(traits)) out <- c(out, knit_expand('child_dca.Rmd'))
r paste(knit(text = out), collapse = '\n')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.