[quote]
引用第1楼谢益辉于2006-12-16 14:42发表的“”:
先用read.table直接读进来,为了防止最后一行的长度不一样,可以加上fill=TRUE参数,然后as.matrix,转化为字符矩阵,再用sub/gsub之类的函数替换掉*:,这里的正则表达式(regular expression)怎么写我还没搞明白,最后字符型的数字就提取出来了,用as.numeric可以转化为数值型数据。[/quote]
Thanks!通过你的提示我找到了解决方案。
搞定了。可能不够简洁。如下:
<br />
xx=scan("file.txt",what="character")<br />
xxx=as.numeric(as.vector(as.matrix(data.frame(strsplit(xx,":"))[2,])))<br />
iii=as.numeric(as.vector(as.matrix(data.frame(strsplit(xx,":"))[1,])))<br />
<br />
raw.p=xxx[order(iii)]<br />
上面是按照冒号前面的数字排的,和开始我说得不太一样。