# NOT RUN {
data(finch.ind)
# }
# NOT RUN {
#For most multivariate functions we need to replace (or exclude) NA values.
#For this example, we use the package mice to complete the data.
comm<-t(table(ind.plot.finch,1:length(ind.plot.finch)))
library(mice)
traits = traits.finch
mice<-mice(traits.finch)
traits.finch.mice<-complete(mice)
fred<-Fred(traits.finch.mice, ind.plot.finch)
# }
Run the code above in your browser using DataLab