R/cut_data.R

Defines functions cut_data

Documented in cut_data

cut_data <- function(x, y, data, df.x = "x", df.y = "y", side.length){
  return(
  data[data[,df.x] < x + side.length &
       data[,df.x] > x - side.length &
       data[,df.y] < y + side.length &
       data[,df.y] > y - side.length  , ])
}
ricardoochoa/urban.context documentation built on May 27, 2019, 7:41 a.m.