データセット内の正と負のリターンの合計数をカウントします。

Question

特定のデータセットの正と負の合計リターンを検索しようとしています。 私は差分関数を使用して、会社のリターンとサブセット関数とそれに続くカウント関数を見つけようとしました。しかし、それは私に望ましい出力を与えません。助けてもらえますか？

ワーキング：

Date   AMZN   GOOG  WFM   MSFT 
1/2/2016 574.809998  752  29.959999 54.709999 
2/2/2016 552.099976 764.650024 28.93  53 
3/2/2016 531.070007 726.950012 28.639999 52.16 
4/2/2016 536.26001 708.01001 29.200001 52 
5/2/2016 502.130005 683.570007 29.190001 50.16 
8/2/2016 488.100006 682.73999 29.379999 49.41 
9/2/2016 482.070007 678.109985 29.059999 49.279999 
10/2/2016 490.480011 684.119995 28.870001 49.709999 
11/2/2016 503.820007 683.109985 28.93  49.689999 
12/2/2016 507.079987 682.400024 30.65  50.5 
16/02/2016 521.099976 691   30.9  51.09 
17/02/2016 534.099976 708.400024 31.76  52.419998 
18/02/2016 525   697.349976 31.389999 52.189999 
19/02/2016 534.900024 700.909973 31.389999 51.82 
22/02/2016 559.5  706.460022 30.66  52.650002 

私はそれを行うことができますかuderstandするために単独でアマゾンのリターンを決裂し、次のことを試してみました：

m<-diff(mydf$AMZN)/mydf$AMZN[-length(mydf$AMZN)] 
m 
n<-subset(m,m<0) 
c(n) 

カウント機能は、私が取得するために使用していますものです日数しかし、それは私にエラーを与える。それは正しいことですか？ Amazonのリターンがマイナスになったのは113日だった。

データセット全体でこれを行う必要があります。私。正と負の返品日数の合計を求めます。

Answer 1

Tの価格がT-1よりも高い場合、返品は肯定的です。これはまた、比較日がないため、第1日にリターンがプラスかマイナスかを知ることができないことを意味します。

あなたの説明に基づいて、次はあなたが探しているものをあなたを与える必要があります。

daily_return <- diff(df$AMZN) 

nr_pos <- sum(daily_return > 0) # 8 
nr_neg <- sum(daily_return < 0) # 6