powered by
readHeader(file, dec=FALSE)
## Not run: # files <- list.files(pattern = "TXT") # head <- readHeader(files[1]) # ## End(Not run)
Run the code above in your browser using DataLab