一个R语言的循环不知道出了什么错一直报错

result<-c()
Num<-c(1:200)
for (j in Num)
{

for (i in Num) 
{
    append(result,cor_train[(i+1):200,j],after = length(result))
}

}

Error in cor_train[(i + 1):200, j] : subscript out of bounds

cor_train是一个200*200的Dataframe

subscript out of bounds ： 越界了，，，，