The reflectance is:

Created by webMathematica

The transmittance is:

Created by webMathematica