Calculates taxonomic similarity based on Shimatani's index of taxonomic similarity (see Details).
similarity_shimatani(data, lookup)
matrix
; population counts
data.frame
with colnames = c('Species', 'Genus',
'Family', 'Subclass')
Returns an matrix
; pair-wise taxonomic similarity
Shimatani's taxonomic similarity index is defined:
species.similarity |
1 |
genus.similarity |
0.75 |
family.similarity |
0.5 |
subclass.similarity |
0.25 |
other.similarity |
0 |
Shimatani, K. 2001. On the measurement of species diversity incorporating species differences. Oikos 93:135<U+2013>147.
# NOT RUN {
pop <- sample(1:50, 4)
lookup <- data.frame(Subclass=c("Sapindales", "Malvales", "Fabales",
"Fabales"),
Family=c("Burseraceae", "Bombacaceae", "Fabaceae",
"Fabaceae"),
Genus=c("Protium", "Quararibea", "Swartzia",
"Swartzia"),
Species= c("tenuifolium", "asterolepis",
"simplex var.grandiflora",
"simplex var.ochnacea"))
similarity <- similarity_shimatani(pop, lookup)
# }
Run the code above in your browser using DataLab