各位大神前几天按特定需求提取行以搞定，现付代码一点小小的想法还请大家多多指教。另外现在又遇到了新的问题，如下图所示，我把行能打印出来，但是发现无法保存出来，或者只能保存一行。感觉是哪行位置没放对，请大家看看。
for( i in data1$Sta ){
     for( j in data2$Sta){
        if( i==j){
                print(data2[which(data2$Sta==j):(which(data2$Sta==j)+9),]) #提取j所在行以及之后的9行
             }
       }
}

图1是打印在显示器上，图2是保存成subjec但是只有1行，我想保存的是所有j行。