Running examples in 'EcotoneFinder-Ex.R' failed
The error most likely occurred in:

> ### Name: CommunityColor
> ### Title: Tool to assign color to species distribution plots given fuzzy
> ###   clustering results.
> ### Aliases: CommunityColor
> 
> ### ** Examples
> 
>  ######## Artificial dataset & analysis:
>  SyntheticTrial <- SyntheticData(SpeciesNum = 27, CommunityNum = 3,
+                                  SpCo = NULL, Length = 500,
+                                  Parameters = list(a=rep(60, 3),
+                                                    b=c(0,250,500),
+                                                    c=rep(0.03,3)),
+                                  dev.c = .015,
+                                  pal = c("#008585", "#FBF2C4", "#C7522B"))
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
Warning in graphics::par(oldpar) : calling par(new=TRUE) with no plot
> 
>  SyntheticEcoFinder <- EcotoneFinder(SyntheticTrial[,-1],
+                                      dist = SyntheticTrial$Distance,
+                                      method = "all", groups = 3,
+                                      standardize = "hellinger",
+                                      diversity = "all")
Error in crossprod(t(vegChi), qy) : "crossprod" is not a BUILTIN function
Calls: EcotoneFinder -> <Anonymous> -> colSums -> is.data.frame
Execution halted