dadosclimaticosRP

# Dados climáticos de Ribeirão Preto

Fonte: Centro Integrado de Informações Agrometeorológicas

Leitura dos dados no R:
=======================

urlfile <- "https://raw.githubusercontent.com/edsonzmartinez/cursoR/main/dadosclimaticosRP.csv"
clima   <- read.csv(urlfile,head=TRUE,sep=";",dec=",")

Descrição dos dados:
====================
ano: ano (de 1991 a 2021)
mes: meses
tempmaxabs: temperatura máxima absoluta (oC)
tempminabs: temperatura mínima absoluta (oC)
tempmaxmensal: temperatura máxima mensal (oC)
tempminmensal: temperatura mínima mensal (oC)
tempmedia: temperatura média
ETP: evapotranspiração potencial (mm)
precipitacao: precipitação (mm)
DCCH: dias com chuva

Exemplos:
=========

# Eliminando espaços:
clima$mes <- trimws(clima$mes)

# Caso necessário:
clima$mes[clima$mes=="março"] <- "março"

# Box-plot para a temperatura média, de acordo com os meses:
boxplot(clima$tempmedia~clima$mes,xlab="Mês",ylab="Temperatura média")

# Box-plot para a temperatura média, ordenando os meses:
mesesnames <- factor(clima$mes, levels=c("janeiro", "fevereiro", "março", "abril", "maio", "junho", "julho", "agosto", "setembro", "outubro", "novembro", "dezembro"))
boxplot(clima$tempmedia~mesesnames,xlab="Mês",ylab="Temperatura média")

# Gráficos interativos de séries temporais usando o pacote dygraphs
install.packages("dygraphs")
library(dygraphs)
temprRP <- ts(cbind(clima$tempmedia,clima$tempmaxabs), start = c(1991,1),frequency=12,names=c("Temperatura média","Temperatura máxima absoluta"))
dygraph(temprRP)
dyRangeSelector(dygraph(temprRP))
dyOptions(stackedGraph = TRUE,dygraph(temprRP,main = "Temperaturas em Ribeirão Preto"))
dygraph(temprRP) %>% dyRangeSelector() %>% dyMultiColumn()

dygraph(temprRP) %>%
  dyRangeSelector() %>%
  dyBarSeries('Temperatura média') %>% 
  dyFilledLine('Temperatura máxima absoluta')