# using the apparent sun elevation
relative_AM(elevation.angle = c(90, 60, 30, 1, -10))
relative_AM(elevation.angle = c(90, 60, 30, 1, -10),
occluded.value = Inf)
relative_AM(zenith.angle = 0)
# using the true or astronomical sun elevation
relative_AMt(elevation.angle = c(90, 60, 30, 1, -10))
relative_AMt(elevation.angle = c(90, 60, 30, 1, -10),
occluded.value = Inf)
relative_AMt(zenith.angle = 0)
# Define example geographic and time coordinates
baires.geo <-
data.frame(lat = 34.60361, lon = -58.38139, address = "Buenos Aires")
# using time and geographic coordinates
library(lubridate)
relative_AM_geotime(ymd_hms("2014-06-23 12:00:00",
tz = "America/Argentina/Buenos_Aires"),
geocode = baires.geo)
relative_AMt_geotime(ymd_hms("2014-06-23 12:00:00",
tz = "America/Argentina/Buenos_Aires"),
geocode = baires.geo)
relative_AM_geotime(ymd_hms("2014-06-23 12:00:00",
tz = "America/Argentina/Buenos_Aires") +
hours(0:12),
geocode = baires.geo)
Run the code above in your browser using DataLab