update tests for designdist examples

Separate commit in case designdist changes are cherry-picked.

tests/Examples/vegan-Ex.Rout.save

@@ -2480,11 +2480,15 @@ Icmaeric Cladcerv Claddefo Cladphyl
 > ### ** Examples
 > 
 > data(BCI)
-> ## Four ways of calculating the same Sørensen dissimilarity
+> ## Five ways of calculating the same Sørensen dissimilarity
 > d0 <- vegdist(BCI, "bray", binary = TRUE)
 > d1 <- designdist(BCI, "(A+B-2*J)/(A+B)")
 > d2 <- designdist(BCI, "(b+c)/(2*a+b+c)", abcd = TRUE)
 > d3 <- designdist(BCI, "gamma/alpha - 1", alphagamma = TRUE)
+> d4 <- designdist(BCI, "dist(x, 'manhattan')/(A+B)")
+> ## Zero-adjusted Bray-Curtis of Clarke et al. (J Exp Marine Biol & Ecol
+> ## 330:55-80; 2006)
+> dbr0 <- designdist(BCI, "(A+B-2*J)/(A+B+2*min(x[x>0]))", terms = "minimum")
 > ## Arrhenius dissimilarity: the value of z in the species-area model
 > ## S = c*A^z when combining two sites of equal areas, where S is the
 > ## number of species, A is the area, and c and z are model parameters.
@@ -9142,7 +9146,7 @@ Procrustes sum of squares:
 > cleanEx()
 > options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  8.684 0.353 9.056 0 0 
+Time elapsed:  8.741 0.323 9.079 0 0 
 > grDevices::dev.off()
 null device 
           1