Unzipping a zip archive is done with unzip function from the utils package (which is included in base R).
unzip(zipfile = "bar.zip", exdir = "./foo")
This will extract all files in "bar.zip" to the "foo" directory, which will be created if necessary. Tilde expansion is done automatically from your working directory. Alternatively, you can pass the whole path name to the zipfile.