data(data_ex_genind)
suppressWarnings(mat_w <- graph4lg::mat_geo_dist(data = pts_pop_ex,
ID = "ID",
x = "x",
y = "y"))
g_percol(x = mat_w)
Run the code above in your browser using DataLab