31:T589,md` La siguiente grafica muestra como el promedio anual de las Anomalías combinadas de la temperatura del aire de la superficie terrestre y del agua de la superficie del mar (índice de temperatura tierra-océano, LOTI) se ha comportado desde el año 1880 hasta el año 2018 (Con datos medidos hasta Agosto). Se puede observar que el cambio a nivel global se mantuvo estable hasta aproximadamente el año 1940, en donde comenzó a aumentar gradualmente hasta 1 grado aproximadamente en el año 2018. Se pueden ver variaciones entre años pero se sigue manteniendo la tendencia al alza. Al seleccionar el hemisferio Norte, se puede ver que el aumento del cambio de temperatura comenzó un poco antes (1930 aproximadamente) y que también mantuvo su tendencia al alza, llegando hasta el valor de +1.4 grados en los años recientes. Con respecto al hemisferio sur, el cambio de temperatura tuvo un pico a inicios de la década de 1940 y luego comenzó su tendencia al alza, sin embargo este aumento ha llegado hasta +0.7 grados aproximadamente en los últimos años, que es la mitad del aumento registrado en el hemisferio Norte. #### NOTA: Para ver la grafica por hemisferio y global, por favor seleccione Global, North o South en la lista desplegable. El archivo .csv correspondiente a esta visualización esta disponible en la siguiente ruta: https://drive.google.com/open?id=1BRKaEOlv7b9choc9qY5270lXFcXegDK9 `32:T53c,md` El siguiente Heatmap muestra el detalle de la variación de temperatura por mes a nivel global, para el hemisferio norte y para el hemisferio sur. Los valores en color azul muestran una variación negativa de la temperatura (entre mas oscuro el azul mas negativo) y los valores en rojo muestran una variación de temperatura positiva. Esta grafica permite ver a simple vista que la temperatura a nivel global ha aumentado desde la década de los 40 hasta la actualidad ya que el nivel de opacidad del rojo disminuye, haciéndose mas oscuro, lo que indica aumento de temperatura. Se puede ver también que para todos los meses el aumento es aproximadamente el mismo, sin embargo se puede ver que entre diciembre y febrero, las temperaturas fueron mas altas años antes que otros meses. Igualmente, como se había concluido anteriormente, el hemisferio Norte tiene mayores aumentos de temperatura que el hemisferio sur. El patrón mencionado para los meses de diciembre, enero y febrero aplica para el hemisferio norte pero no para el hemisferio sur, en donde el aumento se podría decir que es constante en todos los meses, tal vez entre mayo y agosto se presentaron variaciones mas altas en años anteriores. #### NOTA: Para ver la grafica por hemisferio y global, por favor seleccione Global, North o South en la lista desplegable. `33:T589,chart_2 = { const height = 500 const marginLeft = 55 const marginTop = 30 const svg = d3.select(DOM.svg(width, height)) .attr('viewBox', `-${marginLeft} -${marginTop} ${width} ${height}`) const x = d3.scaleBand() .range([0, width - 55]) .domain(d3.map(datos_totales_filtrados, d => d.date.substring(0, 4)).keys()) // año .padding(0.2) const xAxis = d3.axisTop(x).tickValues(x.domain().filter((d, i) => !(i % 10))) svg.append('g') .call(xAxis) // .selectAll("text") // .attr("transform", "translate(0,0) rotate(-90)") const y = d3.scaleBand() .range([0, height - 30]) .domain(d3.range(1, 13)) .padding(0.2) const yAxis = d3.axisLeft(y) .tickFormat(d => moment(d, 'M').format('MMMM')) svg.append('g').call(yAxis) const color = d3.scaleSequential(d3.interpolateRdYlBu) .domain([0.9, -0.9]) let minMax = 'max' function toggleMinMax () { minMax = minMax === 'max' ? 'min' : 'max' svg.selectAll('rect') .attr('fill', d => color(d[minMax])) } // draw heatmap dots svg.selectAll('rect') .data(datos_totales_filtrados) .enter().append('rect') .attr('x', d => x(moment(d.date).year())) .attr('y', d => y(moment(d.date).month() + 1)) .attr('width', x.bandwidth()) .attr('height', y.bandwidth()) .attr('fill', d => color(d.max)) .on('click', toggleMinMax) return svg.node() }34:T598,chart_2_aire = { const height = 500 const marginLeft = 55 const marginTop = 30 const svg = d3.select(DOM.svg(width, height)) .attr('viewBox', `-${marginLeft} -${marginTop} ${width} ${height}`) const x = d3.scaleBand() .range([0, width - 55]) .domain(d3.map(datos_totales_filtrados_aire, d => d.date.substring(0, 4)).keys()) // año .padding(0.2) const xAxis = d3.axisTop(x).tickValues(x.domain().filter((d, i) => !(i % 10))) svg.append('g') .call(xAxis) // .selectAll("text") // .attr("transform", "translate(0,0) rotate(-90)") const y = d3.scaleBand() .range([0, height - 30]) .domain(d3.range(1, 13)) .padding(0.2) const yAxis = d3.axisLeft(y) .tickFormat(d => moment(d, 'M').format('MMMM')) svg.append('g').call(yAxis) const color = d3.scaleSequential(d3.interpolateRdYlBu) .domain([0.9, -0.9]) let minMax = 'max' function toggleMinMax () { minMax = minMax === 'max' ? 'min' : 'max' svg.selectAll('rect') .attr('fill', d => color(d[minMax])) } // draw heatmap dots svg.selectAll('rect') .data(datos_totales_filtrados_aire) .enter().append('rect') .attr('x', d => x(moment(d.date).year())) .attr('y', d => y(moment(d.date).month() + 1)) .attr('width', x.bandwidth()) .attr('height', y.bandwidth()) .attr('fill', d => color(d.max)) .on('click', toggleMinMax) return svg.node() }35:[] 2f:{"title":"Análisis de temperatura de superficie GISS (GISTEMP)","cells":[{"id":0,"value":"md`# Análisis de temperatura de superficie GISS (GISTEMP)`","pinned":false,"hidden":false,"mode":"ojs"},{"id":344,"value":"md`### Yeison Javier Cuitiva - 201319325`","pinned":false,"hidden":false,"mode":"ojs"},{"id":346,"value":"md` Desde hace algunos años hemos escuchado sobre el fenómeno del calentamiento global y como este ha provocado que las temperaturas en todo el planeta aumenten, con sus consecuencias a todo nivel en el planeta. Para poder determinar si en verdad este fenómeno es cierto, podemos recurrir a fuentes de datos como los que posee la Nasa para el análisis de temperatura de la superficie terrestre.\n\nEl análisis de temperatura de superficie GISS (GISTEMP) es una estimación del cambio de temperatura de la superficie global. Estos datos se actualizan a mediados de cada mes con los archivos de varias fuentes de datos como NOAA GHCN v3 (estaciones meteorológicas), ERSST v5 (áreas oceánicas) y SCAR (estaciones antárticas), y se combinan para tener una base de datos de las variaciones de temperatura a nivel global desde 1880.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":352,"value":"md` A continuación, se muestran graficas en donde se puede observar la variación de temperatura promedio por año y para mas detalle por año y mes.\n\n#### Nota: estas variaciones se miden a partir del promedio de temperatura entre los años 1951 y 1980. `","pinned":false,"hidden":false,"mode":"ojs"},{"id":102,"value":"md` ### Variación de temperatura por año`","pinned":false,"hidden":false,"mode":"ojs"},{"id":374,"value":"$31","pinned":false,"hidden":false,"mode":"ojs"},{"id":4,"value":"viewof file = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":305,"value":"viewof Zona = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":44,"value":"chart = {\n const svg = d3.select(DOM.svg(width, height));\n\n svg.append(\"g\")\n .call(xAxis);\n\n svg.append(\"g\")\n .call(yAxis);\n \n svg.append(\"path\")\n .datum(datos_filtrados)\n .attr(\"fill\", \"none\")\n .attr(\"stroke\", \"steelblue\")\n .attr(\"stroke-width\", 1.5)\n .attr(\"stroke-linejoin\", \"round\")\n .attr(\"stroke-linecap\", \"round\")\n .attr(\"d\", line)\n \n return svg.node();\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":196,"value":"md` ### Variación de temperatura por año y mes`","pinned":false,"hidden":false,"mode":"ojs"},{"id":485,"value":"$32","pinned":false,"hidden":false,"mode":"ojs"},{"id":327,"value":"viewof Zona2 = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":204,"value":"$33","pinned":false,"hidden":false,"mode":"ojs"},{"id":518,"value":"md` ### Variación de temperatura del aire de la superficie terrestre por año`","pinned":false,"hidden":false,"mode":"ojs"},{"id":550,"value":"md` A continuación se muestra el promedio anual de las Anomalías de la temperatura del aire de la superficie terrestre (solamente). A diferencia de los datos combinados de la temperatura de la superficie terrestre y de la superficie del mar, los datos de aire muestran un aumento constante desde que se iniciaron las mediciones llegando a un aumento de 1.2 grados aproximadamente en los años recientes. En el hemisferio Norte, el aumento llega hasta los 1.6 grados y el sur hasta los 0.8 grados aproximadamente.\n\n#### NOTA: Para ver la grafica por hemisferio y global, por favor seleccione Global, North o South en la lista desplegable.\n\n\nEl archivo .csv correspondiente a esta visualización esta disponible en la siguiente ruta: https://drive.google.com/open?id=1eewLYoeNpvZ3sFVn89YLLKqyfeGHm_Qy\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":495,"value":"viewof file_aire = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":503,"value":"viewof ZonaAire = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":516,"value":"chart_aire = {\n const svg = d3.select(DOM.svg(width, height));\n\n svg.append(\"g\")\n .call(xAxis_aire);\n\n svg.append(\"g\")\n .call(yAxis_aire);\n \n svg.append(\"path\")\n .datum(datos_filtrados_aire)\n .attr(\"fill\", \"none\")\n .attr(\"stroke\", \"steelblue\")\n .attr(\"stroke-width\", 1.5)\n .attr(\"stroke-linejoin\", \"round\")\n .attr(\"stroke-linecap\", \"round\")\n .attr(\"d\", line_aire)\n \n return svg.node();\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":554,"value":"md` ### Variación de temperatura del aire de la superficie terrestre por año y mes`","pinned":false,"hidden":false,"mode":"ojs"},{"id":556,"value":"md` En este Heatmap se muestran los datos de variación de temperatura solo para el aire en la superficie. La diferencia con la anterior es que los valores de temperatura son mas altos, tanto para los datos globales, como para los hemisferios.\n\n#### NOTA: Para ver la grafica por hemisferio y global, por favor seleccione Global, North o South en la lista desplegable.\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":541,"value":"viewof Zona2Aire = html``","pinned":false,"hidden":false,"mode":"ojs"},{"id":546,"value":"$34","pinned":false,"hidden":false,"mode":"ojs"},{"id":561,"value":"md` ### Conclusión\n\nCon base en estas visualizaciones, se puede ver que efectivamente el fenomeno del calentamiento global es una realidad y que ha venido en aumento hace ya varias decadas. Otra concluisión a la que se puede llegar es que el aumento ha sido mayor en el hemisferio norte que en el hemisferio sur.\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":563,"value":"md`### Fuente de datos\n\nGISTEMP Team, 2018: GISS Surface Temperature Analysis (GISTEMP). NASA Goddard Institute for Space Studies. Dataset accessed 20YY-MM-DD at https://data.giss.nasa.gov/gistemp/.\n\nHansen, J., R. Ruedy, M. Sato, and K. Lo, 2010: Global surface temperature change, Rev. Geophys., 48, RG4004, doi:10.1029/2010RG000345.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":568,"value":"md`### Tecnologías\n\nSe uso javascript y la libreria D3 versión 5 `","pinned":false,"hidden":false,"mode":"ojs"},{"id":340,"value":"md`### Licencia MIT\n\n\nEste observable se publica bajo licencia MIT.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":537,"value":"datos_totales_aire = {\n const data = [];\n // https://data.giss.nasa.gov/gistemp/tabledata_v3/GLB.Ts+dSST.csv\n await d3.csv(URL.createObjectURL(file_aire), (d, i, columns) => {\n for (let i = 2; i < 14; ++i) {\n data.push({\n Key: d.Key,\n date: d.Year + \"-\" + ('00'+ (i-1)).slice(-2),\n min: +d[columns[i]],\n max: +d[columns[i]]\n });\n }\n });\n return data;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":539,"value":"datos_totales_filtrados_aire = datos_totales_aire.filter(function(d){\n return d.Key == Zona2Aire\n} )","pinned":false,"hidden":false,"mode":"ojs"},{"id":497,"value":"data_aire = d3.csv(URL.createObjectURL(file_aire))","pinned":false,"hidden":false,"mode":"ojs"},{"id":499,"value":"datos_aire = data_aire.map(function(d){\n return{\n Key: d.Key,\n Year: parseInt(d.Year),\n value: parseFloat(d.Prom)\n }\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":501,"value":"datos_filtrados_aire = datos_aire.filter(function(d){\n return d.Key == ZonaAire\n} )","pinned":false,"hidden":false,"mode":"ojs"},{"id":506,"value":"x_aire = d3.scaleLinear()\n .domain([d3.min(datos_filtrados_aire, d => d.Year), d3.max(datos_filtrados_aire, d => d.Year)]).nice()\n .range([margin.left, width - margin.right])","pinned":false,"hidden":false,"mode":"ojs"},{"id":508,"value":"y_aire = d3.scaleLinear()\n .domain([d3.min(datos_filtrados_aire, d => d.value), d3.max(datos_filtrados_aire, d => d.value)]).nice()\n .range([height - margin.bottom, margin.top])","pinned":false,"hidden":false,"mode":"ojs"},{"id":510,"value":"xAxis_aire = g => g\n .attr(\"transform\", `translate(0,${height - margin.bottom})`)\n .call(d3.axisBottom(x_aire).tickFormat(d3.format(\".0f\")))","pinned":false,"hidden":false,"mode":"ojs"},{"id":512,"value":"yAxis_aire = g => g\n .attr(\"transform\", `translate(${margin.left},0)`)\n .call(d3.axisLeft(y_aire))\n .call(g => g.select(\".domain\").remove())\n .call(g => g.select(\".tick:last-of-type text\").clone()\n .attr(\"x\", 3)\n .attr(\"text-anchor\", \"start\")\n .attr(\"font-weight\", \"bold\")\n .text(data_aire.y))","pinned":false,"hidden":false,"mode":"ojs"},{"id":514,"value":"line_aire = d3.line()\n .defined(d => !isNaN(d.value))\n //.curve(d3.curveCatmullRom)\n .x(d => x_aire(d.Year))\n .y(d => y_aire(d.value))","pinned":false,"hidden":false,"mode":"ojs"},{"id":6,"value":"// Cargue de Librería D3\nd3 = require(\"d3@5\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":14,"value":"data = d3.csv(URL.createObjectURL(file))","pinned":false,"hidden":false,"mode":"ojs"},{"id":50,"value":"parseDate = d3.timeParse(\"%Y-%m\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":54,"value":"datos = data.map(function(d){\n return{\n Key: d.Key,\n Year: parseInt(d.Year),\n value: parseFloat(d.Prom)\n }\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":288,"value":"datos_filtrados = datos.filter(function(d){\n return d.Key == Zona\n} )","pinned":false,"hidden":false,"mode":"ojs"},{"id":29,"value":"height = 500","pinned":false,"hidden":false,"mode":"ojs"},{"id":31,"value":"margin = ({top: 20, right: 30, bottom: 30, left: 40})","pinned":false,"hidden":false,"mode":"ojs"},{"id":33,"value":"x = d3.scaleLinear()\n .domain([d3.min(datos_filtrados, d => d.Year), d3.max(datos_filtrados, d => d.Year)]).nice()\n .range([margin.left, width - margin.right])","pinned":false,"hidden":false,"mode":"ojs"},{"id":36,"value":"y = d3.scaleLinear()\n .domain([d3.min(datos_filtrados, d => d.value), d3.max(datos_filtrados, d => d.value)]).nice()\n .range([height - margin.bottom, margin.top])","pinned":false,"hidden":false,"mode":"ojs"},{"id":38,"value":"xAxis = g => g\n .attr(\"transform\", `translate(0,${height - margin.bottom})`)\n .call(d3.axisBottom(x).tickFormat(d3.format(\".0f\")))","pinned":false,"hidden":false,"mode":"ojs"},{"id":40,"value":"yAxis = g => g\n .attr(\"transform\", `translate(${margin.left},0)`)\n .call(d3.axisLeft(y))\n .call(g => g.select(\".domain\").remove())\n .call(g => g.select(\".tick:last-of-type text\").clone()\n .attr(\"x\", 3)\n .attr(\"text-anchor\", \"start\")\n .attr(\"font-weight\", \"bold\")\n .text(data.y))","pinned":false,"hidden":false,"mode":"ojs"},{"id":42,"value":"line = d3.line()\n .defined(d => !isNaN(d.value))\n //.curve(d3.curveCatmullRom)\n .x(d => x(d.Year))\n .y(d => y(d.value))","pinned":false,"hidden":false,"mode":"ojs"},{"id":263,"value":"colorScale = d3.scaleOrdinal(d3.schemeCategory10)\n .domain([1,100])","pinned":false,"hidden":false,"mode":"ojs"},{"id":308,"value":"datos_totales = {\n const data = [];\n // https://data.giss.nasa.gov/gistemp/tabledata_v3/GLB.Ts+dSST.csv\n await d3.csv(URL.createObjectURL(file), (d, i, columns) => {\n for (let i = 2; i < 14; ++i) {\n data.push({\n Key: d.Key,\n date: d.Year + \"-\" + ('00'+ (i-1)).slice(-2),\n min: +d[columns[i]],\n max: +d[columns[i]]\n });\n }\n });\n return data;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":321,"value":"datos_totales_filtrados = datos_totales.filter(function(d){\n return d.Key == Zona2\n} )","pinned":false,"hidden":false,"mode":"ojs"},{"id":201,"value":"moment = require('moment')","pinned":false,"hidden":false,"mode":"ojs"}],"files":"$W35","stdlib":"1","titling":"auto"}