VALOR AGREGADO BRUTO (VAB) ESTIMADO

Descripción General

Es un indicador que muestra la diferencia entre el valor bruto de producción y el consumo intermedio de los distintos sectores productivos, sin considerar los impuestos y derechos de importación. Se calcula sumando el VAB por actividad económica a nivel departamental, redistribuido proporcionalmente según la PEA ocupada, para asentamientos poblacionales con más de 150 habitantes.

Objetivo

Obtener un indicador económico para entender las dinámicas económicas del territorio.

Estructura Metodológica

Nombre del indicador: VAB_CCPP

Definición de las variables que componen el indicador:

• PEA: Población económicamente activa ocupada
• AE: Actividades económicas
  
• VAB: Valor agregado bruto

Unidad de medida:

• PEA: habitantes
  
• AE: soles (s/.)
• VAB: soles (s/.)

Escala de las variables:

• PEA departamental: Población económicamente activa ocupada a nivel departamental
• PEA CCPP: Población económicamente activa ocupada a nivel de CCPP>150
• AE departamental: Actividades económicas a nivel departamental
• AE CCPP: Actividades económicas a nivel de CCPP>150
• VAB: escala departamental

Escala del indicador:

• VAB_CCPP: centro poblado con población >150

Fuente y periodicidad de la data:

• VAB: Instituto Nacional de Estadística e Informática con información disponible al 15 de diciembre del 2024.Data escogida para el año 2017.
• PEA: Instituto Nacional de Estadística e Informática Censo Nacional 2017 INEI 2017

Pasos Metodológicos:

Paso 1

Agrupamiento de las categorías de las actividades económicas. Se cuentan con 3 tipos de categorías las cuales se han evaluado para poder realizar el agrupamiento total: la primera, correspondiente a la información de la PEA departamental que cuenta con 22 categorías. La segunda, la PEA a nivel de centros poblados mayores a 150 habitantes. La última, correspondiente al VAB departamental cuenta con 12 categorías. Al revisar los 3 en simultáneo, se identificaron las similitudes y el tercer tipo mostró un mejor agrupamiento. Sin embargo, se obtó por agrupar agricultura, ganadería, caza y silvicultura con pesca y acuicultura. Por lo cual, se obtuvo un total de 11 categorías.

Figura 1: Categorización

Paso 2

Al tener las categorías claras, se realiza el Cálculo del índice de productividad a nivel departamental.

\[\bar{IP}^{(A)}_D = \frac{VAB^{(A)}_D}{PEA^{(A)}_D}\]

A continuación, se presenta una muestra del cálculo del índice por actividad económica (A).

Figura 2: Cálculo del IA

Paso 3

Cálculo del VAB a nivel de centro poblado por actividad económica.

\[VAB^{(a)}_{\text{CCPP1_A1}} = \bar{P}^{(a)}_D \times PEA^{(a)}_{\text{CCPP1_A1}}\]

Paso 4

Cálculo del VAB total por centro poblado

\[ VAB^{Total}_{\text{CCPP1}} = \sum_{A=1}^{11} \left( \bar{P}^{(A)}_D \times PEA^{(A)}_{\text{CCPP1}} \right) \] ## Supuestos y limitaciones

El presente indicador solo es una estimación del VAB.

Cargado y análisis de datos

Activación de librerías

library(sf)
library(readxl)
library(tidyverse)
library(ggmap)
library(osmdata)
library(leaflet)
library(ggspatial)
library(dplyr)
library(haven)
library(ggplot2)
library(tidyr)

Cargado de datos

Cargado de datos sobre la PEA a nivel de centropos poblados mayores a 150 habitantes.

PEA_CCPP <- read_excel("Poblacion_PEACCPP.xlsx")

Cargado de datos del índice de productividad económica calculado para cada actividad económica a nivel de departamento.

INDICADOR_VAB <- read_excel("Indicador_VAB.xlsx")

Unión de datos

A la tabla PEA_CCPP que está a nivel de centros poblados se añadirá el indicador de productividad departamental que se encuentra en la tabla INDICADOR_VAB, este se ha calculado por actividad economica, son 11 categorias que van de IA1 a IA11. La unión se realiza por nombre de departamento.

PEA_CCPP_TOTAL <- PEA_CCPP %>%
  left_join(INDICADOR_VAB, by = "DEPARTAMENTO")

Cálculo del VAB por CCPP

Se calcula el VAB por tipo de actividad económica (11 categorías) por cada centro poblado.

PEA_CCPP_TOTAL <- PEA_CCPP_TOTAL %>%
  mutate(
    VAB1 = IA1 * A1,
    VAB2 = IA2 * A2,
    VAB3 = IA3 * A3,
    VAB4 = IA4 * A4,
    VAB5 = IA5 * A5,
    VAB6 = IA6 * A6,
    VAB7 = IA7 * A7,
    VAB8 = IA8 * A8,
    VAB9 = IA9 * A9,
    VAB10 = IA10 * A10,
    VAB11 = IA11 * A11
  )

Cálculo del VAB total por CCPP

Se calcula el VAB total por CCPP sumando los VAB: VAB1 + … + VAB11

PEA_CCPP_TOTAL <- PEA_CCPP_TOTAL %>%
  mutate(
    VAB_TOTAL = VAB1 + VAB2 + VAB3 + VAB4 + VAB5 + VAB6 +
                VAB7 + VAB8 + VAB9 + VAB10 + VAB11
  )

Cálculo del VAB total por CCPP

Se agrega el código de cada CCPP mediante la unión de los códigos departamentales, provinciales, distritales y del centro poblado.

PEA_CCPP_TOTAL <- PEA_CCPP_TOTAL %>%
  mutate(
    COD_DEP_str   = str_pad(COD_DEP,   2, pad = "0"),
    COD_PROV_str  = str_pad(COD_PROV,  2, pad = "0"),
    COD_DIST_str  = str_pad(COD_DIST,  2, pad = "0"),
    COD_CCPP_str  = str_pad(COD_CCPP,  4, pad = "0"),
    CODCP = paste0(COD_DEP_str, COD_PROV_str, COD_DIST_str, COD_CCPP_str)
  )

Resultados

Ejemplo: Caso el departamento de Loreto Exportar datos