# NOT RUN {
ggplot(sun.spct) +
geom_line() +
scale_x_wl_continuous()
ggplot(sun.spct) +
geom_line() +
scale_x_wl_continuous(-6)
ggplot(sun.spct) +
geom_line() +
scale_x_wl_continuous(sec.axis = sec_axis_w_number())
ggplot(sun.spct) +
geom_line() +
scale_x_wl_continuous(unit.exponent = -6,
sec.axis = sec_axis_w_number())
# }
Run the code above in your browser using DataCamp Workspace