Get numbers of neighbors for all observations
lisa_num_nbrs(gda_lisa)An instance of LISA object
A numeric vector of the number of neighbors
if (FALSE) {
library(sf)
guerry_path <- system.file("extdata", "Guerry.shp", package = "rgeoda")
guerry <- st_read(guerry_path)
queen_w <- queen_weights(guerry)
lisa <- local_moran(queen_w, guerry["Crm_prs"])
nn <- lisa_num_nbrs(lisa)
nn
}