[問題] 將多個data frame放入list進行操作

看板R_Language作者ireullin (raison detre)時間10年前 (2014/01/29 14:25)推噓3(3推 0噓 6→)

留言9則, 3人參與討論串1/2 (看更多)

很抱歉又來問一些可能是很基礎的問題我有五張相同格式的csv表我想把他讀進來之計算之後在每張表的最後多加兩個columns 所以我將他放進一個 list ( 我原本想用array,可是好像不行 ) 然後用一個迴圈去處理他可是會出現以下的警告 Warning messages: 1: In df[i]$difftime <- difftime(dtTime, dtBase) : number of items to replace is not a multiple of replacement length 而且每張表好像都沒有被多加columns 請問我是有那裡弄錯了嗎另外請問list與array的差別是? df = list( read.csv(file='worker05.csv', header=TRUE), read.csv(file='worker10.csv', header=TRUE), read.csv(file='worker15.csv', header=TRUE), read.csv(file='worker20.csv', header=TRUE), read.csv(file='worker25.csv', header=TRUE) ) for(i in 1:length(df)) { tmp <- substring( as.character(df[i]$time), 7,14) dtTime <- c(strptime( tmp, format="%H:%M:%S")) dtBase <- rep(dtTime[1], length(dtTime)) # 填入計算後的資料 df[i]$spentime <- difftime(dtTime, dtBase) df[i]$usage <- 100 - c(df[i]$idl) } -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 111.250.26.236

→

ching0629

01/29 15:11, , 1^F

01/29 15:11, 1^F

→

ching0629

01/29 15:12, , 2^F

01/29 15:12, 2^F

→

ching0629

01/29 15:14, , 3^F

01/29 15:14, 3^F