## Not run:
# ## Reads files from the specified directory and creates a new CSV at the specified path
#
# fnames <- c('boxer.wav', 'merkley.wav') # Example with 2 files
# urls <- paste("http://christopherlucas.org/transcribeR/", fnames, sep = '')
# lapply(urls, function(x) download.file(x, destfile = basename(x), mode = 'wb'))
#
# WAV_DIR <- getwd()
#
# sendAudioGetJobs(wav.dir = WAV_DIR,
# API_KEY",
# csv.location = CSV_LOCATION)
# ## End(Not run)
Run the code above in your browser using DataLab