#' kth largest cluster size from segmented array.
#'
cluster_size = function(k,arr) {
cluster_label = 1+k # first element is background
seg_table = table(arr)
if(length(seg_table) == 1) {
return(0)
} else {
return(seg_table[cluster_label])
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.