circle(geo, cluster.center, cluster.end)
n x 2
1
n
zones
data(pennLC) geo <- pennLC$geo[,2:3] plot(geo,type='n') text(geo,labels=1:nrow(geo)) lines( circle(geo, 23, 46), col = "red" )
Run the code above in your browser using DataCamp Workspace