r - サブセット データの平均のより良い形式

Question

私はデータセットを持っています:

    X     Y
   20     12
   24     11
   12      7
   10      2
   41     24
   13      9
   50     17
    4     12
   17     12
   35     19

ここで、20 < X < 50 のときの Y の平均を見つけなければなりません。

私の試み：

     data <- data.frame(X=c(20,24,12,10,41,13,50,4,17,35),
                        Y=c(12,11,7,2,24,9,17,12,12,19))
     sub <- subset(data,X>20 & X<50)
     mean(sub$Y)

元のデータ フレームを変更せずに、つまりサブセット化せずに 20< X<50 の場合に Y の平均を見つける直接的な方法はありますか?

Answer 1

「サブセット化せずに」とはどういう意味かわかりません。データのサブセットの平均を探しているため、ある時点で、何らかの方法でデータをサブセット化する必要があります。「サブセット関数を呼び出さず、データの別のコピーを保存しない」という意味であれば、単に行うことができます

mean(data$Y[data$X > 20 & data$X < 50])
# [1] 18