Motivação

Gráficos com dois eixos Y são um tema polêmico quando estamos lidando com visualização de dados. A controvércia ocorre porque os analistas podem inferir relações de causa e efeito com base no comportamento de duas variáveis a partir de um gráfico com dois eixos Y.

A partir do momento em que as relações entre duas variáveis podem ser explicadas para além do coeficiente de correlação, utilizar um gráfico com dois eixos Y é justificável. Por exemplo, há uma relação assimétrica entre a taxa de câmbio (R$/US$) e o preço do Brent (Dólar/bbl) e que, existindo necessidade, pode ser apresentada através de um gráfico com dois eixos Y.

Criando o Gráfico

Primeiro vamos criar dois conjuntos de dados gerados a partir de uma mesma amostra.

## [1] "Coeficiente de Correlação:-0.0338844551128841"

O coeficiente de correlação mostra que duas variáveis geradas de forma “aleatória” possuem uma correlação negativa de -0.0338845.

A ideia é criar um gráfico com dois eixos Y que não necessidade de pacotes, apenas as funções do R Base.

par(mar=c(5, 4, 4, 6) + 0.1)

# criar o primeiro eixo Y
plot(x, lty=1, axes=FALSE, 
     xlab="", ylab="", type="l", 
     col="black", main=" Gráfico com Dois Eixos Y") # gráfico para a variável X
axis(2, ylim=c(2,60), col="black", las=1) # etiqueta horizontal
mtext("Variável (X)", side=2, line=2.5) # nomear o primeiro eixo Y 
box() # criar uma caixa para o gráfico

# criar o segundo eixo Y
par(new=TRUE)
plot(y, lty=2,  xlab="", ylab="", 
     axes=FALSE, type="l", col="steelblue")
mtext("Variável (Y)",side=4,col="steelblue",line=4) 
axis(4, ylim=c(2,60), col="steelblue",col.axis="steelblue",las=1)
axis(1, at = seq(1,22,1))
# adicionar uma legenda ao gráfico
legend("topleft",legend=c("Variável X","Variável Y"),
       text.col=c("black","steelblue"),lty=c(1,2),col=c("black","steelblue"))

Obervamos que a correlação entre as variáveis é baixa. Mas com um certo grau de descuidado poderíamos apontar que em determinados períodos da série a variável X está sendo influenciada pelo comportamento da variável Y, ou vice-versa, sendo que não há razões para acreditar que isso é uma verdade.

Utilize o gráfico com dois eixos Y, mas com cautela e apenas quando for necessário.