Объединение одинаковых значений в столбцах и подсчет dplyr

Question

Я получил эту таблицу (образец всего набора данных) ниже, и мне нужно сжать ее до двух рядов (зимой и летом) и подсчитать медали для каждого сезона.

Как я могу сделать это для всего набора данных?

   TAG  TEAM       SEASON       MEDALS

1 AFG  afganistan  winter         1

2 AFG  afganistan  summer         0

3 AFG  afganistan  winter         3

4 AFG  afganistan  summer         0

5 AFG  afganistan  winter         1

6 AFG  afganistan  summer         0