30:T445,El Ministerio de Desarrollo Social y Familia de Chile realiza la **Encuesta de Caracterización Socioeconómica Nacional (CASEN)** que permite *Conocer periódicamente la situación de los hogares y de la población, especialmente de aquella en situación de pobreza y de aquellos grupos definidos como prioritarios por la política social, con relación a aspectos demográficos, de educación, salud, vivienda, trabajo e ingresos. En particular, estimar la magnitud de la pobreza y la distribución del ingreso; identificar carencias y demandas de la población en las áreas señaladas; y evaluar las distintas brechas que separan a los diferentes segmentos sociales y ámbitos territoriales. Evaluar el impacto de la política social: estimar la cobertura, la focalización y la distribución del gasto fiscal de los principales programas sociales de alcance nacional entre los hogares, según su nivel de ingreso, para evaluar el impacto de este gasto en el ingreso de los hogares y en la distribución del mismo. (https://observatorio.ministeriodesarrollosocial.gob.cl/encuesta-casen)* 31:T5cc,Los datos incluyen campos correspondientes a distintos tipos de ingresos: * **Ingreso del trabajo**: Los ingresos del trabajo son los ingresos que obtienen las personas en su ocupación por concepto de sueldos y salarios (monetarios y en especies), ganancias provenientes del trabajo independiente y la auto provisión de bienes producidos por el hogar. * **Ingreso autónomo**: El ingreso autónomo se define como todos los pagos que recibe el hogar, provenientes tanto del trabajo como de la propiedad de los activos. Estos incluyen sueldos y salarios (monetarios y en especies), ganancias provenientes del trabajo independiente, la auto provisión de bienes producidos por el hogar, rentas, intereses, jubilaciones, pensiones, montepíos y transferencias corrientes entre privados. * **Ingreso monetario**: El ingreso monetario del hogar se define como la suma del ingreso autónomo del hogar y las transferencias monetarias que recibe el hogar del Estado. Las transferencias monetarias son todos los pagos en dinero provistos por el Estado. * **Ingreso total**: El ingreso total del hogar se define como la suma del ingreso monetario del hogar y el arriendo imputado del mismo. El valor que se imputa es equivalente al arriendo que se pagaría en el mercado por una vivienda similar a la ocupada. Fuente de definiciones: [Manual del Investigador Casen 2017](https://observatorio.ministeriodesarrollosocial.gob.cl/storage/docs/casen/2017/Manual_del_Investigador_Casen_2017.pdf) 32:T647,## Variables / campos utilizados en consultas En los registros de datos se encuentran los siguientes campos que utilizamos en esta página para realizar consultas asociadas a los ingresos: **Ingreso del hogar** - **ytrabajocorh**: Ingreso del trabajo del hogar corregido - **yautcorh**: Ingreso autónomo corregido del hogar - **ymonecorh**: Ingreso monetario del hogar corregido - **ytotcorh**: Ingreso total corregido del hogar **Ingreso per cápita del hogar** - **ypchtrabcor**: Ingreso del trabajo per cápita del hogar corregido - **ypchautcor**: Ingreso autónomo per cápita del hogar corregido - **ypc**: Ingreso total per cápita del hogar corregido **Otras variables relevantes** - **numper**: Número de personas en el hogar (excluye servicio doméstico puertas adentro) - **nae**: Numero de adultos equivalentes - **yae**: Ingreso por adulto equivalente - **pobreza**: Categoría de pobreza - **poc1**: Jefatura de hogar y relación con jefatura de hogar (poc1 = 1 corresponde al Jefe de Hogar y es un filtro que se utiliza para obtener registros únicos por hogar - **expr**: Factor de expansión regional (*"Este factor es pertinente de utilizar para la obtención de resultados de personas, hogares y núcleos expandidos que buscan ser representativos a nivel nacional, regional y por zona (urbana y rural). Al emplear dicho factor, los resultados expandidos permiten representar al total de la población del país, en congruencia con la proyección de población del INE que se utilizó como referencia para el diseño muestral de la encuesta."", Manual del Investigador Casen 2017*)33:T499,{ const ingresosTotalesPorQuintil = dataIndice20_20[0]; const dataPlot = [ { tipo: "Ingreso Trabajo", indice: ingresosTotalesPorQuintil["q5IngresoTrabajo"] / ingresosTotalesPorQuintil["q1IngresoTrabajo"] }, { tipo: "Ingreso Autónomo", indice: ingresosTotalesPorQuintil["q5IngresoAutonomo"] / ingresosTotalesPorQuintil["q1IngresoAutonomo"] }, { tipo: "Ingreso Monetario", indice: ingresosTotalesPorQuintil["q5IngresoMonetario"] / ingresosTotalesPorQuintil["q1IngresoMonetario"] } ]; return Plot.plot({ marginLeft: 120, marginRight: 30, y: { label: "Tipo de ingreso", grid: true }, x: { label: "Indice 20/20", grid: true }, color: { legend: true }, marks: [ Plot.barX(dataPlot, { x: "indice", y: "tipo", fill: "tipo", sort: { y: "x" } }), , Plot.text(dataPlot, { x: "indice", y: "tipo", text: (d) => d3.format(".1f")(d["indice"]), textAnchor: "start", dx: 5 }) ] }); }34:T497,{ const ingresosTotalesPorQuintil = dataIndice10_40[0]; const dataPlot = [ { tipo: "Ingreso Trabajo", indice: ingresosTotalesPorQuintil["d10IngresoTrabajo"] / ingresosTotalesPorQuintil["d40IngresoTrabajo"] }, { tipo: "Ingreso Autónomo", indice: ingresosTotalesPorQuintil["d10IngresoAutonomo"] / ingresosTotalesPorQuintil["d40IngresoAutonomo"] }, { tipo: "Ingreso Monetario", indice: ingresosTotalesPorQuintil["d10IngresoMonetario"] / ingresosTotalesPorQuintil["d40IngresoMonetario"] } ]; return Plot.plot({ marginLeft: 120, marginRight: 30, y: { label: "Tipo de ingreso", grid: true }, x: { label: "Indice 20/20", grid: true }, color: { legend: true }, marks: [ Plot.barX(dataPlot, { x: "indice", y: "tipo", fill: "tipo", sort: { y: "x" } }), Plot.text(dataPlot, { x: "indice", y: "tipo", text: (d) => d3.format(".1f")(d["indice"]), textAnchor: "start", dx: 5 }) ] }); }35:T494,{ const ingresosTotalesPorQuintil = dataIndice10_10[0]; const dataPlot = [ { tipo: "Ingreso Trabajo", indice: ingresosTotalesPorQuintil["d10IngresoTrabajo"] / ingresosTotalesPorQuintil["d1IngresoTrabajo"] }, { tipo: "Ingreso Autónomo", indice: ingresosTotalesPorQuintil["d10IngresoAutonomo"] / ingresosTotalesPorQuintil["d1IngresoAutonomo"] }, { tipo: "Ingreso Monetario", indice: ingresosTotalesPorQuintil["d10IngresoMonetario"] / ingresosTotalesPorQuintil["d1IngresoMonetario"] } ]; return Plot.plot({ marginLeft: 120, marginRight: 30, y: { label: "Tipo de ingreso", grid: true }, x: { label: "Indice 20/20", grid: true }, color: { legend: true }, marks: [ Plot.barX(dataPlot, { x: "indice", y: "tipo", fill: "tipo", sort: { y: "x" } }), Plot.text(dataPlot, { x: "indice", y: "tipo", text: (d) => d3.format(".1f")(d["indice"]), textAnchor: "start", dx: 5 }) ] }); }36:T4b6,{ const maxHogares = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumHogares" ]; const maxIngreso = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumIngreso" ]; function ingresoSinDesigualdad(hogares) { return (maxIngreso * hogares) / maxHogares; } return Plot.plot({ y: { tickFormat: (d) => d3.format(",d")(d / 1000000), label: "Ingreso acumulado (millones de $)" }, x: { label: "Hogares" }, color: { legend: true, domain: ["Escenario sin desigualdad", "Escenario real"], range: [d3.schemeCategory10[0], d3.schemeCategory10[1]] }, marginLeft: 100, marks: [ Plot.areaY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), fill: "lightgrey" }), /*Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: "accumIngreso" }),*/ Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), stroke: (d) => "Escenario sin desigualdad", strokeWidth: 5 }) ] }); }37:T4f3,{ const maxHogares = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumHogares" ]; const maxIngreso = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumIngreso" ]; function ingresoSinDesigualdad(hogares) { return (maxIngreso * hogares) / maxHogares; } return Plot.plot({ y: { tickFormat: (d) => d3.format(",d")(d / 1000000), label: "Ingreso acumulado (millones de $)" }, x: { label: "Hogares" }, color: { legend: true, domain: ["Escenario sin desigualdad", "Escenario real"], range: [d3.schemeCategory10[0], d3.schemeCategory10[1]] }, marginLeft: 100, marks: [ Plot.areaY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), fill: "lightgrey" }), Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), stroke: (d) => "Escenario sin desigualdad", strokeWidth: 5 }), Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: "accumIngreso", stroke: (d) => "Escenario real", strokeWidth: 5 }) ] }); }38:T5d2,{ const maxHogares = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumHogares" ]; const maxIngreso = _.last(datosAcumuladosHogaresIngresoMonetario)[ "accumIngreso" ]; function ingresoSinDesigualdad(hogares) { return (maxIngreso * hogares) / maxHogares; } return Plot.plot({ y: { tickFormat: (d) => d3.format(",d")(d / 1000000), label: "Ingreso acumulado (millones de $)" }, x: { label: "Hogares" }, color: { legend: true, domain: ["Escenario sin desigualdad", "Escenario real"], range: [d3.schemeCategory10[0], d3.schemeCategory10[1]] }, marginLeft: 100, marks: [ Plot.areaY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), fill: "lightgrey" }), Plot.areaY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y1: "accumIngreso", y2: (d) => ingresoSinDesigualdad(d["accumHogares"]), fill: d3.schemeCategory10[3] }), Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: (d) => ingresoSinDesigualdad(d["accumHogares"]), stroke: (d) => "Escenario sin desigualdad", strokeWidth: 5 }), Plot.lineY(datosAcumuladosHogaresIngresoMonetario, { x: "accumHogares", y: "accumIngreso", stroke: (d) => "Escenario real", strokeWidth: 5 }) ] }); }39:T45d,*"La línea de pobreza es la medida oficial, expresada en pesos corrientes, que se utiliza como umbral para identificar al conjunto de hogares y de población que se encuentra en situación de pobreza por ingresos. De acuerdo con la metodología de medición de la pobreza por ingresos vigente desde el mes de enero de 2015, el valor de la línea de pobreza por ingresos se estima sobre la base del gasto total de los hogares pertenecientes al estrato de referencia utilizado para la determinación de la CBA, excluyendo los gastos en alcohol y tabaco, además del gasto en bienes y servicios adquiridos por menos del 10% de los hogares. En cuanto a la línea de pobreza extrema, es el umbral que permite identificar al grupo de hogares y población que se encuentra en situación de pobreza extrema por ingresos. El valor de la línea de pobreza extrema por ingresos equivale a dos tercios del valor correspondiente a la línea de pobreza El Ministerio de Desarrollo Social y Familia publica mensualmente información actualizada del valor de la CBA y de las líneas de pobreza.", Manual del Investigador Casen 2017*3a:T5a1,## Ingreso considerado para establecer si un hogar se encuentra en situación de pobreza "El ingreso considerado es el ingreso total del hogar, definido como la suma del ingreso autónomo del hogar (sueldos y salarios, monetarios y en especies, ganancias provenientes del trabajo independiente, auto provisión de bienes producidos por el hogar, rentas, intereses, dividendos y retiro de utilidades, jubilaciones, pensiones o montepíos y transferencias corrientes entre hogares), las transferencias monetarias que recibe el hogar del Estado (aportes en dinero que reciben las personas y los hogares del Estado a través de los programas sociales) y una imputación por concepto de arriendo de la vivienda, en el caso de las hogares que ocupan viviendas en propiedad o de manera gratuita, sea en condición de cesión (por familiar o trabajo), o en usufructo. Para la medición de la pobreza por ingresos, dicho ingreso es expresado en términos de ingreso por persona equivalente, vale decir como el valor del ingreso total del hogar dividido por el número de miembros del hogar elevado a una potencia, llamada elasticidad de equivalencia (cuyo valor, de acuerdo con la definición utilizada por el Ministerio de Desarrollo Social y Familia es de 0,7 para todos los miembros del hogar).", Manual del Investigador Casen 2017
Nota: frases destacadas no están destacadas en el texto original3b:T4d5,Los datos de la encuesta son publicados en formatos compatibles con los software de manejo estadístico STATA y SPSS en [Base de Datos encuesta CASEN 2022](https://observatorio.ministeriodesarrollosocial.gob.cl/encuesta-casen-2022) Sin embargo, en este documento realizaremos un procesamiento de datos utilizando un manejo convencional de bases de datos (código SQL) y/o manejo de datos en lenguaje de programación Javascript. Para ello hemos convertido los datos publicados en formato SPSS a un formato de texto .csv y .parquet (este último genera un tamaño de archivo de 43Mb que es conveniente para ser utilizado en consultas de datos en Observablehq) Para leer los datos del formato SPSS (.sav) utilicé el siguiente código python ![image.png](${await FileAttachment("image.png").url()}) Luego los datos pueden exportarse a formato .csv con la siguiente instrucción en python (genera archivo > 500mb): ```python df.to_csv('CASEN_2022.csv', index=False) ``` O a formato .parquet con el siguiente código: ```python import pyarrow df.to_parquet('CASEN_2022.parquet') ``` El archivo .parquet puede descargarse en este notebook:

3c:[{"id":"76ebddd19b77987e63eccd92a03c8bf29a5c8b16bea65394b4315ad4508129d3e92d86e906fd46ff36421610785ee728a011a0514099bb9356f5a8a99c51fa0a","href":"https://static.observableusercontent.com/files/76ebddd19b77987e63eccd92a03c8bf29a5c8b16bea65394b4315ad4508129d3e92d86e906fd46ff36421610785ee728a011a0514099bb9356f5a8a99c51fa0a","name":"CASEN_2022.parquet","type":"application/octet-stream","lastModified":1690584449781.049,"size":43013933},{"id":"003cdf152cb7cedf1057a0441680471ae6a095bcaaf39232df6aa597c9df2ee84e6242059221427bd14030d941d13c4fa3aa782ed1db29b2c84b23729966fcc4","href":"https://static.observableusercontent.com/files/003cdf152cb7cedf1057a0441680471ae6a095bcaaf39232df6aa597c9df2ee84e6242059221427bd14030d941d13c4fa3aa782ed1db29b2c84b23729966fcc4","name":"image.png","type":"image/png","lastModified":1690734594079.207,"size":239963},{"id":"f9578e254fe9876fb1c62ab80e35414a8a9259d8e2420ee90c7bb040bb7013c5c3a76665f94e41557d558eaf6d68cd187d1c34642346bf29a5b514901750462b","href":"https://static.observableusercontent.com/files/f9578e254fe9876fb1c62ab80e35414a8a9259d8e2420ee90c7bb040bb7013c5c3a76665f94e41557d558eaf6d68cd187d1c34642346bf29a5b514901750462b","name":"image@3.png","type":"image/png","lastModified":1690742626537.376,"size":107018}] 2e:{"title":"Encuesta CASEN 2022","cells":[{"id":0,"value":"# Encuesta CASEN 2022","pinned":false,"hidden":false,"mode":"md"},{"id":641,"value":"$30","pinned":false,"hidden":false,"mode":"md"},{"id":780,"value":"Para el trabajo en esta página, la tabla de datos de la encuesta CASEN 2022 publicados fueron convertidos a formato .parquet en incluidos en una Base de Datos DuckDB que puede consultarse directamente en una página web - con comandos SQL - sin necesidad de un servidor de base de datos.\n\nPor ejemplo, para seleccionar los primeros 10 registros de la tabla de datos (tabla \"casen\"):","pinned":false,"hidden":false,"mode":"md"},{"id":785,"value":"SELECT *\nFROM casen\nLIMIT 10","pinned":true,"hidden":false,"mode":"sql","output":"","database":"var:db"},{"id":831,"value":"## Total de registros y Hogares / Personas que representan","pinned":false,"hidden":false,"mode":"md"},{"id":789,"value":"Los datos corresponden a encuestas realizadas a ${d3.format(\",\")(totalHogares[0].registros)} hogares donde se obtuvieron datos de ${d3.format(\",\")(totalPersonas[0].registros)} asociadas a esos hogares.\n\nDado que el diseño muestral permite obtener información que representa al total de hogares y personas en Chile utilizando el factor de expansión - *expr* - en cada registro.\n\nEntonces, con los datos de la encuesta se puede inferir información correspondiente a ${d3.format(\",\")(totalHogares[0].hogares)} hogares y ${d3.format(\",\")(totalPersonas[0].personas)} personas.","pinned":false,"hidden":false,"mode":"md"},{"id":288,"value":"**Datos para total de hogares**","pinned":false,"hidden":false,"mode":"md"},{"id":247,"value":"SELECT sum(expr) as hogares, count(*) as registros\nFROM casen\nWHERE pco1 = 1","pinned":false,"hidden":false,"mode":"sql","output":"totalHogares","database":"var:db"},{"id":297,"value":"**Datos para total personas**","pinned":false,"hidden":false,"mode":"md"},{"id":292,"value":"SELECT sum(expr) as personas, count(*) as registros\nFROM casen","pinned":false,"hidden":false,"mode":"sql","output":"totalPersonas","database":"var:db"},{"id":833,"value":"## Tipos de Ingreso","pinned":false,"hidden":false,"mode":"md"},{"id":835,"value":"$31","pinned":false,"hidden":false,"mode":"md"},{"id":859,"value":"$32","pinned":false,"hidden":false,"mode":"md"},{"id":300,"value":"## Promedio de ingreso por hogar en Chile","pinned":false,"hidden":false,"mode":"md"},{"id":302,"value":"SELECT \n sum(ytrabajocorh*expr) / sum(expr) as ingresoTrabajo, \n sum(yautcorh*expr) / sum(expr) as ingresoAutónomo, \n sum(ymonecorh*expr) / sum(expr) as ingresoMonetario, \n sum(ytotcorh*expr) / sum(expr) as ingresoTotal, \nFROM casen\nWHERE pco1 = 1","pinned":false,"hidden":false,"mode":"sql","output":"","database":"var:db"},{"id":871,"value":"## Promedio de ingreso por hogar por quintil (quintil de ingreso autónomo per capita del hogar)","pinned":false,"hidden":false,"mode":"md"},{"id":896,"value":"Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\", label: \"Ingreso\", grid: true },\n color: {\n domain: [\"Ingreso Monetario\", \"Ingreso Autónomo\", \"Ingreso Trabajo\"],\n range: [\"lightgrey\", d3.schemeCategory10[0], d3.schemeCategory10[1]],\n legend: true\n },\n marks: [\n Plot.barY(dataQuintiles, {\n x: \"quintil\",\n y: \"ingresoMonetario\",\n fill: (d) => \"Ingreso Monetario\"\n }),\n Plot.tickY(dataQuintiles, {\n x: \"quintil\",\n y: \"ingresoAutónomo\",\n stroke: (d) => \"Ingreso Autónomo\",\n strokeWidth: 3\n }),\n ,\n Plot.tickY(dataQuintiles, {\n x: \"quintil\",\n y: \"ingresoTrabajo\",\n stroke: (d) => \"Ingreso Trabajo\",\n strokeWidth: 3\n }),\n Plot.ruleY([0])\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":875,"value":"SELECT qaut as quintil,\n sum(ytrabajocorh*expr) / sum(expr) as ingresoTrabajo, \n sum(yautcorh*expr) / sum(expr) as ingresoAutónomo, \n sum(ymonecorh*expr) / sum(expr) as ingresoMonetario, \n --sum(ytotcorh*expr) / sum(expr) as ingresoTotal, \nFROM casen\nWHERE pco1 = 1\nGROUP BY qaut\nORDER BY qaut\n","pinned":false,"hidden":false,"mode":"sql","output":"dataQuintiles","database":"var:db"},{"id":889,"value":"## Promedio de ingreso por hogar por decil (decil de ingreso autónomo per capita del hogar)","pinned":false,"hidden":false,"mode":"md"},{"id":921,"value":"Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\", label: \"Ingreso\", grid: true },\n color: {\n domain: [\"Ingreso Monetario\", \"Ingreso Autónomo\", \"Ingreso Trabajo\"],\n range: [\"lightgrey\", d3.schemeCategory10[0], d3.schemeCategory10[1]],\n legend: true\n },\n marks: [\n Plot.barY(dataDeciles, {\n x: \"decil\",\n y: \"ingresoMonetario\",\n fill: (d) => \"Ingreso Monetario\"\n }),\n Plot.tickY(dataDeciles, {\n x: \"decil\",\n y: \"ingresoAutónomo\",\n stroke: (d) => \"Ingreso Autónomo\",\n strokeWidth: 3\n }),\n ,\n Plot.tickY(dataDeciles, {\n x: \"decil\",\n y: \"ingresoTrabajo\",\n stroke: (d) => \"Ingreso Trabajo\",\n strokeWidth: 3\n }),\n Plot.ruleY([0])\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":885,"value":"SELECT dau as decil,\n sum(ytrabajocorh*expr) / sum(expr) as ingresoTrabajo, \n sum(yautcorh*expr) / sum(expr) as ingresoAutónomo, \n sum(ymonecorh*expr) / sum(expr) as ingresoMonetario, \n --sum(ytotcorh*expr) / sum(expr) as ingresoTotal, \nFROM casen\nWHERE pco1 = 1\nGROUP BY dau\nORDER BY dau\n","pinned":false,"hidden":false,"mode":"sql","output":"dataDeciles","database":"var:db"},{"id":952,"value":"## Subsidios monetarios por hogar por quintil (quintil de ingreso autónomo per capita del hogar)","pinned":false,"hidden":false,"mode":"md"},{"id":945,"value":"Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\", label: \"Subsidio monetario por hogar\", grid: true },\n color: {\n legend: true\n },\n marks: [\n Plot.barY(dataSubsidiosQuintiles, {\n x: \"quintil\",\n y: \"subsidioMonetario\",\n fill: \"lightgrey\"\n }),\n\n Plot.ruleY([0])\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":527,"value":"SELECT qaut as quintil,sum(ysubh*expr) / sum(expr) as subsidioMonetario\nFROM casen\nWHERE pco1 = 1\nGROUP BY qaut\nORDER BY qaut","pinned":false,"hidden":false,"mode":"sql","output":"dataSubsidiosQuintiles","database":"var:db"},{"id":529,"value":"## Subsidios monetarios por hogar por decil (decil de ingreso autónomo per capita del hogar)","pinned":false,"hidden":false,"mode":"md"},{"id":961,"value":"Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\", label: \"Subsidio monetario por hogar\", grid: true },\n color: {\n legend: true\n },\n marks: [\n Plot.barY(dataSubsidiosDeciles, {\n x: \"decil\",\n y: \"subsidioMonetario\",\n fill: \"lightgrey\"\n }),\n\n Plot.ruleY([0])\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":956,"value":"SELECT dau as decil,sum(ysubh*expr) / sum(expr) as subsidioMonetario\nFROM casen\nWHERE pco1 = 1\nGROUP BY dau\nORDER BY dau","pinned":false,"hidden":false,"mode":"sql","output":"dataSubsidiosDeciles","database":"var:db"},{"id":538,"value":"## Subsidios monetarios presentes en 2017 vs nuevos subsidios","pinned":false,"hidden":false,"mode":"md"},{"id":970,"value":"{\n const dataPlot = _.chain(dataNuevosSubsidios)\n .map((d) => [\n {\n decil: d.decil,\n subsidio: d.subsidioPresentes2017,\n tipo: \"Subsidio presente en 2017\"\n },\n { decil: d.decil, subsidio: d.nuevosSubsidios, tipo: \"Nuevos subsidios\" }\n ])\n .flatten()\n .value();\n\n return Plot.plot({\n marginLeft: 50,\n y: {\n tickFormat: \"$.1s\",\n label: \"Subsidio monetario por hogar\",\n grid: true\n },\n color: {\n legend: true\n },\n marks: [\n Plot.barY(dataPlot, {\n x: \"decil\",\n y: \"subsidio\",\n fill: \"tipo\"\n }),\n\n Plot.ruleY([0])\n ]\n });\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":536,"value":"SELECT dau as decil,(sum(ysub1h*expr)) / sum(expr) as subsidioPresentes2017, (sum(ysub2h*expr)) / sum(expr) as nuevosSubsidios\n\nFROM casen\nWHERE pco1 = 1\nGROUP BY dau\nORDER BY dau","pinned":false,"hidden":false,"mode":"sql","output":"dataNuevosSubsidios","database":"var:db"},{"id":984,"value":"## Indicadores de distribución del ingreso","pinned":false,"hidden":false,"mode":"md"},{"id":1026,"value":"### Índice 20/20 \n*\"Índice de desigualdad que muestra la relación entre el ingreso\nrecibido por el 20% de hogares de mayores ingresos, quintil V, y\nel ingreso correspondiente al 20% de hogares con menores\ningresos, quintil I.\", Manual del Investigador Casen 2017*","pinned":false,"hidden":false,"mode":"md"},{"id":1056,"value":"$33","pinned":false,"hidden":false,"mode":"ojs"},{"id":995,"value":"SELECT \n sum(CASE WHEN qaut = 1 THEN ytrabajocorh*expr ELSE 0 END) as q1IngresoTrabajo,\n sum(CASE WHEN qaut = 5 THEN ytrabajocorh*expr ELSE 0 END) as q5IngresoTrabajo,\n sum(CASE WHEN qaut = 1 THEN yautcorh*expr ELSE 0 END) as q1IngresoAutonomo,\n sum(CASE WHEN qaut = 5 THEN yautcorh*expr ELSE 0 END) as q5IngresoAutonomo, \n sum(CASE WHEN qaut = 1 THEN ymonecorh*expr ELSE 0 END) as q1IngresoMonetario,\n sum(CASE WHEN qaut = 5 THEN ymonecorh*expr ELSE 0 END) as q5IngresoMonetario\nFROM casen\nWHERE pco1 = 1","pinned":false,"hidden":false,"mode":"sql","output":"dataIndice20_20","database":"var:db"},{"id":986,"value":"### Índice 10/40 \n*\"Índice de desigualdad que muestra la relación entre el ingreso\nrecibido por el 10% de hogares de mayores ingresos, decil I, y el\ningreso correspondiente al 40% de hogares con menores ingresos,\ndeciles VI a X.\", Manual del Investigador Casen 2017*","pinned":false,"hidden":false,"mode":"md"},{"id":1080,"value":"$34","pinned":false,"hidden":false,"mode":"ojs"},{"id":1028,"value":"SELECT \n sum(CASE WHEN dau BETWEEN 1 AND 4 THEN ytrabajocorh*expr ELSE 0 END) as d40IngresoTrabajo,\n sum(CASE WHEN dau = 10 THEN ytrabajocorh*expr ELSE 0 END) as d10IngresoTrabajo,\n sum(CASE WHEN dau BETWEEN 1 AND 4 THEN yautcorh*expr ELSE 0 END) as d40IngresoAutonomo,\n sum(CASE WHEN dau = 10 THEN yautcorh*expr ELSE 0 END) as d10IngresoAutonomo, \n sum(CASE WHEN dau BETWEEN 1 AND 4 THEN ymonecorh*expr ELSE 0 END) as d40IngresoMonetario,\n sum(CASE WHEN dau = 10 THEN ymonecorh*expr ELSE 0 END) as d10IngresoMonetario\n\n\nFROM casen\nWHERE pco1 = 1","pinned":false,"hidden":false,"mode":"sql","output":"dataIndice10_40","database":"var:db"},{"id":1075,"value":"### Índice 10/10 \n*\"Índice de desigualdad que muestra la relación entre el ingreso\nrecibido por el 10% de hogares de mayores ingresos, decil X, y el\ningreso correspondiente al 10% de hogares con menores ingresos,\ndecil I.\", Manual del Investigador Casen 2017*","pinned":false,"hidden":false,"mode":"md"},{"id":1002,"value":"$35","pinned":false,"hidden":false,"mode":"ojs"},{"id":1082,"value":"SELECT \n sum(CASE WHEN dau BETWEEN 1 AND 1 THEN ytrabajocorh*expr ELSE 0 END) as d1IngresoTrabajo,\n sum(CASE WHEN dau = 10 THEN ytrabajocorh*expr ELSE 0 END) as d10IngresoTrabajo,\n sum(CASE WHEN dau BETWEEN 1 AND 1 THEN yautcorh*expr ELSE 0 END) as d1IngresoAutonomo,\n sum(CASE WHEN dau = 10 THEN yautcorh*expr ELSE 0 END) as d10IngresoAutonomo, \n sum(CASE WHEN dau BETWEEN 1 AND 1 THEN ymonecorh*expr ELSE 0 END) as d1IngresoMonetario,\n sum(CASE WHEN dau = 10 THEN ymonecorh*expr ELSE 0 END) as d10IngresoMonetario\n\n\nFROM casen\nWHERE pco1 = 1","pinned":false,"hidden":false,"mode":"sql","output":"dataIndice10_10","database":"var:db"},{"id":575,"value":"## Curva ingresos monetarios por hogares","pinned":false,"hidden":false,"mode":"md"},{"id":1121,"value":"En la siguiente curva se observa el ingreso por hogar al ordenar los hogares de menor a mayor ingreso. Dada la diferencia en la magnitud de los montos es difícil observar el comportamiento de la curva en la mayor parte de los hogares y por esta razón el próximo gráfico lo realizaremos con escala logarítimica en el eje Y (ingresos) .","pinned":false,"hidden":false,"mode":"md"},{"id":1100,"value":"{\n const numHogares = totalHogares[0].hogares;\n const dataPlotMonetario = dataFrecuenciaHogaresPorIngresoMonetario.filter(\n (d) => d.accumHogares < numHogares * 1\n );\n return Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\" },\n marks: [\n Plot.lineY(dataPlotMonetario, {\n x: \"accumHogares\",\n y: \"ingreso\"\n })\n ]\n });\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":1126,"value":"Curva de ingresos por hogares con escala logarítmica en el eje Y","pinned":false,"hidden":false,"mode":"md"},{"id":1124,"value":"{\n const numHogares = totalHogares[0].hogares;\n const dataPlotMonetario = dataFrecuenciaHogaresPorIngresoMonetario.filter(\n (d) => d.accumHogares < numHogares * 1\n );\n return Plot.plot({\n marginLeft: 50,\n y: { tickFormat: \"$.1s\", type: \"log\", grid: true },\n x: { grid: true, label: \"hogares\" },\n marks: [\n Plot.lineY(dataPlotMonetario, {\n x: \"accumHogares\",\n y: \"ingreso\"\n })\n ]\n });\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":1094,"value":"WITH tabla as (SELECT ymonecorh as ingreso, sum(expr) as hogares\nFROM casen\nWHERE ymonecorh > 0 AND pco1 = 1\nGROUP BY ymonecorh\nORDER BY ymonecorh)\n\n\nSELECT \n ingreso,\n SUM(hogares) OVER (ORDER BY ingreso) AS accumHogares,\nFROM \n tabla\n \nORDER BY \n ingreso asc;\n","pinned":false,"hidden":false,"mode":"sql","output":"dataFrecuenciaHogaresPorIngresoMonetario","database":"var:db"},{"id":317,"value":"## Indice Gini\n\n*\"Índice de desigualdad que muestra cuánto se aleja la distribución\ndel ingreso respecto a una situación de perfecta igualdad, cuyo\nvalor se sitúa en el rango (0,1).\nToma valor 0 cuando no existe desigualdad de ingresos del trabajo,\nes decir, todos los individuos u hogares tienen el mismo nivel de\ningresos; y, valor 1, cuando existe máxima desigualdad; es decir,\ntodo el ingreso se concentra en un individuo u hogar.\",Manual del Investigador Casen 2017*","pinned":false,"hidden":false,"mode":"md"},{"id":1139,"value":"Si calculamos el ingreso **monetario** de **todos los hogares** en Chile nos da una cifra de ${d3.format(\"$,d\")(_.last(datosAcumuladosHogaresIngresoMonetario)[\"accumIngreso\"])} (varios billones o millones de millones).\n\nSi no existiese desigualdad en los ingresos, la mitad de los hogares tendría la mitad del ingreso total. La curva que represente el ingreso acumulado vs la cantidad de hogares daría una línea recta:","pinned":false,"hidden":false,"mode":"md"},{"id":1160,"value":"$36","pinned":false,"hidden":false,"mode":"ojs"},{"id":1211,"value":"Pero el escenario real es distinto a un escenario sin desigualdad. La curva que refleja como aumenta el ingreso acumulado vs el número de hogares es una curva cóncava que se alejará más de la curva inicial en la medida que aumente la desigualdad.","pinned":false,"hidden":false,"mode":"md"},{"id":1180,"value":"$37","pinned":false,"hidden":false,"mode":"ojs"},{"id":1213,"value":"El área que separa las dos curvas es un indicador de la magnitud de al desigualdad. La proporción de esa área con respecto al área total bajo la recta sin desigualdad (triangulo gris) corresponde al indice Gini.\n\nSi las dos curvas coinciden (igualdad perfecta) el índice Gini tendría un valor igual a 0. Si el área que separa ambas curvas fuese la máxima (desigualdad absoluta) el índice Gini tendría un valor igual a 1.","pinned":false,"hidden":false,"mode":"md"},{"id":1192,"value":"$38","pinned":false,"hidden":false,"mode":"ojs"},{"id":1215,"value":"Usando datos de la Encuesta CASEN 2022 el índice Gini para el ingreso monetario en Chile es **${d3.format(\".2f\")(giniIngresoMonetario)}**","pinned":false,"hidden":false,"mode":"md"},{"id":1198,"value":"giniIngresoMonetario = {\n const maxHogares = _.last(datosAcumuladosHogaresIngresoMonetario)[\n \"accumHogares\"\n ];\n const maxIngreso = _.last(datosAcumuladosHogaresIngresoMonetario)[\n \"accumIngreso\"\n ];\n\n const areaEscenarioIdeal = (maxHogares * maxIngreso) / 2;\n\n const areaBajoCurvaReal = _.chain(\n _.range(0, datosAcumuladosHogaresIngresoMonetario.length - 1)\n )\n .reduce(\n (memo, i) =>\n memo +\n ((datosAcumuladosHogaresIngresoMonetario[i + 1].accumHogares -\n datosAcumuladosHogaresIngresoMonetario[i].accumHogares) *\n (datosAcumuladosHogaresIngresoMonetario[i + 1].accumIngreso +\n datosAcumuladosHogaresIngresoMonetario[i].accumIngreso)) /\n 2,\n 0\n )\n .value();\n\n return 1 - areaBajoCurvaReal / areaEscenarioIdeal;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":1142,"value":"WITH tabla as (SELECT ymonecorh as ingreso, sum(expr) as hogares\nFROM casen\n WHERE ymonecorh > 0 AND pco1 = 1\nGROUP BY ymonecorh\nORDER BY ymonecorh)\n\n\nSELECT \n ingreso,\n SUM(hogares) OVER (ORDER BY ingreso) AS accumHogares,\n SUM(ingreso*hogares) OVER (ORDER BY ingreso) AS accumIngreso\nFROM \n tabla\n \nORDER BY \n ingreso asc;\n","pinned":false,"hidden":false,"mode":"sql","output":"datosAcumuladosHogaresIngresoMonetario","database":"var:db"},{"id":1252,"value":"## Línea de pobreza","pinned":false,"hidden":false,"mode":"md"},{"id":1262,"value":"$39","pinned":false,"hidden":false,"mode":"md"},{"id":1265,"value":"De acuerdo a lo informado en los datos de CASEN 2020:\n\n* Línea de pobreza: **${d3.format(\"$,\")(umbralesPobreza[0].lp)}**\n* Línea de pobreza extrema: **${d3.format(\"$,\")(umbralesPobreza[0].li)}**","pinned":false,"hidden":false,"mode":"md"},{"id":1270,"value":"$3a","pinned":false,"hidden":false,"mode":"md"},{"id":1298,"value":"\n\n \n \n \n \n \n\n\n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n\n\n

Categoría	Personas (#)	Porcentaje (%)
Pobreza	${d3.format(\",\")(personasEnPobreza[0].personasPobreza)}	${d3.format(\".2%\")(personasEnPobreza[0].personasPobreza/personasEnPobreza[0].totalPersonas)}
Pobreza extrema	${d3.format(\",\")(personasEnPobreza[0].personasPobrezaExtrema)}	${d3.format(\".2%\")(personasEnPobreza[0].personasPobrezaExtrema/personasEnPobreza[0].totalPersonas)}
Total	${d3.format(\",\")(personasEnPobreza[0].totalPersonas)}	${d3.format(\".1%\")(personasEnPobreza[0].totalPersonas/personasEnPobreza[0].totalPersonas)}

","pinned":false,"hidden":false,"mode":"html"},{"id":1345,"value":"El siguiente gráfico muestra la distribución de los hogares según del Ingreso total del Hogar por Persona Equivalente (agregando al ingreso monetario una imputación por concepto de arriendo de la vivienda cuando se ocupa un hogar de manera gratuita y ajustando el número de \"personas equivalentes\" al considerar economías de escala )","pinned":false,"hidden":false,"mode":"md"},{"id":1362,"value":"## Distribución de hogares según ingresos del hogar por persona equivalente ","pinned":false,"hidden":false,"mode":"md"},{"id":1319,"value":"Plot.plot({\n y: { type: \"log\", label: \"Ingreso total del hogar por persona equivalente\" },\n x: { label: \"Hogares\" },\n width: width,\n marginRight: 130,\n marks: [\n Plot.ruleY([umbralesPobreza[0].lp, umbralesPobreza[0].li]),\n Plot.lineY(dataIngresoAdultoEquivalentePorHogares, {\n x: \"accumHogares\",\n y: \"yae\"\n }),\n Plot.text(\n dataIngresoAdultoEquivalentePorHogares,\n Plot.selectLast({\n x: \"accumHogares\",\n y: (d) => umbralesPobreza[0].lp,\n text: (d) => \"Línea de Pobreza\",\n textAnchor: \"start\",\n dx: 5\n })\n ),\n ,\n Plot.text(\n dataIngresoAdultoEquivalentePorHogares,\n Plot.selectLast({\n x: \"accumHogares\",\n y: (d) => umbralesPobreza[0].li,\n text: (d) => \"Línea de Pobreza Extrema\",\n textAnchor: \"start\",\n dx: 5\n })\n )\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":1348,"value":"## Distribución de personas según ingresos del hogar por persona equivalente ","pinned":false,"hidden":false,"mode":"md"},{"id":1351,"value":"Plot.plot({\n y: { type: \"log\", label: \"Ingreso total del hogar por persona equivalente\" },\n x: { label: \"Personas\" },\n width: width,\n marginRight: 130,\n marks: [\n Plot.lineY(dataIngresoAdultoEquivalentePorPersonas, {\n x: \"accumPersonas\",\n y: \"yae\",\n stroke: (d) => \"ingresos\",\n strokeWidth: 5\n }),\n Plot.text(\n dataIngresoAdultoEquivalentePorPersonas,\n Plot.selectLast({\n x: \"accumPersonas\",\n y: (d) => umbralesPobreza[0].lp,\n text: (d) => \"Línea de Pobreza\",\n textAnchor: \"start\",\n dx: 5\n })\n ),\n ,\n Plot.text(\n dataIngresoAdultoEquivalentePorPersonas,\n Plot.selectLast({\n x: \"accumPersonas\",\n y: (d) => umbralesPobreza[0].li,\n text: (d) => \"Línea de Pobreza Extrema\",\n textAnchor: \"start\",\n dx: 5\n })\n ),\n Plot.ruleY([umbralesPobreza[0].lp, umbralesPobreza[0].li], {\n strokeWidth: 3,\n stroke: \"umbral\"\n })\n ]\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":1283,"value":"SELECT \n sum(expr) as totalPersonas,\n sum(CASE WHEN yae < lp THEN expr ELSE 0 END) as personasPobreza,\n sum(CASE WHEN yae < li THEN expr ELSE 0 END) as personasPobrezaExtrema\nFROM casen","pinned":false,"hidden":false,"mode":"sql","output":"personasEnPobreza","database":"var:db"},{"id":1254,"value":"SELECT lp, li\nFROM casen\nLIMIT 1","pinned":false,"hidden":false,"mode":"sql","output":"umbralesPobreza","database":"var:db"},{"id":230,"value":"WITH tabla as (SELECT yae, sum(expr) as hogares\nFROM casen\nWHERE pco1 = 1\nGROUP BY yae\nORDER BY yae)\n\n\nSELECT \n yae,\n SUM(hogares) OVER (ORDER BY yae) AS accumHogares\nFROM \n tabla\n \nORDER BY \n yae asc;\n","pinned":false,"hidden":false,"mode":"sql","output":"dataIngresoAdultoEquivalentePorHogares","database":"var:db"},{"id":1353,"value":"WITH tabla as (SELECT yae, sum(expr) as personas\nFROM casen\nGROUP BY yae\nORDER BY yae)\n\n\nSELECT \n yae,\n SUM(personas) OVER (ORDER BY yae) AS accumPersonas\nFROM \n tabla\n \nORDER BY \n yae asc;\n","pinned":false,"hidden":false,"mode":"sql","output":"dataIngresoAdultoEquivalentePorPersonas","database":"var:db"},{"id":643,"value":"## Lectura y conversión de formato Base de Datos","pinned":false,"hidden":false,"mode":"md"},{"id":645,"value":"$3b","pinned":false,"hidden":false,"mode":"md"},{"id":1246,"value":"Los datos en formato parquet se utilizan para construir la siguiente base de datos DuckDB:","pinned":false,"hidden":false,"mode":"md"},{"id":4,"value":"db = DuckDBClient.of({ casen: FileAttachment(\"CASEN_2022.parquet\") })","pinned":true,"hidden":false,"mode":"ojs"},{"id":1248,"value":"## Código auxiliar para configurar formato de números en español","pinned":false,"hidden":false,"mode":"md"},{"id":816,"value":"d3Config.setLocaleD3_ES()","pinned":true,"hidden":false,"mode":"ojs"},{"id":812,"value":"import { d3Config } from \"@elaval/utils\"","pinned":false,"hidden":false,"mode":"ojs"}],"files":"$W3c","stdlib":"1","titling":"auto"}