paste0(pasteDate("file", "name", sep="-", sep.date="_"), ".csv")
paste0(paste0date("file", "name", sep.date="_"), ".csv")
data(abmibirds)
x <- data.frame(Name=levels(abmibirds[["Common.Name"]]),
NameAlnum=nameAlnum(levels(abmibirds[["Common.Name"]])))
x[grep("'", x$Name),]
Run the code above in your browser using DataLab