ggplot(sun.spct, aes(x = wl2frequency(w.length), y = s.e.irrad)) +
geom_line() +
scale_x_frequency_continuous()
ggplot(sun.spct, aes(x = wl2frequency(w.length), y = s.e.irrad)) +
geom_line() +
scale_x_frequency_continuous(14)
Run the code above in your browser using DataLab