Update 4ChanScraperv2.R

I added an automatic CSV naming scheme based on date and time, directly into your `~/Documents/Stats/4Chan Scraper/` folder.
This commit is contained in:
Lucky 2023-08-24 15:09:25 -03:00 committed by GitHub
parent b97e8f05b8
commit 0802c295d6
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -328,5 +328,6 @@ tidy_pol_fixed2 %>%
# Time to Save the Data
# Make sure to change the date when saving to not overwrite the old data
#write.csv(tidy_pol_fixed, "~/Documents/Stats/4Chan Scraper/Aug-22-2023-1116h.csv", row.names=FALSE)
timestamp <- format(Sys.time(), "%b %d %Y %X")
filename <- paste0("~/Documents/Stats/4Chan Scraper/",timestamp,".csv")
write.csv(tidy_pol_fixed2, file = filename)