Adjust add points function?

[jwiggi18]

Current
#' function to add pbdb paleo data points (lat and long) to gplatesr created maps
#'@param map a map created using gplatesr plot_gplates or black_white functions
#'@param df a data frame containing pbdb_data.paleolng and pbdb_data.paleolat
#'@param ptcolor a character vector indicating the desired color of added data points
add_points <- function(map, df, ptcolor) {
map + geom_point(data = df, aes(x=pbdb_data.paleolng, y=pbdb_data.paleolat), color = ptcolor)
}

Brian suggested
my_map <- add_points(taxon=“Anomalocaris”, period=“Cambrian”, map_cache=maplist)