length(refractive_index.mspct)
names(refractive_index.mspct)
refractive_index.mspct$PMMA # acrylic or Plexiglas
refractive_index.mspct[["PMMA"]]
# Compute spectral reflectance for an interface between acrylic and air
# incidence angle of colimated light 60 degrees away from the normal.
Rfr_from_n(angle_deg = 60, n = refractive_index.mspct[["PMMA"]])
Run the code above in your browser using DataLab