This function extracts file headers from
files. Recommended is to use this function
with the results from extractFilenames
Examples
if (FALSE) { # \dontrun{
prompt <- "how do I perform PCA on data in a file called test.txt?"
filenames <- extractFilenames(prompt)
fileHeaderPrompt(filenames)
} # }