Filters pas object sensors based on a bounding box.

pas_filterArea(pas = NULL, w = NULL, e = NULL, s = NULL, n = NULL)

Arguments

pas

PurpleAir Synoptic pas object.

w

West edge of area bounding box (deg E).

e

East edge of area bounding box (deg E).

s

South edge of area bounding box (deg N).

n

North edge of area bounding box (deg N).

Value

A subset of the given pas object.

See also

Examples

library(AirSensor) pas <- example_pas range(pas$longitude)
#> [1] -165.37974 -68.46915
range(pas$latitude)
#> [1] 19.07082 71.30136
scsb <- pas %>% pas_filterArea( w = -118.10, e = -118.07, s = 33.75, n = 33.78 ) range(scsb$longitude)
#> [1] -118.0945 -118.0782
range(scsb$latitude)
#> [1] 33.75989 33.77767
if ( interactive() ) { pas_leaflet(scsb) }