I try to apply Ripley's K Function to a point pattern. The problem is that values are too high on Y-axis. Points are cultural centers (where people do artistic activities). In my dataset, there are 306 cultural centers in total. But in Ripley's plot, it appears 2.000.000 points grouped in 200 mts. Sthg imposible. Does anyones know why this error occurs?
Search data set
espacios <- read_sf("http://cdn.buenosaires.gob.ar/datosabiertos/datasets/ministerio-de-cultura/espacios-culturales/espacios-culturales.geojson") %>%
st_transform(crs = 5347)
1. Build neighborhood
palermo_espacios <- espacios %>%
filter(BARRIO == "PALERMO") %>%
select(FUNCION_PRINCIPAL, BARRIO, LONGITUD,LATITUD, geometry)
2. Point pattern
act_ppp_espacios <- as.ppp(st_geometry(palermo_espacios[!st_is_empty(palermo_espacios), ]))
3. Ripley's K Function
K <- Kest(act_ppp_espacios, correction = "none")
4. plot(K)
In axis Y we should get values from 0 to 306, which is the total values of my data set. Instead there are values from 0 to 4.000.000
Any help would be greatly appreciated.