unzip in r example

Example: how to unzip the data in r

## unzip()
unzip(zipfile="file name",exdir=getwd())