4

2つのデータフレームにリストされている値を相互に減算する方法についてのアドバイスを探しています。以下の2つのデータフレームAとBの例では、最初の列ベクトルが一致していることを条件に、2番目の列の値を互いに減算したいと思います。たとえば、ベクトルX1がR1の場合、5.1-5および4.8-5です。

A <-data.frame（cbind（c（'R1'、'R1'、'R2'、'R4'、'R4'、'R4'）、c（5.1,4.8,4.9,5.0,5.0,5.3） ））

B <-data.frame（cbind（c（'R1'、'R2'、'R3'、'R4'）、c（5,4.9,5.2,5.1）））

4

3 に答える 3

3

一般的なRのアドバイス：必要のないときは使用cbindしないでください：

A <- data.frame(X1=c('R1','R1','R2','R4','R4','R4'),X2=c(5.1,4.8,4.9,5.0,5.0,5.3))
B <- data.frame(X1=c('R1','R2','R3','R4'),X2=c(5,4.9,5.2,5.1))

（これらの数値の因数分解を行いました。また、因数分解に算術演算子を適用することはできません。）

一意でない一致がある場合、マージ関数はすべての可能なペアを返します。

merge(A,B, by=1)
merge(A,B, by=1)[,2] - merge(A,B, by=1)[,3]
#[1]  0.1 -0.2  0.0 -0.1 -0.1  0.2
于 2011-09-01T13:20:25.397 に答える
2

数値列が実際に数値になるようにデータを定義します。（読みやすくするためのスペースがあります！）

A <- data.frame(
  X1 = c('R1', 'R1', 'R2', 'R4', 'R4', 'R4'), 
  X2 = c(5.1, 4.8, 4.9, 5.0, 5.0, 5.3)
)
B <- data.frame(
   X1 = c('R1', 'R2', 'R3', 'R4'), 
   X2 = c(5, 4.9, 5.2, 5.1)
)

データフレームをマージしてから、結果の列を減算します。

merged <- merge(A, B, "X1")
with(merged, X2.x - X2.y)
于 2011-09-01T13:15:37.023 に答える
0

これがベクトル名の解決策です。

A <- data.frame(
  X1 = c('R1', 'R1', 'R2', 'R4', 'R4', 'R4'), 
  X2 = c(5.1, 4.8, 4.9, 5.0, 5.0, 5.3),
  stringsAsFactors = FALSE
)

L <- c(5, 4.9, 5.2, 5.1)
names(L) <- c('R1', 'R2', 'R3', 'R4')

A$X2-L[A$X1]
于 2011-09-02T16:19:26.940 に答える