
Analisis de abarrotes
# El dueño de todas las tiendas quiere clasificar sus clientes por número de visitas
library(cluster)
library(ggplot2)
library(data.table)
library(factoextra)
## Welcome! Want to learn more? See two factoextra-related books at https://goo.gl/ve3WBa
library(DataExplorer)
datos <- read.csv("C:\\Users\\lcbor\\Downloads\\abarrotes1.csv")
summary(datos)
## Cliente Ticket_Promedio Visitas
## Length:4298 Min. : 0.00 Min. : 1.000
## Class :character 1st Qu.: 27.92 1st Qu.: 1.000
## Mode :character Median : 51.12 Median : 2.000
## Mean : 68.50 Mean : 9.266
## 3rd Qu.: 88.32 3rd Qu.: 5.000
## Max. :3023.64 Max. :21664.000
introduce(datos)
## rows columns discrete_columns continuous_columns all_missing_columns
## 1 4298 3 1 2 0
## total_missing_values complete_rows total_observations memory_usage
## 1 0 4298 12894 328216
plot_intro(datos)

plot_missing(datos)

plot_correlation(datos)

LS0tDQp0aXRsZTogIkFiYXJyb3RlcyINCmF1dGhvcjogIkx1aXMgQ2FybG9zIEJvcmJvbiBNYXJ0aW5leiINCmRhdGU6ICIyMDI0LTA4LTI1Ig0Kb3V0cHV0Og0KICBodG1sX2RvY3VtZW50Og0KICAgIHRvYzogdHJ1ZQ0KICAgIHRvY19mb2F0OiB0cnVlDQogICAgY29kZV9kb3dubG9hZDogdHJ1ZQ0KLS0tDQoNCiFbXShDOlxcVXNlcnNcXGxjYm9yXFxEb2N1bWVudHNcXHRpZW5kaXRhLmpwZykNCg0KIyA8c3BhbiBzdHlsZT0iY29sb3I6IGJsdWU7Ij5BbmFsaXNpcyBkZSBhYmFycm90ZXM8L3NwYW4+IA0KYGBge3Igd2FybmluZz1GQUxTRX0NCiMgRWwgZHVlw7FvIGRlIHRvZGFzIGxhcyB0aWVuZGFzIHF1aWVyZSBjbGFzaWZpY2FyIHN1cyBjbGllbnRlcyBwb3IgbsO6bWVybyBkZSB2aXNpdGFzDQoNCmxpYnJhcnkoY2x1c3RlcikNCmxpYnJhcnkoZ2dwbG90MikNCmxpYnJhcnkoZGF0YS50YWJsZSkNCmxpYnJhcnkoZmFjdG9leHRyYSkNCmxpYnJhcnkoRGF0YUV4cGxvcmVyKQ0KDQpkYXRvcyA8LSByZWFkLmNzdigiQzpcXFVzZXJzXFxsY2JvclxcRG93bmxvYWRzXFxhYmFycm90ZXMxLmNzdiIpDQoNCnN1bW1hcnkoZGF0b3MpDQppbnRyb2R1Y2UoZGF0b3MpDQpwbG90X2ludHJvKGRhdG9zKQ0KcGxvdF9taXNzaW5nKGRhdG9zKQ0KcGxvdF9jb3JyZWxhdGlvbihkYXRvcykNCg0KYGBgDQoNCg==