# Limitei a região do gráfico para facilitar a visualização
plot(pokemon$height,pokemon$weight,xlim=c(0,60),ylim=c(0,4000),xlab="Altura",ylab="Peso")

O gráfico de dispersão acima mostra a relação entre a altura e o peso dos Pokemons presentes na base de dados. Limitei os valores máximos dos eixos X e Y para facilitar a visualização dos dados no gráfico. Nota-se que quanto maior a altura do pokemon maior seu peso, claro que generalizando. Nem todos os Pokemons mais altos são mais pesados do que Pokemons mais baixos.

O valor de correlação encontrado corrobora com o que foi dito anteriormente. Quando mais próximo de -1 ou 1, maior é a correlação entre as variáveis. Valores próximos de 0 representam baixa correlação entre as variáveis. Valores próximos de 1 representam correlação positiva, ou seja, quando uma variável aumenta de valor, a outra também aumenta; -1, correlação negativa, ou seja, quando uma variável aumenta seu valor, a outra diminui; e 0 representa baixa correlação entre as variáveis.

cor(pokemon$height,pokemon$weight)
## [1] 0.6465813