theme_set(theme_bw())

g= ggplot(clima, aes(x = Data, y = RH))+
    geom_point(color = "skyblue") +
    labs(x = "Ano", y = "Umidade do ar (%)",
       title = " ",
       subtitle = "Padrão sazonal de Umidade relativa do ar de 1997 a 2001",
       caption = "Dados: Xavier et al. (2022)")

ggplotly(g)