for循环的意外行为

我有一个名为data.txt的数据表

2001 109428 2002 117034 2003 147405 2004 142642 2005 148161 2006 145700 2007 125617 2008 139669 2009 90575 2010 111989 2011 126130 2012 111258 2013 103455 2014 106235 2015 108819 2016 119000 2017 21908

---

似乎它只读取了我表格的第17行，我如何解决这个问题？for循环不应该将从1到17的所有行连接到我的数字集中吗？

每次循环时，您都会覆盖

set

，请尝试像这样附加集

set它可以工作，谢谢！我不知道如何给你一个向上投票或类似的积分，所以如果你想告诉我。你每次循环都要覆盖
set
，请尝试像这样附加set
set，谢谢！我不知道如何给你一个投票或类似的学分，所以如果你想告诉我。
carAge<- read.table('data.txt',header=FALSE)
for (i in 1:17){
set <- rep(carAge[i,1],carAge[i,2])
}
print(mean(set))

[1] 2017