powered by
vcovAcomp(object,...)
vcov
data(SimulatedAmounts) model <- lm(ilr(sa.groups)~sa.groups.area) vcovAcomp(model)[,,1,1]
Run the code above in your browser using DataLab