Override the summary() function for spatial weights
# S3 method for class 'Weight'
summary(object, ...)
A summary description of an instance of Weight-class
if (FALSE) { # \dontrun{
library(sf)
guerry_path <- system.file("extdata", "Guerry.shp", package = "rgeoda")
guerry <- st_read(guerry_path)
queen_w <- queen_weights(guerry)
summary(queen_w)
} # }