Lab 1

1. ¿Que mes es el que tiene la mayor demanda?

hour%>%
  group_by(mnth)%>%
  summarize(total = sum(cnt))%>%
  arrange(desc(total))

2. ¿Que rango de hora es la de mayor demanda?

hour%>%
  group_by(hr)%>%
  summarize(total = sum(cnt))%>%
  arrange(desc(total))

3. ¿Que temporada es la mas alta?

hour%>%
  group_by(season)%>%
  summarize(total = sum(cnt))%>%
  arrange(desc(total))

4. ¿A que temperatura baja la demanda?

hour%>%
  group_by(temp)%>%
  summarize(total = sum(cnt))%>%
  arrange(-desc(total))

5. ¿A que humedad baja la demanda?

hour%>%
  group_by(hum)%>%
  summarize(total = sum(cnt))%>%
  arrange(-desc(total))

6. ¿Que condiciones serian ideales para nuestra demanda?

• 0.13de humedad, temp = 1, Season = 3, Hour = 17 y month = 8