0

別のデータの条件を使用して2つのデータセット間の相関を計算したい。Pの上位50％が必要で、これは中央値より大きいPの値に対応します。

      P=c(1,6,5,6,2,8,5)
      sf=c(1,2,6,6,4,5,5)
      Pf=c(1,6,5,8,4,8,5)

通常の訂正：

     cor(sf,Pf)

条件付き：

      cor(sf[P > median(P)], Pf[P > median(P)])

これは完璧に機能しました。実際のデータに同じことを適用するにはどうすればよいですか？

  with condition(using dir3(p is dir3 here)):

              ???

前もって感謝します

4

1 に答える 1

1

まったく同じコードが機能するはずです。

function(x){cor(x[,1],x[,2])}

次のように書くことができます

function(x) { 
  P  <- x[,3]
  sf <- x[,1]
  Pf <- x[,2]
  cor(sf, Pf)
}

これは

function(x) { 
  P  <- x[,3]
  sf <- x[,1]
  Pf <- x[,2]
  i <- P > median(P)
  cor(sf[i], Pf[i])
}
于 2013-03-26T11:01:21.173 に答える