powered by
sm2asreml(A, rownames)
A
asreml.Ainverse
data(bird.families) A<-inverseA(bird.families) Aasreml<-sm2asreml(A$Ainv, A$node.names)
Run the code above in your browser using DataLab