data(finch.ind)
res.finch<-Tstats(traits.finch, ind_plot=ind.plot.finch,
sp=sp.finch, nperm=9)
ses(res.finch$T_IP.IC, res.finch$T_IP.IC_nm)
ses(t(res.finch$T_IP.IC), res.finch$T_IP.IC_nm)
Run the code above in your browser using DataLab