我正在尝试从互联网下载以下 zip 并从中提取 .shp 文件： https://www.wpc.ncep.noaa.gov/archives/ero/20181227/shp_94e_2018122701.zip
在 .zip 文件中，我尝试提取 .shp 文件：94e2701.shp
（我想在 R 中执行此操作，以便我可以自动执行此过程来下载多个日期的 .shp 文件）。
根据一些阅读，这是我尝试过的代码：
shp_url = "https://www.wpc.ncep.noaa.gov/archives/ero/20181227/shp_94e_2018122701.zip"
tmp = tempfile()
download.file(shp_url,tmp,mode="wb")
# I have also tried without the "mode" argument but have gotten the same result
f_name = "94e2701.shp"
data <- sf::st_read(unz(tmp,f_name))
# Error: Cannot open "3"; The file doesn't seem to exist.
unlink(tmp)
当我转到临时文件的位置时，我看到它是这样的：“file1b9026cd6821”，但它不是 .zip，所以我无法从中提取任何内容/进入其中。
我在这里做错了什么？非常感谢任何帮助或指导！谢谢！