#use internal data as an example.
## Not run:
# file <- system.file("extdata", "1999.csv", package = "hyfo")
# folder <- strsplit(file, '1999')[[1]][1]
# a <- collectData_txt_anarbe(folder)
# ## End(Not run)
# More examples can be found in the user manual on http://yuanchao-xu.github.io/hyfo/
Run the code above in your browser using DataLab