# Example usage:
index_nonislands <- c(1, 3)
data <- list(
list(c(1, 1, 1), c(0, 1, 0.5), c(1, 0, 1)), # tip 1
list(c(1, 0.5, 0), c(1, 1, 0.5), c(1, 1, 1)) # tip 2
)
sample_n <- 2
get_nonislandSDFreqM(index_nonislands, data, sample_n, categorized_data = TRUE)
Run the code above in your browser using DataLab