# NOT RUN {
library(ggplot2)
library(photobiology)
ggplot(white_led.raw_spct) +
geom_line() +
scale_y_counts_continuous() +
scale_x_wl_continuous()
ggplot(white_led.raw_spct) +
geom_line() +
scale_y_counts_continuous(0) +
scale_x_wl_continuous()
ggplot(white_led.raw_spct) +
geom_line() +
scale_y_counts_tg_continuous() +
scale_x_wl_continuous()
# }
Run the code above in your browser using DataLab