The goal of scalednap is to …
You can install the stable version of scalednap from CRAN with:
install.packages("scalednap")If you want to try the latest development version with the newest updates, you can install it from CRAN using:
# install.packages("pak")
pak::pak("aavellone/scalednap-r")This is a basic example which shows you how to solve a common problem using scalednap:
library(scalednap)
# --- EXAMPLE 1: Standard input (vectors and matrices) ---
edg <- c(1, 2, 1, 3, 1, 4, 2, 3, 3, 4, 4, 5, 5, 6, 5, 7, 6, 7)
edge_list <- matrix(edg, ncol = 2, byrow = TRUE)
vertex <- c(1, 2, 3, 4, 5, 6, 7)
cluster_milano(x = vertex, edge_list = edge_list)
#> $membership
#> [1] 1 1 1 1 2 2 2
#>
#> $score
#> [1] 0.7662338
#>
#> $seed
#> [1] "3563829245"
# --- EXAMPLE 2: igraph input ---
if (requireNamespace("igraph", quietly = TRUE)) {
g <- igraph::make_ring(10)
cluster_milano(g)
}
#> $membership
#> [1] 1 1 2 2 3 3 4 4 5 5
#>
#> $score
#> [1] 1.5
#>
#> $seed
#> [1] "806094222"