Update the elements

[maelle]

I couldn't find where the elements table was created for the package. A few elements got new names and symbols: https://iupac.org/iupac-announces-the-names-of-the-elements-113-115-117-and-118/ 😄

[hafen]

Oh cool! I'll update accordingly when I have a chance.

[maelle]

Great! I know this https://github.com/andrejewski/periodic-table is up to date since @dacornu's PR, maybe an useful source?

[hafen]

Note to self: use this code (from here) to update the data:

elements <- filter(elements, !atomic.number %in% c(113, 114, 115, 116, 117))

renamed_elements <- data.frame(
  atomic.number = c(113, 114, 115, 116, 117, 118),
  symbol = c("Nh", "Fl", "Mc", "Lv", "Ts", "Og"),
  name = c("Nihonium", "Flerovium", "Moscovium", "Livermorium", "Tennessine", "Oganesson"),
  atomic.mass = c("[284]", "[289]", "[288]", "[293]", "[294]", "[294]"),
  group = c("13", "14", "15", "16", "17", "18"),
  period = rep("7", 6))

elements <- bind_rows(elements, renamed_elements)