2013-12-11 75 views
0

我有一個列表,其中每個元素是一個數據幀。距離列表中的

list[1]

$`1` 
     id yr mo dy hr lon lat 
    00020 1860 10 30 1 7.5 -42. 
    00020 1860 10 30 2 7.6 -43. 
    00020 1860 10 30 4 7.9 -44. 
    00020 1860 10 30 5 8.2 -46. 

我想兩個連續點
之間的兩個連續點之間添加三個額外的列和計算每個列表

的空間差異
時間差異 插值線的相關係數

,但只有當兩個連續的點具有小於T *時間差異否則把0

我已知距離可以與岩石圈來計算,但我有一些麻煩,在列表中進行操作。

非常感謝

回答

1

,如果你知道如何做到這一點的一個data.frame然後只是你的dats.frames

例如列表上使用lapply

#create your new columns function as it would work for one data.frame 

foo <- function(DF){ 
DF$new1 <- distm(x,y)....etc 
DF$new2 <- .......etc 
DF$new3 <- cor(x,y).......etc 
return(DF) 
} 

然後lapply在列表返回的data.frames列表與新列:

DFlist <- list(DF1, DF2, DF3) 

lapply(DFlist, foo)