# NOT RUN {
# Example 1: A cluster map of Dutch dialects
data(distDutch)
dutch_points <- get_points(system.file("extdata", "DutchKML.kml", package="dialectR"))
dutch_polygons <- get_polygons(system.file("extdata", "DutchKML.kml", package="dialectR"))
cluster_map(distDutch[1:100,1:100], dutch_points, dutch_polygons, 5, "ward.D2")
# }
Run the code above in your browser using DataLab