编了下面一段程序，其中必要的参数step、datai等都已在前面的程序段指定。想通过for循环计算不同的numofLi值对应的valueq[[j]]的值j/(numofLi+1)，并将其所有计算值存在文本valueq.txt。究竟这个valueq应该如何定义才好呢？？初学者，望高手们不吝赐教。计算中遇到的问题附后。
valueq=list()
for (i in 1:step)
{
numofLi=length(datai[[i]])
write(numofLi,file="numofLi.txt",ncolumns=1,append=TRUE,sep="  ")
sortq<-sort(datai[[i]])
for (j in 1:numofLi)
{
valueq[[j]]=j/(numofLi+1)
}
write(valueq,file="valueq.txt",ncolumns=1,append=TRUE,sep="  ")
write(sortq,file="sortq.txt",ncolumns=1,append=TRUE,sep="  ")
}

提示错误：
错误于cat(list(...), file, sep, fill, labels, append) :
  cat目前还不能处理1(种类为'list')参数