Function Repository Resource:

ElementDesignator

Source Notebook

Obtain the International Union of Pure and Applied Chemistry (IUPAC) temporary designators for new elements

Contributed by: Wolfram Chemistry Team

ResourceFunction["ElementDesignator"][z]

gives the temporary atomic symbol for the element with atomic number z.

ResourceFunction["ElementDesignator"][z, property]

gives the value of the specified property for the element with atomic number z.

ResourceFunction["ElementDesignator"][{z1, z2,},property]

gives the list of values of the specified property for each of the zi.

Details and Options

z can be an Integer atomic number or a String containing a valid IUPAC temporary designator.
property must be “AtomicNumber", "AtomicSymbol", "Name" or "PropertyAssociation" and defaults to "AtomicSymbol".
ResourceFunction["ElementDesignator"][EntityClass["Element",{EntityProperty["Element",entProp]EqualTo[z]},property] is equivalent to ResourceFunction["ElementDesignator"][z,property] when entProp is "AtomicNumber", "AtomicSymbol" or "Name".

Examples

Basic Examples (5) 

Compute the temporary atomic symbol for element 234:

In[1]:=
ResourceFunction["ElementDesignator"][234]
Out[1]=

Determine the temporary name for the element for element 500:

In[2]:=
ResourceFunction["ElementDesignator"][500, "Name"]
Out[2]=

Determine the atomic number for the element with the temporary atomic symbol Ubn:

In[3]:=
ResourceFunction["ElementDesignator"]["Ubn", "AtomicNumber"]
Out[3]=

Return all results as an Association for the element with the temporary name unseptbium:

In[4]:=
ResourceFunction[
 "ElementDesignator"]["unseptbium", "PropertyAssociation"]
Out[4]=

Determine the temporary atomic symbol for a List of elements:

In[5]:=
ResourceFunction["ElementDesignator"][{183, 393, 9431}]
Out[5]=

Possible Issues (2) 

Atomic numbers start at 1 so 0 and negative integers fail:

In[6]:=
ResourceFunction["ElementDesignator"][{0, -10}]
Out[6]=

Atomic symbols are case sensitive:

In[7]:=
ResourceFunction["ElementDesignator"][{"USB", "Usb"}, "AtomicNumber"]
Out[7]=

Neat Examples (1) 

Find temporary atomic symbols corresponding to English words with a frequency greater than "dog" for unknown elements with an atomic number less than 1000:

In[8]:=
WordCloud[With[{dog = WordFrequencyData["dog"]},
  With[{e = ResourceFunction["ElementDesignator"][#, "PropertyAssociation"]}, Tooltip[Column[{e["AtomicNumber"], #}, Frame -> True], e["Name"]]] & /@ Select[Select[
     ResourceFunction["ElementDesignator"][Range[119, 999]], DictionaryWordQ[ToLowerCase[#]] &], WordFrequencyData[ToLowerCase[#]] > dog &]], WordSpacings -> {10, 10}]
Out[8]=

Publisher

WolframChemistry

Version History

  • 1.0.0 – 23 November 2020

Source Metadata

Related Resources

License Information