You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
14 lines
431 B
R
14 lines
431 B
R
##################################################
|
|
################ wavelength2num ##################
|
|
##################################################
|
|
|
|
wavelength2num <- function(wavelength) {
|
|
# Converts wavelength (nm) to wavenumber (cm-1)
|
|
# Only valid for absolute wavelengths,
|
|
# NOT delta wavelengths (ranges)
|
|
# http://www.powerstream.com/inverse-cm.htm
|
|
wavenumber <-
|
|
10E6 / wavelength
|
|
return(wavenumber)
|
|
}
|