各日付グループ (1/1/2016...1/4/2016) の各列 (つまり、PB、PE、PS の四分位数) の各四分位数の平均フォワード リターン (列 fwd_rtn) を見つけようとしています。
head(df)
日付 株価 PB PE PS fwd_rtn
1 1/1/2016 A 11.90 0.4 0.10 0.57 -0.015
2 1/1/2016 B 3.56 0.8 0.09 0.26 -0.036
3 1/1/2016 C 1.29 1.2 0.18 1.60 0.10
..... .
4 2016 年 1 月 4 日 A 12.80 0.39 0.13 0.53 -0.01
5 2016 年 1 月 4 日 B 4.03 0.76 0.08 0.23 0.02
6 2016 年 1 月 4 日 C 1.83 0.87 0.14 1.16 0.03
これまでのところ、このコードを使用して、1 列の 1 日付の平均リターンを見つけることができました
df$qPB <- cut(df$PB, breaks = quantile(df$PB, c(0,.25,.5,.75,1)),include.lowest = TRUE)
aggregate(df$fwd_rtn,list(qPB = df$qPB),FUN=mean)
それは私に正しい答えを与えました。しかし、私は複数の列に対してそれを行うのに苦労しています。私は関数を使用することになっていると思いますdplyrが、gather()方法がわかりません。