Creating camera trap site locations and saving in GPX format in R

[@RJG_Ecology]

Edit: I have updated the code after working with the sf devs. The code to use sf functionality and maintain gpx names (at the end) is:
write_sf(pts.sys.ll, "cam_locations.gpx", driver = "GPX",
dataset_options = "GPX_USE_EXTENSIONS=YES")