Get Bonferroni bound value based on current LISA computation and current significat p-value

lisa_bo(gda_lisa, current_p)

Arguments

gda_lisa

An instance of LISA object

current_p

A value of current siginificant p-value

Value

A numeric value of Bonferroni bound

Examples

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"])
bo <- lisa_bo(lisa, 0.05)
bo
}