chem <- read.csv( "https://pasta.lternet.edu/package/data/eml/edi/199/13/3f09a3d23b7b5dd32ed7d28e9bc1b081" ) # catwalk <- read.csv("https://pasta.lternet.edu/package ...