Miscellaneous`ResonanceAbsorptionLines`
The functions defined in Miscellaneous`ResonanceAbsorptionLines` allow you to efficiently search through an atomic data table for resonance absorption lines. Other functions give absorption maps of particular elements or of a particular wavelength range.
Finding the resonance absorption lines.
This loads the package.
In[1]:= <<Miscellaneous`ResonanceAbsorptionLines`
This gives the resonance absorption lines in the wavelength range between 1215 Angstrom and 1220 Angstrom.
In[2]:= FindIons[1215 Angstrom, 1220 Angstrom]
Out[2]=
Properties of resonance absorption lines.
AtomicData[element] gives a list of properties for the lines produced by the specified element. These properties are vacuum wavelength, air wavelength, lower term fine structure energy, statistical weight of the lower level, statistical weight of the upper level, relative strength, transition probability, damping constant, and oscillator strength of the element. Individual properties can be selected using the functions VacuumWavelength, AirWavelength, LowerTermFineStructureEnergy, LowerStatisticalWeight, UpperStatisticalWeight, RelativeStrength, TransitionProbability, DampingConstant, and OscillatorStrength.
Properties of resonance absorption lines paired with associated wavelengths in vacuum.
This gives a list of pairs of vacuum wavelength and oscillator strength for the resonance absorption lines produced by Beryllium.
In[3]:= OscillatorStrength[Beryllium]
Out[3]=
The ionization level of an element can be specified by giving the quoted roman numeral, "I", "II", "III", "IV", "V", or "VI", as a second argument to a property function.
This gives the paired data for vacuum wavelength and oscillator strength for the lines produced by Beryllium at the ionization level I.
In[4]:= OscillatorStrength[Beryllium, "I"]
Out[4]=
Absorption maps.
This gives the absorption map in the range between 1213 Angstrom and 1215 Angstrom.
In[5]:= WavelengthAbsorptionMap[1213 Angstrom, 1218 Angstrom]
Out[5]=
Here is the absorption map of Hydrogen.
In[6]:= ElementAbsorptionMap[Hydrogen]
Out[6]=
You can zoom in on a particular area of the spectrum.
In[7]:= ElementAbsorptionMap[Hydrogen, PlotRange>{{915, 950}, All}]
Out[7]=
Here is the absorption map of Carbon at the ionization level I.
In[8]:= ElementAbsorptionMap[Carbon, "I"]
Out[8]=
