Boxplot


# Apresente por meio de boxplot o VLRTotalTRFConvencional separado por SigRegiao

# VlrTotaTRFConvencional
# Total do somatório do valor da TUST e TE.

data %>%
  ggplot(aes(x = SigRegiao, y = VlrTotaTRFConvencional))+
  geom_boxplot()+
  theme_bw()+
  labs(x = "Macrorregião", y = "Valor total da tarifa (R$/kWh)")+
  theme(axis.ticks = element_blank())
Distribuição do valor total da tarifa convencional por região

Distribuição do valor total da tarifa convencional por região



Histograma

# Apresente por meio de histograma o VLRTotalTRFConvencional apenas da região Sul

data %>%
  filter(SigRegiao == "Sul")%>%
  ggplot(aes(VlrTotaTRFConvencional))+
  geom_histogram(bins = 10, color = "white")+
  theme_bw()+
  labs(x = "Valor total da tarifa (R$/kWh)", y = "Frequência")+
  theme(axis.line.x.bottom = element_line(),
        axis.line.y.left = element_line(),
        panel.border = element_blank(),
        axis.ticks = element_blank())
Distribuição do valor total da tarifa convencional na região sul

Distribuição do valor total da tarifa convencional na região sul



Diagrama de dispersão


# Apresente um diagrama de dispersão os valores de uso do sistema VlrTUSDConvencional e os valores de tarifa de energia VlrTEConvencional. Utilize os elementos de cor e forma para diferenciar o tipo de concessão e a região geográfica.

data %>%
  ggplot(aes(VlrTUSDConvencional, VlrTEConvencional, shape = nomConcessao, color = SigRegiao))+
  geom_point()+
  theme_bw()+
  labs(color = "Região", shape = "Tipo de concessão",
       x = "Valor Tarifa de Uso dos Sistemas Elétricos de Distribuição",
       y = "Valor Tarifa de Energia")
Dispersão de Tarifa de Uso dos SEs de Distribuição por Tarifa de Energia (R$/MWh)

Dispersão de Tarifa de Uso dos SEs de Distribuição por Tarifa de Energia (R$/MWh)



Barras

data %>%
  ggplot(aes(SigRegiao, fill = nomConcessao))+
  geom_bar(position = "dodge")+
  geom_text(stat='count', aes(label=..count..), position = position_dodge(.9),
            vjust = -0.5, size = 4)+
  labs(fill = "Tipo de Concessão", x = "Macrorregiao", y = "")+
  theme_bw()+
  theme(panel.grid = element_blank(),
        panel.border = element_blank(),
        axis.ticks = element_blank(),
        axis.text.y = element_blank(),
        axis.line.x.bottom = element_line()
        )
Tipos de concessão nas regiões geográficas

Tipos de concessão nas regiões geográficas