R Совокупный и расчетный коэффициент

Question

У меня есть данные с двумя столбцами, один из которых является датой, а другой - значением; словно ниже. То, что я хотел бы сделать, это рассчитать на дату соотношение строк, где значение положительное по сравнению с количеством строк на эту дату в R. Любая подсказка?

Date      # Value
20180514  #   3
20180514  #  -1
20180514  #  -1
20180513  #   2
20180513  #   5
20180513  #  -1

Спасибо

Answer 1

База aggregate выполнит операцию со столбцами в функциях группировки:

aggregate( dat['Value'], dat['Date'], function(x=Value) sum( x >0)/length(x) )
      Date     Value
1 20180513 0.6666667
2 20180514 0.3333333

Answer 2

Я не совсем понимаю ваши цели, но вот подход аккуратного стиха:

your_data <- data.frame("Date" = c(20180514,20180514,20180514,20180513,20180513,20180513),
                    Value = c(3, -1, -1, 2, 5, -1))

library(tidyverse)

your_data %>% 
  group_by(Date) %>%
  summarise(n_pos = sum(Value > 0), n_neg = sum(Value < 0), ratio = n_pos/n_neg)

# A tibble: 2 x 4
  Date n_pos n_neg ratio
 <dbl> <int> <int> <dbl>
1 20180513     2     1 2.00 
2 20180514     1     2 0.500