match.phylo.data fails when given a data.frame with a single column

[Steven Kembel]

function match.phylo.data fails if the supplied data is a data.frame with a single column

[Kerby Elpenord]

The solution work now. This is an example:

mauvais <- select(phylocom$traits, "traitA")
ncol(mauvais)
is.data.frame(mauvais)
match.phylo.data(phylocom$phylo, mauvais[,1])