R 对于循环，如果文件不存在，则转到下一条记录

我有以下代码，由于某种原因，我无法将其转到下一条记录。我把指纹放在if前面了！file.exists命令，我得到所有的URL，我把它放在它是否的地方，但没有显示任何内容，所以我认为文件没有通过file.exists部分。我测试了5个URL，它们在web目录中工作/存在。我在其他循环中使用了next，没有任何问题。我还尝试在字符串的前面添加url=。我在这里搜索过，但我只能找到我在示例中使用的公式。请指出我忽略了什么愚蠢的事情。哈谢谢

gidURLs <- as.list(as.data.frame(t(allGids)))

#get pitches

#set filename

for (thisgidURL in gidURLs) {

innallURL = paste(thisgidURL, "inning/inning_all.xml", sep="")

  if (!file.exists(innallURL)) next

print(innallURL)

pitches <- read_xml(innallURL)

# get all at-bats ---------------------------------------------------------

atbat <- xml_find_all(pitches, "//atbat")

# make a giant data frame -------------------------------------------------

bind_rows(lapply(atbat, function(x) {

  pitches <- xml_find_all(x, "./pitch")

bind_rows(lapply(pitches, function(y) {
  data.frame(t(xml_attrs(y)), stringsAsFactors=FALSE)
})) -> pitch_dat

pitch_dat$atbat_num <- xml_attr(x, "num")

pitch_dat

})) -> bats

game_id = substr(url, 66, 95)
bats$game_id <- game_id

allbatsdf <- data.frame(bats)
allbats <- rbind(bats, allbats)

}

---

我们可以使用httr包来使用GET方法

---

谢谢令人沮丧的是，这么简单的东西没有在其他地方出现。我想我没有使用正确的关键字。

"http://gd2.mlb.com/components/game/win/year_2015/month_01/day_30/gid_2015_01_30_magwin_oriwin_1/inning/inning_all.xml"
"http://gd2.mlb.com/components/game/win/year_2015/month_01/day_31/gid_2015_01_31_sydwin_prtwin_1/inning/inning_all.xml"

library(httr)
if(GET(innallURL)$status_code!=200) next