Sandra Katteryne Rodríguez Hurtado
En el presente cuaderno se dará a conocer el mapa de la producción de Arroz en Caquetá en el año 2018, en base a los datos proporcionados en el cuaderno denominado “Estadísticas Agropecuarias Municipales de departamento de Caquetá - Parte 1”. Fue necesario el uso de los paquetes ggplot2 y knitr.
list.of.packages <- c("here", "tidyverse", "rgeos", "maptools", "raster", "sf", "viridis", "rnaturalearth", "GSODR", "ggrepel", "cowplot")
new.packages <- list.of.packages[!(list.of.packages %in% installed.packages()[,"Package"])]
if(length(new.packages)) install.packages(new.packages)
library(ggplot2)
Registered S3 method overwritten by 'dplyr':
method from
print.rowwise_df
library(knitr)
include_graphics("./Agro/Mapa_caqueta.png")

Hay algunos municipios que no presentaron reportes de producción de arroz durante el año 2018, sin embargo, se puede apreciar que el municipio de Puerto Rico fue el que mayor producción de arroz tuvo, seguido de San Vicente del Caguán.
LS0tCnRpdGxlOiAiRXN0YWTDrXN0aWNhcyBBZ3JvcGVjdWFyaWFzIE11bmljaXBhbGVzIGRlbCBkZXBhcnRhbWVudG8gZGUgQ2FxdWV0w6EgLSBQYXJ0ZSAyOiBNYXBhIGRlIGxhIHByb2R1Y2Npw7NuIGRlIEFycm96IGVuIGVsIGHDsW8gMjAxOCIKZGF0ZTogIjIzLzA0LzIwMjAiCm91dHB1dDogaHRtbF9ub3RlYm9vawotLS0KIyMjIyBTYW5kcmEgS2F0dGVyeW5lIFJvZHLDrWd1ZXogSHVydGFkbwpFbiBlbCBwcmVzZW50ZSBjdWFkZXJubyBzZSBkYXLDoSBhIGNvbm9jZXIgZWwgbWFwYSBkZSBsYSBwcm9kdWNjacOzbiBkZSBBcnJveiBlbiBDYXF1ZXTDoSBlbiBlbCBhw7FvIDIwMTgsIGVuIGJhc2UgYSBsb3MgZGF0b3MgcHJvcG9yY2lvbmFkb3MgZW4gZWwgY3VhZGVybm8gZGVub21pbmFkbyAiRXN0YWTDrXN0aWNhcyBBZ3JvcGVjdWFyaWFzIE11bmljaXBhbGVzIGRlIGRlcGFydGFtZW50byBkZSBDYXF1ZXTDoSAtIFBhcnRlIDEiLiBGdWUgbmVjZXNhcmlvIGVsIHVzbyBkZSBsb3MgcGFxdWV0ZXMgZ2dwbG90MiB5IGtuaXRyLgoKYGBge3J9Cmxpc3Qub2YucGFja2FnZXMgPC0gYygiaGVyZSIsICJ0aWR5dmVyc2UiLCAicmdlb3MiLCAibWFwdG9vbHMiLCAicmFzdGVyIiwgInNmIiwgICJ2aXJpZGlzIiwgInJuYXR1cmFsZWFydGgiLCAiR1NPRFIiLCAiZ2dyZXBlbCIsICJjb3dwbG90IikKbmV3LnBhY2thZ2VzIDwtIGxpc3Qub2YucGFja2FnZXNbIShsaXN0Lm9mLnBhY2thZ2VzICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKClbLCJQYWNrYWdlIl0pXQppZihsZW5ndGgobmV3LnBhY2thZ2VzKSkgaW5zdGFsbC5wYWNrYWdlcyhuZXcucGFja2FnZXMpCmBgYApgYGB7ciBvdXQud2lkdGg9IjEwMCUifQpsaWJyYXJ5KGdncGxvdDIpCmxpYnJhcnkoa25pdHIpCmluY2x1ZGVfZ3JhcGhpY3MoIi4vQWdyby9NYXBhX2NhcXVldGEucG5nIikKYGBgCkhheSBhbGd1bm9zIG11bmljaXBpb3MgcXVlIG5vIHByZXNlbnRhcm9uIHJlcG9ydGVzIGRlIHByb2R1Y2Npw7NuIGRlIGFycm96IGR1cmFudGUgZWwgYcOxbyAyMDE4LCBzaW4gZW1iYXJnbywgc2UgcHVlZGUgYXByZWNpYXIgcXVlIGVsIG11bmljaXBpbyBkZSBQdWVydG8gUmljbyBmdWUgZWwgcXVlIG1heW9yIHByb2R1Y2Npw7NuIGRlIGFycm96IHR1dm8sIHNlZ3VpZG8gZGUgU2FuIFZpY2VudGUgZGVsIENhZ3XDoW4uIAo=