Rのデータフレームの新しい列に新しい値を追加するには？

Question

データフレームに格納されたデータを使って計算を行う必要があります。このデータフレームの新しい列に結果を置きます。

初期データフレーム：

> str(mydf) 
    'data.frame': 1122 obs. of 6 variables: 
    $ MMSI  : num 2.73e+08 2.73e+08 2.73e+08 2.73e+08 2.73e+08 ... 
    $ MMSI.1  : num 2.73e+08 2.72e+08 2.72e+08 2.72e+08 6.67e+08 ... 
    $ LATITUDE : num 46.9 46.9 46.9 46.9 46.9 ... 
    $ LONGITUDE : num 32 32 32 32 32 ... 
    $ LATITUDE.1 : num 46.9 46.9 46.9 46.9 46.9 ... 
    $ LONGITUDE.1: num 32 32 32 32 32 ... 

は、今私は

は、次のコードを実行している...現在の生のデータを使用して操作の結果が含まれている新しい列を追加する必要があります。

library(geosphere) 
    > mydf$distance <- with(mydf, distGeo(c(mydf$LONGITUDE,mydf$LATITUDE),c(mydf$LONGITUDE,mydf$LATITUDE))) 
    Error in .pointsToMatrix(p1) : Wrong length for a vector, should be 2 

私はそれが関数distGeoのデータの構造が異なるはずであることを理解しています。 このエラーを修正する方法、または新しい列のポイント間の距離を取得するコードを変更する方法はありますか？

Answer 1

データを見ることなく、1点間の距離を計算しようとしているようです。第二の点は、おそらく名前の列の末尾に.1含まれている必要があり

library(geosphere) 
mydf$distance <- with(mydf, distGeo(c(LONGITUDE, LATITUDE), c(LONGITUDE.1, LATITUDE.1))) 

それは誤りのように見えますが、あなたが個別に各列の代わりにデータフレーム全体を渡しているということです更新。 `データの一部をdput`してください。この

apply(mydf, 1, function(x) distGeo(x[c("LONGITUDE","LATITUDE")],x[c("LONGITUDE.1","LATITUDE.1")])) 

それとも、それは行列

distGeo(mydf[,c("LONGITUDE", "LATITUDE")], mydf[,c("LONGITUDE.1", "LATITUDE.1")])