
Contexto
Exploraremos distintas formas de graficar.
Importar la base de datos
#file.choose()
df <- read.csv("/Users/ivanbazaldua/Downloads/abarrotes_bd_limpia.csv")
Realizar gráficas
#install.packages("ggplot2")
library(ggplot2)
ggplot(df, aes(x=Subtotal))+
geom_histogram() +
labs (
title = "Histograma de Subtotales",
subtitle = "Caso de Abarrotes",
y= "Cantidad"
)
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

ggplot(df, aes(x=Precio, y= Unidades, colour=NombreDepartamento)) +
geom_point() +
labs(
title= "Gráfica de puntos",
subtitle= "Casa Abarrotes",
y= "Cantidad"
)

ggplot(df, aes(x="", y=Subtotal, fill=vcClaveTienda)) +
geom_bar(stat="identity") +
coord_polar("y", start=0)

LS0tCnRpdGxlOiAiR3LDoWZpY2FzIgphdXRob3I6ICJJdsOhbiBCYXphbGTDumEgQTAwODM3MTE1IgpkYXRlOiAiMjAyMy0wOS0xMyIKb3V0cHV0OgogIGh0bWxfZG9jdW1lbnQ6CiAgICB0b2M6IHllcwogICAgdG9jX2Zsb2F0OiB5ZXMKICAgIGNvZGVfZG93bmxvYWQ6IHllcwogICAgdGhlbWU6IGx1bWVuCiAgICBoaWdobGlnaHQ6IG1vbm9jaHJvbWUKICBwZGZfZG9jdW1lbnQ6CiAgICB0b2M6IHllcwotLS0KIVtdKC9Vc2Vycy9pdmFuYmF6YWxkdWEvRG93bmxvYWRzL3RoZS1saW5lLWJsdXJzLXdpdGgtYmVlcnMuZ2lmKQoKIyMjIENvbnRleHRvCkV4cGxvcmFyZW1vcyBkaXN0aW50YXMgZm9ybWFzIGRlIGdyYWZpY2FyLgoKIyMjIEltcG9ydGFyIGxhIGJhc2UgZGUgZGF0b3MKCmBgYHtyfQojZmlsZS5jaG9vc2UoKQoKZGYgPC0gcmVhZC5jc3YoIi9Vc2Vycy9pdmFuYmF6YWxkdWEvRG93bmxvYWRzL2FiYXJyb3Rlc19iZF9saW1waWEuY3N2IikKYGBgCgojIyMgUmVhbGl6YXIgZ3LDoWZpY2FzCgpgYGB7cn0KI2luc3RhbGwucGFja2FnZXMoImdncGxvdDIiKQpsaWJyYXJ5KGdncGxvdDIpCmdncGxvdChkZiwgYWVzKHg9U3VidG90YWwpKSsKICBnZW9tX2hpc3RvZ3JhbSgpICsgCiAgbGFicyAoCiAgICB0aXRsZSA9ICJIaXN0b2dyYW1hIGRlIFN1YnRvdGFsZXMiLAogICAgc3VidGl0bGUgPSAiQ2FzbyBkZSBBYmFycm90ZXMiLAogICAgeT0gIkNhbnRpZGFkIgogICAgCiAgKQoKZ2dwbG90KGRmLCBhZXMoeD1QcmVjaW8sIHk9IFVuaWRhZGVzLCBjb2xvdXI9Tm9tYnJlRGVwYXJ0YW1lbnRvKSkgKwogIGdlb21fcG9pbnQoKSArCiAgbGFicygKICAgIHRpdGxlPSAiR3LDoWZpY2EgZGUgcHVudG9zIiwKICAgIHN1YnRpdGxlPSAiQ2FzYSBBYmFycm90ZXMiLAogICAgeT0gIkNhbnRpZGFkIgogICkKCmBgYApgYGB7cn0KZ2dwbG90KGRmLCBhZXMoeD0iIiwgeT1TdWJ0b3RhbCwgZmlsbD12Y0NsYXZlVGllbmRhKSkgKwogIGdlb21fYmFyKHN0YXQ9ImlkZW50aXR5IikgKwogIGNvb3JkX3BvbGFyKCJ5Iiwgc3RhcnQ9MCkKYGBgCgo=