2013-08-26 112 views

回答

2

我想你正在尋找read.table

read.table("http://www.csie.ntu.edu.tw/~cjlin/libsvmtools/datasets/regression/mg") 

如果你想從數值刪除列號和冒號,你可以使用gsub

dat <- read.table("http://www.csie.ntu.edu.tw/~cjlin/libsvmtools/datasets/regression/mg", 
        stringsAsFactors = FALSE) 

dat[-1] <- lapply(dat[-1], function(x) as.numeric(gsub(".:", "", x))) 
+0

我先救數據爲mg.txt。然後:w <-read.fwf(「mg.txt」,width = c(13,3,13,3,13,3,13,3,13,3,13,3,13)) ww < - w [,seq(1,13,by = 2)] 它也可以得到結果。非常感謝。 – TongXJ