Displaying 3 results from an estimated 3 matches for "taxa2dist".
2011 Nov 23
1
Vegan: Diversity Plot, label points
Dear List,
I can'f figure how to add point labels in the next plot (example from
?taxondive help page):
library(vegan)
data(dune)
data(dune.taxon)
taxdis <- taxa2dist(dune.taxon, varstep=TRUE)
mod <- taxondive(dune, taxdis)
plot(mod)
The points in this plot are diversity values of single sites, and I'd
like to add a label to each one. The plot command don't accept a
"label" argument.
Any tip?
Thanks in advance.
Alejo
2011 Nov 24
1
Vegan: how to plot sites labes in diversity plot
Dear List,
I can'f figure how to add point labels in the next plot (example from
?taxondive help page, from vegan package):
library(vegan)
data(dune)
data(dune.taxon)
taxdis <- taxa2dist(dune.taxon, varstep=TRUE)
mod <- taxondive(dune, taxdis)
plot(mod)
The points in this plot are diversity values of single sites, and I'd
like to add a label to each one. The plot command don't accept a
"label" argument.
Any tip?
Thanks in advance.
2010 Aug 05
2
try-error within for loop
...a2$tfamily[mydata2$tspecies%in%com[[i]][[5]][[1]]]
hgenus<-mydata2$tgenus[mydata2$tspecies%in%com[[i]][[5]][[1]]]
hspecies<-mydata2$tspecies[mydata2$tspecies%in%com[[i]][[5]][[1]]]
hier<-cbind(hspecies,hgenus,hfamily,horder,hclass)
s<-nrow(hier)
s<-ifelse(s>1000,s/10,s)
taxa<-taxa2dist(hier[sample(s,replace=F),])
abd<-t(cbind(c(1:s),rep(1,s)))
taxdiv<-taxondiveO(abd,taxa)
if(class(result)=="try-error") result[[i]] <- NA
else result[[i]] <-taxdiv #it doesnt work
result[[i]]<-as.data.frame(result[[i]])[1,]},silent=T)
taxind<-do.call(rbind,result)
taxi...