#Move files from desktop (only texts files) to GitHub. The other for processing/annotation.
##OANC - Journal portion
setwd("C:\\Users\\jtimm\\Desktop\\OANC-1.0.1-UTF8\\OANC\\data\\written_1\\journal\\slate")
nonTxts <- list.files(path="C:\\Users\\jtimm\\Desktop\\OANC-1.0.1-UTF8\\OANC\\data\\written_1\\journal\\slate", recursive=TRUE,pattern = ".anc|.xml")
filesFrom <- "C:\\Users\\jtimm\\Desktop\\OANC-1.0.1-UTF8\\OANC\\data\\written_1\\journal\\slate"
filesTo <- "C:\\Users\\jtimm\\Google Drive\\GitHub\\packages\\corpusdatr"
file.remove(nonTxts)
file.copy(filesFrom,filesTo, recursive=TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.