pin | R Documentation |
This is the function that can calculate the Heritibality and Genetic Correlation
pin(object, transform)
object |
It is the asreml object |
transform |
It is the formula of calculation |
Dave <Dave@vsni.co.uk>
model.comp
, asreml.lrt
library(asreml)
data(harvey,package = "asreml")
head(harvey)
ainv <- asreml.Ainverse(harvey[,1:3])$ginv
mod.asr <- asreml(y1 ~ Line, random = ~ ped(Calf), ginverse = list(Calf = ainv),data=harvey)
summary(mod.asr)$varcomp
pin(mod.asr,h2 ~ V1/(V1+V2))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.