Nothing
## ----echo=FALSE---------------------------------------------------------------
knitr::opts_chunk$set(fig.width=8, fig.height=4)
## ----message=FALSE------------------------------------------------------------
library(photobiology)
library(photobiologyWavebands)
library(photobiologySun)
library(lubridate)
library(ggspectra)
theme_set(theme_bw())
## -----------------------------------------------------------------------------
names(sun_reference.mspct)
## -----------------------------------------------------------------------------
sun_reference.mspct$Gueymard.AM0
## -----------------------------------------------------------------------------
sun_reference.mspct[["Gueymard.AM0"]]
## -----------------------------------------------------------------------------
sun_reference.mspct["Gueymard.AM0"]
## -----------------------------------------------------------------------------
sun_reference.mspct[grep("AM0", names(sun_reference.mspct), ignore.case = TRUE)]
## -----------------------------------------------------------------------------
autoplot(gap.mspct$spct.01)
## -----------------------------------------------------------------------------
ggplot(gap.mspct$spct.01, unit.out = "photon") +
geom_line(linetype = "dashed")
## -----------------------------------------------------------------------------
autoplot(sun_hourly_august.spct, unit.out = "photon")
## -----------------------------------------------------------------------------
head(as.data.frame(gap.mspct$spct.01))
## -----------------------------------------------------------------------------
attach(gap.mspct)
q_irrad(gap.mspct$spct.01, Red())
detach(gap.mspct)
## -----------------------------------------------------------------------------
attach(gap.mspct)
with(spct.01, max(w.length))
detach(gap.mspct)
## -----------------------------------------------------------------------------
with(gap.mspct, q_response(spct.01, Red()))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.