# load("nanoarray.ldev");

T = getsweepresult("analyte_index_sweep","T");
image(T.lambda*1e6, T.analyte_index, T.T_front, "lambda(um)", "analyte index", "Transmission");
setplot("colorbar min",0);
setplot("colorbar max",1);

R = getsweepresult("analyte_index_sweep","R");
image(R.lambda*1e6, R.analyte_index, R.T_front, "lambda(um)", "analyte index", "Reflection");
setplot("colorbar min",0);
setplot("colorbar max",1);

image(R.lambda*1e6, R.analyte_index, 1.0-(T.T_front+R.T_front), "lambda(um)", "analyte index", "Absorption");
setplot("colorbar min",0);
setplot("colorbar max",1);