martinEk | R Documentation |
Martin and Ek 1984
martinEk(dbh, dist, focal_dbh)
dbh |
vector of DBH (diameter at breast height) measurements of competitor trees |
dist |
vector of distances from focal tree to competitor trees |
focal_dbh |
DBH of focal tree |
Gives the sum of ratios of competitor to focal tree DBHs, multiplied by the exponential of distances divided by competitor DBH plus focal DBH. Given by the equation:
\sum_{j\neq{}i}^{n} (d_{j} / d_{i}) exp((16l_{ij}) / (d_{i} + d_{j}))
value of competition index for focal tree
Martin G. L., Ek A. R. (1984). A Comparison of Competition Measures and Growth Models for Predicting Plantation Red Pine Diameter and Height Growth. Forest Science. Volume 30. Pages 731-743.
data(bicuar)
nb <- nearNeighb(bicuar$x, bicuar$y, bicuar$stem_id, k = 4)
lapply(nb, function(x) {
nb <- merge(x, bicuar, by.x = "nb", by.y = "stem_id")
focal_diam <- unique(bicuar[bicuar$stem_id == nb$focal,"diam"])
martinEk(nb$diam, nb$nb_dist, focal_diam)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.