小菜刚学R，想请教下如何把for循环里面的每一步数据提取出来。
程序如下：
no<-c(1,1,1,1,1,2,2,2,2,2,3,3,3,4,4,4,4,4,5,5)
sta<-sample(20)
a<-data.frame(no,sta)
u<-list()
for (i in c(1:5)) {
  u<-diff(a[no==i,"sta"])
  uu<-c(0,u)
  cat(uu,"\n")
}
cat显示结果为：
0 1 -15 9 -40 -5 2 -7 -3
0 -6 9
0 -5 -8 4 -9
0 -16 我想提取出cat显示的结果。我式了下u<-list()
for (i in c(1:5)) {
  u<-diff(a[no==i,"sta"])
  uu<-c(0,u)
}
可是提示“ number of items to replace is not a multiple of replacement length” 请高手指点一二，谢谢