You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

15 lines
237 B

valid_date <- function(date) {
as.POSIXlt(date[1])
}
valid_lon <- function(lon) {
lon <- lon[1]
stopifnot(lon >= -180 & lon <= 180)
lon
}
valid_lat <- function(lat) {
lat <- lat[1]
stopifnot(lat >= -90 & lat <= 90)
lat
}