- Medidas Estadísticas de Dispersión Relativa - junio 11, 2024
- Modelos SARIMA(Arima Estacionales).¿Qué son y cómo usarlos para Predecir? - enero 4, 2024
- ¿Qué es el RUIDO BLANCO ? Econometría en R - junio 21, 2023
Aquí veremos como hacer Gráficos de doble eje en R, por ejemplo si queremos en un mismo gráfico insertar dos series con escalas diferentes. Una representación de ese estilo podría ser insertar en un mismo gráfico los datos del PIB y las tasas de interés.
En el video veremos 2 ejemplos, uno combinando un gráfico de linea con uno de barras y otros donde habrá dos de línea.( Bajo el video tienes los archivos y código que se usan en el tutorial aquí)
#COMO CREAR GRAFICOS DE DOS EJES
# vAMOS A HACER DOS EJEMPLOS
#1. DOS EJES CON DOS GRAFICOS DE LINEA
#2. DOS EJES CON UN GRAFICO DE LINEA Y OTRO DE BARRAS
# Descargamos los datos de videos anteriores sobre PIB y también nuevos
#de poblacion
#pib per capita españa en datacommons
pib_mexico_per <- read.csv(«C:\\Users\\Victor-PC\\Desktop\\ECONOMIA_HISPANA\\pib_per_capita_mexico.csv»,header=TRUE, stringsAsFactors=FALSE)
pib_españa_per <- read.csv(«C:\\Users\\Victor-PC\\Desktop\\ECONOMIA_HISPANA\\pib_per_capita_españa.csv»,header=TRUE, stringsAsFactors=FALSE)
pib_argentina_per <- read.csv(«C:\\Users\\Victor-PC\\Desktop\\ECONOMIA_HISPANA\\pib_per_capita_argentina.csv»,header=TRUE, stringsAsFactors=FALSE)
pib_chile_per <- read.csv(«C:\\Users\\Victor-PC\\Desktop\\ECONOMIA_HISPANA\\pib_per_capita_chile.csv»,header=TRUE, stringsAsFactors=FALSE)
PIB_ESPAÑA <- head(pib_españa_per$PIB.per.cÃ.pita)[1]
PIB_ESPAÑA
PIB_ARGENTINA <- head(pib_argentina_per$PIB.per.cÃ.pita)[1]
PIB_ARGENTINA
PIB_CHILE <- head(pib_chile_per$PIB.per.cÃ.pita)[1]
PIB_CHILE
PIB_MEXICO <- head(pib_mexico_per$PIB.per.cÃ.pita)[1]
PIB_MEXICO
#paises <- c ( «ESPAÑA»,»CHILE»,»ARGENTINA»,»MEXICO»)
PIB_paises<- c(PIB_ESPAÑA,PIB_CHILE,PIB_ARGENTINA,PIB_MEXICO)
#rownames(PIB_paises) <- c(«ESPAÑA»,»CHILE»,»ARGENTINA»,»MEXICO»)
PIB_paises
#datos poblacion mexico
poblacion_mexico <- read.csv(«C:\\Users\\Victor-PC\\Desktop\\ECONOMIA_HISPANA\\poblacion_mexico.csv»,header=TRUE, stringsAsFactors=FALSE)
plot(poblacion_mexico,type=»l»)
#♥3 pasos
#1 Grafico 1
#2 par para unir
#3 graficos 2 quitando etiquetas con axes
#4 nuevo eje
plot(pib_mexico_per,type=»l»)
# Ejemplo numero 1 = dos graficos de linea
#»1 PIB mexico
# poblacion
plot(pib_mexico_per,type=»l» ,main = «PIB PER CÁPITA y POBLACION»,
col = «red», lwd = 2,lty = 1,ylab=»PIB PER CAPITA»)
par(new=TRUE) #enlace
plot(poblacion_mexico,type=»l»,axes=FALSE, ylab=»»,col=»blue»,lwd=2,lty=2)
axis(4)
#ejemplo numero 2
#graficos de barras del PIB 4 paises ( ultimo valor)
#evolucion pib argentina
barplot(PIB_paises, main = «PIB PER CÁPITA»,
col = rainbow(4))
par(new=TRUE)
plot(pib_argentina_per,type=»l»,axes=FALSE,col=»black»,lwd = 2,lty = 1,
xlab = «», ylab = «»)
axis(4)
mtext(«Pib Argentina», side = 4, col= «red»)
# etiquetas
barplot(PIB_paises, main = «PIB PER CÁPITA»,
col = rainbow(4),names.arg = c(«ESPAÑA»,»CHILE»,»ARGENTINA»,»MEXICO»))
par(new=TRUE)
plot(pib_argentina_per,type=»l»,axes=FALSE,col=»black»,lwd = 2,lty = 1,
xlab = «», ylab = «»)
axis(4)
mtext(«Pib Mexico», side = 4, col= «red»)
barplot(PIB_paises, main = «PIB PER CÁPITA»,
col = rainbow(4))
par(new=TRUE)
plot(pib_argentina_per,type=»l»,axes=FALSE,col=»black»,lwd = 2,lty = 1,
)
axis(4)
mtext(«PIB ARGENTINA», side = 4, col= «red»)