1 Los Objetivos De La Práctica

1.1 * El Objetivo General De La Práctica

A continuación se presenta el objetivo general de la práctica:

  • Analizar, Comprender Y Construir Permutaciones A Partir De Un Conjunto De Datos De Un Grupo De Personas, Extraídas De Un Espacio Muestral, Además De Nombre De Empresas Reconocidas Mundialmente. 

1.2 * Los Objetivos Específicos De La Práctica

A continuación, se presenta los objetivos específicos que tiene la siguiente práctica:

  • Importar E Implementar Las Librerías Necesarias Para Realiza La Práctica Correspondiente

  • Cargar Los Datos Estadísticos A Emplear En La Práctica

  • Identificar, Analizar Y Comprender La Fórmula Para Determinar El Factorial De Un Número

  • Identificar, Analizar Y Comprender La Fórmula Para Determinar Las Permutaciones Posibles De Un Conjunto De Datos Donde Si Importa El Orden

  • Determinar Probabilidades A Partir De Un Espacio Muestral De Las Combinaciones Realizadas

  • Analizar Y Encontrar La Probabilidad Con Base En Frecuencia O Contabilizar Eventos Específicos Del Espacio Muestral

  • Identificar Las Diferencias Entre Permutaciones Y Combinaciones.

  • Realizar Un Análisis Crítico De La Practica Realizada

2 * Investigaciones Pertinentes

2.1 * Las Permutaciones

En matemáticas, una permutación de un conjunto es, en términos generales, una disposición de sus miembros en una secuencia u orden lineal, o si el conjunto ya está ordenado, una variación del orden o posición de los elementos de un conjunto ordenado.

Esto quiere decir que una permutación es un cambio de la manera en la que se disponen los elementos. Puede considerarse como una función de tipo biyectiva dentro del conjunto, ya que señala distintas correspondencias entre los elementos.

2.1.1 * Las Caracteristicas De Las Permutaciones

También, se llama permutaciones de \displaystyle m elementos en \displaystyle n posiciones a las distintas formas en que pueden ordernarse los \displaystyle m elementos ocupando únicamente las \displaystyle n posiciones. Siempre y cuando \displaystyle m\geq n.

Hay que tener en cuenta lo siguiente:

  • importa el orden, ya que el intercambio entre dos elementos distintos genera una nueva permutación

  • No se repiten los elementos, ya que de repetirse o ser iguales entre si, al intercambiarlos no se genera una nueva permutació

Generalmente utilizamos el término para referirnos tanto a elementos que se mezclan sin importar en el orden, como aquellos en los que sí importa el orden; sin embargo, existe una forma de nombrar a cada una de estas mezclas. Una de ellas es combinación, la otra, permutación.

La noción de permutación es habitual en el campo de las matemáticas. En este caso, la idea menciona a los posibles ordenamientos de aquellos elementos que forman parte de un conjunto no infinito.

2.1.2 * La Fórmula Para Determinar Las Permutaciones

Para realizar las permutaciones, es necesario identificar la importancia del valor factorial de un número

2.1.2.1 * El Factorial De Un Número

El factorial de un número es el producto de \(n\) por todos los naturales menores que el y se representa con el \(!n\), entonces \(n!=n\times(n-1)...\times 1\).

La notación ! significa factorial; por ejemplo, 5 factorial es 5! = (5)(4)(3)(2)(1) = 120.

La función factorial es una fórmula matemática representada por el signo de exclamación \(!\). En la fórmula Factorial se deben multiplicar todos los números enteros y positivos que hay entre el número que aparece en la fórmula y el número \(1\).

La formula para determinar las permutaciones posibles son:

\[ S=Pn\binom{n}{r} = \frac{n!}{(n-r)!} \]

Donde:

  • S Es El Espacio Muestral Y La Cantidad De Permutaciones

  • Cn Es El Número De Permutaciones Posibles

  • N/R Es Símbolo De Permutar N Elementos En Grupos De R

  • n Es El Total De Elementos

  • R Es De Cuantos En Cuantos Elementos Se Hacen Grupos Y Permutaciones

3 * Desarrollo Metodológico De La Práctica

3.1 * Actividad No. 1 - Nombre Personas

3.1.1 * Determinar El Número De Permutaciones Posibles De Nombres

Se trata de hacer combinaciones con los nombres de cuatro personas: “Oscar”, “Paco”, “Paty”, “Laura” … … (otros nombres) en grupos de 2. Entonces \(n=4\), porque hay cuatro nombres o elementos y \(r=2\) porque se trata de agrupar de dos en dos.

¿Cuántas combinaciones deberá haber?

  • Oscar y Paco

  • Oscar y Hanny

  • Oscar y Laura

  • Paco y Stephany

  • … …

  • Oscar y Laura

library(gtools)
nombres <- c("Oscar", "Paco", "Paty", "Laura", "Rubén", "Luis", "Lucy", "Alberto", "Juan", "Stephany", "Andrea", "Hanny")

n <- length(nombres)
r <- 2 # ¿cómo agrupar?

Pn <- factorial(n) / factorial(n-r)

paste("Existen ", Pn , " posibles permutaciones del total de ", n , " nombres ", " en grupos de ", r ," en ", r)
## [1] "Existen  132  posibles permutaciones del total de  12  nombres   en grupos de  2  en  2"

3.1.2 * Las Permutaciones Posibles De Nombres

Se utiliza la función permutation() y se requiere por lo menos tres atributos:

  • La cantidad de elementos n

  • Los grupos de cuanto en cuanto se forman r

  • y los elementos, o sea en este caso el vector v

Se muestran las posibles permutaciones de los nombres de personas. Las función permutations() ordena los valores alfabéticamente y luego construye las combinaciones.

nombres
##  [1] "Oscar"    "Paco"     "Paty"     "Laura"    "Rubén"    "Luis"    
##  [7] "Lucy"     "Alberto"  "Juan"     "Stephany" "Andrea"   "Hanny"
Cn.nombres <- permutations(n = length(nombres), r = 2, v = nombres)
Cn.nombres
##        [,1]       [,2]      
##   [1,] "Alberto"  "Andrea"  
##   [2,] "Alberto"  "Hanny"   
##   [3,] "Alberto"  "Juan"    
##   [4,] "Alberto"  "Laura"   
##   [5,] "Alberto"  "Lucy"    
##   [6,] "Alberto"  "Luis"    
##   [7,] "Alberto"  "Oscar"   
##   [8,] "Alberto"  "Paco"    
##   [9,] "Alberto"  "Paty"    
##  [10,] "Alberto"  "Rubén"   
##  [11,] "Alberto"  "Stephany"
##  [12,] "Andrea"   "Alberto" 
##  [13,] "Andrea"   "Hanny"   
##  [14,] "Andrea"   "Juan"    
##  [15,] "Andrea"   "Laura"   
##  [16,] "Andrea"   "Lucy"    
##  [17,] "Andrea"   "Luis"    
##  [18,] "Andrea"   "Oscar"   
##  [19,] "Andrea"   "Paco"    
##  [20,] "Andrea"   "Paty"    
##  [21,] "Andrea"   "Rubén"   
##  [22,] "Andrea"   "Stephany"
##  [23,] "Hanny"    "Alberto" 
##  [24,] "Hanny"    "Andrea"  
##  [25,] "Hanny"    "Juan"    
##  [26,] "Hanny"    "Laura"   
##  [27,] "Hanny"    "Lucy"    
##  [28,] "Hanny"    "Luis"    
##  [29,] "Hanny"    "Oscar"   
##  [30,] "Hanny"    "Paco"    
##  [31,] "Hanny"    "Paty"    
##  [32,] "Hanny"    "Rubén"   
##  [33,] "Hanny"    "Stephany"
##  [34,] "Juan"     "Alberto" 
##  [35,] "Juan"     "Andrea"  
##  [36,] "Juan"     "Hanny"   
##  [37,] "Juan"     "Laura"   
##  [38,] "Juan"     "Lucy"    
##  [39,] "Juan"     "Luis"    
##  [40,] "Juan"     "Oscar"   
##  [41,] "Juan"     "Paco"    
##  [42,] "Juan"     "Paty"    
##  [43,] "Juan"     "Rubén"   
##  [44,] "Juan"     "Stephany"
##  [45,] "Laura"    "Alberto" 
##  [46,] "Laura"    "Andrea"  
##  [47,] "Laura"    "Hanny"   
##  [48,] "Laura"    "Juan"    
##  [49,] "Laura"    "Lucy"    
##  [50,] "Laura"    "Luis"    
##  [51,] "Laura"    "Oscar"   
##  [52,] "Laura"    "Paco"    
##  [53,] "Laura"    "Paty"    
##  [54,] "Laura"    "Rubén"   
##  [55,] "Laura"    "Stephany"
##  [56,] "Lucy"     "Alberto" 
##  [57,] "Lucy"     "Andrea"  
##  [58,] "Lucy"     "Hanny"   
##  [59,] "Lucy"     "Juan"    
##  [60,] "Lucy"     "Laura"   
##  [61,] "Lucy"     "Luis"    
##  [62,] "Lucy"     "Oscar"   
##  [63,] "Lucy"     "Paco"    
##  [64,] "Lucy"     "Paty"    
##  [65,] "Lucy"     "Rubén"   
##  [66,] "Lucy"     "Stephany"
##  [67,] "Luis"     "Alberto" 
##  [68,] "Luis"     "Andrea"  
##  [69,] "Luis"     "Hanny"   
##  [70,] "Luis"     "Juan"    
##  [71,] "Luis"     "Laura"   
##  [72,] "Luis"     "Lucy"    
##  [73,] "Luis"     "Oscar"   
##  [74,] "Luis"     "Paco"    
##  [75,] "Luis"     "Paty"    
##  [76,] "Luis"     "Rubén"   
##  [77,] "Luis"     "Stephany"
##  [78,] "Oscar"    "Alberto" 
##  [79,] "Oscar"    "Andrea"  
##  [80,] "Oscar"    "Hanny"   
##  [81,] "Oscar"    "Juan"    
##  [82,] "Oscar"    "Laura"   
##  [83,] "Oscar"    "Lucy"    
##  [84,] "Oscar"    "Luis"    
##  [85,] "Oscar"    "Paco"    
##  [86,] "Oscar"    "Paty"    
##  [87,] "Oscar"    "Rubén"   
##  [88,] "Oscar"    "Stephany"
##  [89,] "Paco"     "Alberto" 
##  [90,] "Paco"     "Andrea"  
##  [91,] "Paco"     "Hanny"   
##  [92,] "Paco"     "Juan"    
##  [93,] "Paco"     "Laura"   
##  [94,] "Paco"     "Lucy"    
##  [95,] "Paco"     "Luis"    
##  [96,] "Paco"     "Oscar"   
##  [97,] "Paco"     "Paty"    
##  [98,] "Paco"     "Rubén"   
##  [99,] "Paco"     "Stephany"
## [100,] "Paty"     "Alberto" 
## [101,] "Paty"     "Andrea"  
## [102,] "Paty"     "Hanny"   
## [103,] "Paty"     "Juan"    
## [104,] "Paty"     "Laura"   
## [105,] "Paty"     "Lucy"    
## [106,] "Paty"     "Luis"    
## [107,] "Paty"     "Oscar"   
## [108,] "Paty"     "Paco"    
## [109,] "Paty"     "Rubén"   
## [110,] "Paty"     "Stephany"
## [111,] "Rubén"    "Alberto" 
## [112,] "Rubén"    "Andrea"  
## [113,] "Rubén"    "Hanny"   
## [114,] "Rubén"    "Juan"    
## [115,] "Rubén"    "Laura"   
## [116,] "Rubén"    "Lucy"    
## [117,] "Rubén"    "Luis"    
## [118,] "Rubén"    "Oscar"   
## [119,] "Rubén"    "Paco"    
## [120,] "Rubén"    "Paty"    
## [121,] "Rubén"    "Stephany"
## [122,] "Stephany" "Alberto" 
## [123,] "Stephany" "Andrea"  
## [124,] "Stephany" "Hanny"   
## [125,] "Stephany" "Juan"    
## [126,] "Stephany" "Laura"   
## [127,] "Stephany" "Lucy"    
## [128,] "Stephany" "Luis"    
## [129,] "Stephany" "Oscar"   
## [130,] "Stephany" "Paco"    
## [131,] "Stephany" "Paty"    
## [132,] "Stephany" "Rubén"

3.2 * Actividad No. 2 - Nombre Empresas

3.2.1 * Determinar El Número De Permutaciones Posibles De Empresas

Se trata de hacer combinaciones con los nombres de 10 empresas reconocidas a nivel mundial: “Bimbo”, “Sears”, “Movistar”, “Telcel”, “Televisa”, “Telmex” en grupos de 3. Entonces \(n=9\), porque hay seis equipos o elementos y \(r=5\) porque se trata de agrupar de tres en tres.

¿Cuántas combinaciones deberá haber?

empresas <- c("Televisa", "Bimbo", "Carso", "Telcel", "Arca Continental", "Telmex", "Liverpool", "Walmart", "Sears", "Movistar")

n <- length(empresas)
r <- 3 # ¿cómo agrupar?

Cn <- factorial(n) / factorial(n-r)

paste("Existen ", Cn , " posibles permutaciones del total de ", n , " empresas ", " en grupos de ", r ," en ", r)
## [1] "Existen  720  posibles permutaciones del total de  10  empresas   en grupos de  3  en  3"

3.2.2 * Las Permutaciones Posibles De Empresas

Se utiliza la función permutation() y se requiere por lo menos tres atributos:

  • La cantidad de elementos n

  • Los grupos de cuanto en cuanto se forman r

  • y los elementos, o sea en este caso el vector v

Se muestran las posibles permutaciones de los nombres de personas. Las función permutations() ordena los valores alfabéticamente y luego construye las combinaciones.

empresas
##  [1] "Televisa"         "Bimbo"            "Carso"            "Telcel"          
##  [5] "Arca Continental" "Telmex"           "Liverpool"        "Walmart"         
##  [9] "Sears"            "Movistar"
Cn.empresas <- permutations(n = length(empresas), r, v = empresas)
Cn.empresas
##        [,1]               [,2]               [,3]              
##   [1,] "Arca Continental" "Bimbo"            "Carso"           
##   [2,] "Arca Continental" "Bimbo"            "Liverpool"       
##   [3,] "Arca Continental" "Bimbo"            "Movistar"        
##   [4,] "Arca Continental" "Bimbo"            "Sears"           
##   [5,] "Arca Continental" "Bimbo"            "Telcel"          
##   [6,] "Arca Continental" "Bimbo"            "Televisa"        
##   [7,] "Arca Continental" "Bimbo"            "Telmex"          
##   [8,] "Arca Continental" "Bimbo"            "Walmart"         
##   [9,] "Arca Continental" "Carso"            "Bimbo"           
##  [10,] "Arca Continental" "Carso"            "Liverpool"       
##  [11,] "Arca Continental" "Carso"            "Movistar"        
##  [12,] "Arca Continental" "Carso"            "Sears"           
##  [13,] "Arca Continental" "Carso"            "Telcel"          
##  [14,] "Arca Continental" "Carso"            "Televisa"        
##  [15,] "Arca Continental" "Carso"            "Telmex"          
##  [16,] "Arca Continental" "Carso"            "Walmart"         
##  [17,] "Arca Continental" "Liverpool"        "Bimbo"           
##  [18,] "Arca Continental" "Liverpool"        "Carso"           
##  [19,] "Arca Continental" "Liverpool"        "Movistar"        
##  [20,] "Arca Continental" "Liverpool"        "Sears"           
##  [21,] "Arca Continental" "Liverpool"        "Telcel"          
##  [22,] "Arca Continental" "Liverpool"        "Televisa"        
##  [23,] "Arca Continental" "Liverpool"        "Telmex"          
##  [24,] "Arca Continental" "Liverpool"        "Walmart"         
##  [25,] "Arca Continental" "Movistar"         "Bimbo"           
##  [26,] "Arca Continental" "Movistar"         "Carso"           
##  [27,] "Arca Continental" "Movistar"         "Liverpool"       
##  [28,] "Arca Continental" "Movistar"         "Sears"           
##  [29,] "Arca Continental" "Movistar"         "Telcel"          
##  [30,] "Arca Continental" "Movistar"         "Televisa"        
##  [31,] "Arca Continental" "Movistar"         "Telmex"          
##  [32,] "Arca Continental" "Movistar"         "Walmart"         
##  [33,] "Arca Continental" "Sears"            "Bimbo"           
##  [34,] "Arca Continental" "Sears"            "Carso"           
##  [35,] "Arca Continental" "Sears"            "Liverpool"       
##  [36,] "Arca Continental" "Sears"            "Movistar"        
##  [37,] "Arca Continental" "Sears"            "Telcel"          
##  [38,] "Arca Continental" "Sears"            "Televisa"        
##  [39,] "Arca Continental" "Sears"            "Telmex"          
##  [40,] "Arca Continental" "Sears"            "Walmart"         
##  [41,] "Arca Continental" "Telcel"           "Bimbo"           
##  [42,] "Arca Continental" "Telcel"           "Carso"           
##  [43,] "Arca Continental" "Telcel"           "Liverpool"       
##  [44,] "Arca Continental" "Telcel"           "Movistar"        
##  [45,] "Arca Continental" "Telcel"           "Sears"           
##  [46,] "Arca Continental" "Telcel"           "Televisa"        
##  [47,] "Arca Continental" "Telcel"           "Telmex"          
##  [48,] "Arca Continental" "Telcel"           "Walmart"         
##  [49,] "Arca Continental" "Televisa"         "Bimbo"           
##  [50,] "Arca Continental" "Televisa"         "Carso"           
##  [51,] "Arca Continental" "Televisa"         "Liverpool"       
##  [52,] "Arca Continental" "Televisa"         "Movistar"        
##  [53,] "Arca Continental" "Televisa"         "Sears"           
##  [54,] "Arca Continental" "Televisa"         "Telcel"          
##  [55,] "Arca Continental" "Televisa"         "Telmex"          
##  [56,] "Arca Continental" "Televisa"         "Walmart"         
##  [57,] "Arca Continental" "Telmex"           "Bimbo"           
##  [58,] "Arca Continental" "Telmex"           "Carso"           
##  [59,] "Arca Continental" "Telmex"           "Liverpool"       
##  [60,] "Arca Continental" "Telmex"           "Movistar"        
##  [61,] "Arca Continental" "Telmex"           "Sears"           
##  [62,] "Arca Continental" "Telmex"           "Telcel"          
##  [63,] "Arca Continental" "Telmex"           "Televisa"        
##  [64,] "Arca Continental" "Telmex"           "Walmart"         
##  [65,] "Arca Continental" "Walmart"          "Bimbo"           
##  [66,] "Arca Continental" "Walmart"          "Carso"           
##  [67,] "Arca Continental" "Walmart"          "Liverpool"       
##  [68,] "Arca Continental" "Walmart"          "Movistar"        
##  [69,] "Arca Continental" "Walmart"          "Sears"           
##  [70,] "Arca Continental" "Walmart"          "Telcel"          
##  [71,] "Arca Continental" "Walmart"          "Televisa"        
##  [72,] "Arca Continental" "Walmart"          "Telmex"          
##  [73,] "Bimbo"            "Arca Continental" "Carso"           
##  [74,] "Bimbo"            "Arca Continental" "Liverpool"       
##  [75,] "Bimbo"            "Arca Continental" "Movistar"        
##  [76,] "Bimbo"            "Arca Continental" "Sears"           
##  [77,] "Bimbo"            "Arca Continental" "Telcel"          
##  [78,] "Bimbo"            "Arca Continental" "Televisa"        
##  [79,] "Bimbo"            "Arca Continental" "Telmex"          
##  [80,] "Bimbo"            "Arca Continental" "Walmart"         
##  [81,] "Bimbo"            "Carso"            "Arca Continental"
##  [82,] "Bimbo"            "Carso"            "Liverpool"       
##  [83,] "Bimbo"            "Carso"            "Movistar"        
##  [84,] "Bimbo"            "Carso"            "Sears"           
##  [85,] "Bimbo"            "Carso"            "Telcel"          
##  [86,] "Bimbo"            "Carso"            "Televisa"        
##  [87,] "Bimbo"            "Carso"            "Telmex"          
##  [88,] "Bimbo"            "Carso"            "Walmart"         
##  [89,] "Bimbo"            "Liverpool"        "Arca Continental"
##  [90,] "Bimbo"            "Liverpool"        "Carso"           
##  [91,] "Bimbo"            "Liverpool"        "Movistar"        
##  [92,] "Bimbo"            "Liverpool"        "Sears"           
##  [93,] "Bimbo"            "Liverpool"        "Telcel"          
##  [94,] "Bimbo"            "Liverpool"        "Televisa"        
##  [95,] "Bimbo"            "Liverpool"        "Telmex"          
##  [96,] "Bimbo"            "Liverpool"        "Walmart"         
##  [97,] "Bimbo"            "Movistar"         "Arca Continental"
##  [98,] "Bimbo"            "Movistar"         "Carso"           
##  [99,] "Bimbo"            "Movistar"         "Liverpool"       
## [100,] "Bimbo"            "Movistar"         "Sears"           
## [101,] "Bimbo"            "Movistar"         "Telcel"          
## [102,] "Bimbo"            "Movistar"         "Televisa"        
## [103,] "Bimbo"            "Movistar"         "Telmex"          
## [104,] "Bimbo"            "Movistar"         "Walmart"         
## [105,] "Bimbo"            "Sears"            "Arca Continental"
## [106,] "Bimbo"            "Sears"            "Carso"           
## [107,] "Bimbo"            "Sears"            "Liverpool"       
## [108,] "Bimbo"            "Sears"            "Movistar"        
## [109,] "Bimbo"            "Sears"            "Telcel"          
## [110,] "Bimbo"            "Sears"            "Televisa"        
## [111,] "Bimbo"            "Sears"            "Telmex"          
## [112,] "Bimbo"            "Sears"            "Walmart"         
## [113,] "Bimbo"            "Telcel"           "Arca Continental"
## [114,] "Bimbo"            "Telcel"           "Carso"           
## [115,] "Bimbo"            "Telcel"           "Liverpool"       
## [116,] "Bimbo"            "Telcel"           "Movistar"        
## [117,] "Bimbo"            "Telcel"           "Sears"           
## [118,] "Bimbo"            "Telcel"           "Televisa"        
## [119,] "Bimbo"            "Telcel"           "Telmex"          
## [120,] "Bimbo"            "Telcel"           "Walmart"         
## [121,] "Bimbo"            "Televisa"         "Arca Continental"
## [122,] "Bimbo"            "Televisa"         "Carso"           
## [123,] "Bimbo"            "Televisa"         "Liverpool"       
## [124,] "Bimbo"            "Televisa"         "Movistar"        
## [125,] "Bimbo"            "Televisa"         "Sears"           
## [126,] "Bimbo"            "Televisa"         "Telcel"          
## [127,] "Bimbo"            "Televisa"         "Telmex"          
## [128,] "Bimbo"            "Televisa"         "Walmart"         
## [129,] "Bimbo"            "Telmex"           "Arca Continental"
## [130,] "Bimbo"            "Telmex"           "Carso"           
## [131,] "Bimbo"            "Telmex"           "Liverpool"       
## [132,] "Bimbo"            "Telmex"           "Movistar"        
## [133,] "Bimbo"            "Telmex"           "Sears"           
## [134,] "Bimbo"            "Telmex"           "Telcel"          
## [135,] "Bimbo"            "Telmex"           "Televisa"        
## [136,] "Bimbo"            "Telmex"           "Walmart"         
## [137,] "Bimbo"            "Walmart"          "Arca Continental"
## [138,] "Bimbo"            "Walmart"          "Carso"           
## [139,] "Bimbo"            "Walmart"          "Liverpool"       
## [140,] "Bimbo"            "Walmart"          "Movistar"        
## [141,] "Bimbo"            "Walmart"          "Sears"           
## [142,] "Bimbo"            "Walmart"          "Telcel"          
## [143,] "Bimbo"            "Walmart"          "Televisa"        
## [144,] "Bimbo"            "Walmart"          "Telmex"          
## [145,] "Carso"            "Arca Continental" "Bimbo"           
## [146,] "Carso"            "Arca Continental" "Liverpool"       
## [147,] "Carso"            "Arca Continental" "Movistar"        
## [148,] "Carso"            "Arca Continental" "Sears"           
## [149,] "Carso"            "Arca Continental" "Telcel"          
## [150,] "Carso"            "Arca Continental" "Televisa"        
## [151,] "Carso"            "Arca Continental" "Telmex"          
## [152,] "Carso"            "Arca Continental" "Walmart"         
## [153,] "Carso"            "Bimbo"            "Arca Continental"
## [154,] "Carso"            "Bimbo"            "Liverpool"       
## [155,] "Carso"            "Bimbo"            "Movistar"        
## [156,] "Carso"            "Bimbo"            "Sears"           
## [157,] "Carso"            "Bimbo"            "Telcel"          
## [158,] "Carso"            "Bimbo"            "Televisa"        
## [159,] "Carso"            "Bimbo"            "Telmex"          
## [160,] "Carso"            "Bimbo"            "Walmart"         
## [161,] "Carso"            "Liverpool"        "Arca Continental"
## [162,] "Carso"            "Liverpool"        "Bimbo"           
## [163,] "Carso"            "Liverpool"        "Movistar"        
## [164,] "Carso"            "Liverpool"        "Sears"           
## [165,] "Carso"            "Liverpool"        "Telcel"          
## [166,] "Carso"            "Liverpool"        "Televisa"        
## [167,] "Carso"            "Liverpool"        "Telmex"          
## [168,] "Carso"            "Liverpool"        "Walmart"         
## [169,] "Carso"            "Movistar"         "Arca Continental"
## [170,] "Carso"            "Movistar"         "Bimbo"           
## [171,] "Carso"            "Movistar"         "Liverpool"       
## [172,] "Carso"            "Movistar"         "Sears"           
## [173,] "Carso"            "Movistar"         "Telcel"          
## [174,] "Carso"            "Movistar"         "Televisa"        
## [175,] "Carso"            "Movistar"         "Telmex"          
## [176,] "Carso"            "Movistar"         "Walmart"         
## [177,] "Carso"            "Sears"            "Arca Continental"
## [178,] "Carso"            "Sears"            "Bimbo"           
## [179,] "Carso"            "Sears"            "Liverpool"       
## [180,] "Carso"            "Sears"            "Movistar"        
## [181,] "Carso"            "Sears"            "Telcel"          
## [182,] "Carso"            "Sears"            "Televisa"        
## [183,] "Carso"            "Sears"            "Telmex"          
## [184,] "Carso"            "Sears"            "Walmart"         
## [185,] "Carso"            "Telcel"           "Arca Continental"
## [186,] "Carso"            "Telcel"           "Bimbo"           
## [187,] "Carso"            "Telcel"           "Liverpool"       
## [188,] "Carso"            "Telcel"           "Movistar"        
## [189,] "Carso"            "Telcel"           "Sears"           
## [190,] "Carso"            "Telcel"           "Televisa"        
## [191,] "Carso"            "Telcel"           "Telmex"          
## [192,] "Carso"            "Telcel"           "Walmart"         
## [193,] "Carso"            "Televisa"         "Arca Continental"
## [194,] "Carso"            "Televisa"         "Bimbo"           
## [195,] "Carso"            "Televisa"         "Liverpool"       
## [196,] "Carso"            "Televisa"         "Movistar"        
## [197,] "Carso"            "Televisa"         "Sears"           
## [198,] "Carso"            "Televisa"         "Telcel"          
## [199,] "Carso"            "Televisa"         "Telmex"          
## [200,] "Carso"            "Televisa"         "Walmart"         
## [201,] "Carso"            "Telmex"           "Arca Continental"
## [202,] "Carso"            "Telmex"           "Bimbo"           
## [203,] "Carso"            "Telmex"           "Liverpool"       
## [204,] "Carso"            "Telmex"           "Movistar"        
## [205,] "Carso"            "Telmex"           "Sears"           
## [206,] "Carso"            "Telmex"           "Telcel"          
## [207,] "Carso"            "Telmex"           "Televisa"        
## [208,] "Carso"            "Telmex"           "Walmart"         
## [209,] "Carso"            "Walmart"          "Arca Continental"
## [210,] "Carso"            "Walmart"          "Bimbo"           
## [211,] "Carso"            "Walmart"          "Liverpool"       
## [212,] "Carso"            "Walmart"          "Movistar"        
## [213,] "Carso"            "Walmart"          "Sears"           
## [214,] "Carso"            "Walmart"          "Telcel"          
## [215,] "Carso"            "Walmart"          "Televisa"        
## [216,] "Carso"            "Walmart"          "Telmex"          
## [217,] "Liverpool"        "Arca Continental" "Bimbo"           
## [218,] "Liverpool"        "Arca Continental" "Carso"           
## [219,] "Liverpool"        "Arca Continental" "Movistar"        
## [220,] "Liverpool"        "Arca Continental" "Sears"           
## [221,] "Liverpool"        "Arca Continental" "Telcel"          
## [222,] "Liverpool"        "Arca Continental" "Televisa"        
## [223,] "Liverpool"        "Arca Continental" "Telmex"          
## [224,] "Liverpool"        "Arca Continental" "Walmart"         
## [225,] "Liverpool"        "Bimbo"            "Arca Continental"
## [226,] "Liverpool"        "Bimbo"            "Carso"           
## [227,] "Liverpool"        "Bimbo"            "Movistar"        
## [228,] "Liverpool"        "Bimbo"            "Sears"           
## [229,] "Liverpool"        "Bimbo"            "Telcel"          
## [230,] "Liverpool"        "Bimbo"            "Televisa"        
## [231,] "Liverpool"        "Bimbo"            "Telmex"          
## [232,] "Liverpool"        "Bimbo"            "Walmart"         
## [233,] "Liverpool"        "Carso"            "Arca Continental"
## [234,] "Liverpool"        "Carso"            "Bimbo"           
## [235,] "Liverpool"        "Carso"            "Movistar"        
## [236,] "Liverpool"        "Carso"            "Sears"           
## [237,] "Liverpool"        "Carso"            "Telcel"          
## [238,] "Liverpool"        "Carso"            "Televisa"        
## [239,] "Liverpool"        "Carso"            "Telmex"          
## [240,] "Liverpool"        "Carso"            "Walmart"         
## [241,] "Liverpool"        "Movistar"         "Arca Continental"
## [242,] "Liverpool"        "Movistar"         "Bimbo"           
## [243,] "Liverpool"        "Movistar"         "Carso"           
## [244,] "Liverpool"        "Movistar"         "Sears"           
## [245,] "Liverpool"        "Movistar"         "Telcel"          
## [246,] "Liverpool"        "Movistar"         "Televisa"        
## [247,] "Liverpool"        "Movistar"         "Telmex"          
## [248,] "Liverpool"        "Movistar"         "Walmart"         
## [249,] "Liverpool"        "Sears"            "Arca Continental"
## [250,] "Liverpool"        "Sears"            "Bimbo"           
## [251,] "Liverpool"        "Sears"            "Carso"           
## [252,] "Liverpool"        "Sears"            "Movistar"        
## [253,] "Liverpool"        "Sears"            "Telcel"          
## [254,] "Liverpool"        "Sears"            "Televisa"        
## [255,] "Liverpool"        "Sears"            "Telmex"          
## [256,] "Liverpool"        "Sears"            "Walmart"         
## [257,] "Liverpool"        "Telcel"           "Arca Continental"
## [258,] "Liverpool"        "Telcel"           "Bimbo"           
## [259,] "Liverpool"        "Telcel"           "Carso"           
## [260,] "Liverpool"        "Telcel"           "Movistar"        
## [261,] "Liverpool"        "Telcel"           "Sears"           
## [262,] "Liverpool"        "Telcel"           "Televisa"        
## [263,] "Liverpool"        "Telcel"           "Telmex"          
## [264,] "Liverpool"        "Telcel"           "Walmart"         
## [265,] "Liverpool"        "Televisa"         "Arca Continental"
## [266,] "Liverpool"        "Televisa"         "Bimbo"           
## [267,] "Liverpool"        "Televisa"         "Carso"           
## [268,] "Liverpool"        "Televisa"         "Movistar"        
## [269,] "Liverpool"        "Televisa"         "Sears"           
## [270,] "Liverpool"        "Televisa"         "Telcel"          
## [271,] "Liverpool"        "Televisa"         "Telmex"          
## [272,] "Liverpool"        "Televisa"         "Walmart"         
## [273,] "Liverpool"        "Telmex"           "Arca Continental"
## [274,] "Liverpool"        "Telmex"           "Bimbo"           
## [275,] "Liverpool"        "Telmex"           "Carso"           
## [276,] "Liverpool"        "Telmex"           "Movistar"        
## [277,] "Liverpool"        "Telmex"           "Sears"           
## [278,] "Liverpool"        "Telmex"           "Telcel"          
## [279,] "Liverpool"        "Telmex"           "Televisa"        
## [280,] "Liverpool"        "Telmex"           "Walmart"         
## [281,] "Liverpool"        "Walmart"          "Arca Continental"
## [282,] "Liverpool"        "Walmart"          "Bimbo"           
## [283,] "Liverpool"        "Walmart"          "Carso"           
## [284,] "Liverpool"        "Walmart"          "Movistar"        
## [285,] "Liverpool"        "Walmart"          "Sears"           
## [286,] "Liverpool"        "Walmart"          "Telcel"          
## [287,] "Liverpool"        "Walmart"          "Televisa"        
## [288,] "Liverpool"        "Walmart"          "Telmex"          
## [289,] "Movistar"         "Arca Continental" "Bimbo"           
## [290,] "Movistar"         "Arca Continental" "Carso"           
## [291,] "Movistar"         "Arca Continental" "Liverpool"       
## [292,] "Movistar"         "Arca Continental" "Sears"           
## [293,] "Movistar"         "Arca Continental" "Telcel"          
## [294,] "Movistar"         "Arca Continental" "Televisa"        
## [295,] "Movistar"         "Arca Continental" "Telmex"          
## [296,] "Movistar"         "Arca Continental" "Walmart"         
## [297,] "Movistar"         "Bimbo"            "Arca Continental"
## [298,] "Movistar"         "Bimbo"            "Carso"           
## [299,] "Movistar"         "Bimbo"            "Liverpool"       
## [300,] "Movistar"         "Bimbo"            "Sears"           
## [301,] "Movistar"         "Bimbo"            "Telcel"          
## [302,] "Movistar"         "Bimbo"            "Televisa"        
## [303,] "Movistar"         "Bimbo"            "Telmex"          
## [304,] "Movistar"         "Bimbo"            "Walmart"         
## [305,] "Movistar"         "Carso"            "Arca Continental"
## [306,] "Movistar"         "Carso"            "Bimbo"           
## [307,] "Movistar"         "Carso"            "Liverpool"       
## [308,] "Movistar"         "Carso"            "Sears"           
## [309,] "Movistar"         "Carso"            "Telcel"          
## [310,] "Movistar"         "Carso"            "Televisa"        
## [311,] "Movistar"         "Carso"            "Telmex"          
## [312,] "Movistar"         "Carso"            "Walmart"         
## [313,] "Movistar"         "Liverpool"        "Arca Continental"
## [314,] "Movistar"         "Liverpool"        "Bimbo"           
## [315,] "Movistar"         "Liverpool"        "Carso"           
## [316,] "Movistar"         "Liverpool"        "Sears"           
## [317,] "Movistar"         "Liverpool"        "Telcel"          
## [318,] "Movistar"         "Liverpool"        "Televisa"        
## [319,] "Movistar"         "Liverpool"        "Telmex"          
## [320,] "Movistar"         "Liverpool"        "Walmart"         
## [321,] "Movistar"         "Sears"            "Arca Continental"
## [322,] "Movistar"         "Sears"            "Bimbo"           
## [323,] "Movistar"         "Sears"            "Carso"           
## [324,] "Movistar"         "Sears"            "Liverpool"       
## [325,] "Movistar"         "Sears"            "Telcel"          
## [326,] "Movistar"         "Sears"            "Televisa"        
## [327,] "Movistar"         "Sears"            "Telmex"          
## [328,] "Movistar"         "Sears"            "Walmart"         
## [329,] "Movistar"         "Telcel"           "Arca Continental"
## [330,] "Movistar"         "Telcel"           "Bimbo"           
## [331,] "Movistar"         "Telcel"           "Carso"           
## [332,] "Movistar"         "Telcel"           "Liverpool"       
## [333,] "Movistar"         "Telcel"           "Sears"           
## [334,] "Movistar"         "Telcel"           "Televisa"        
## [335,] "Movistar"         "Telcel"           "Telmex"          
## [336,] "Movistar"         "Telcel"           "Walmart"         
## [337,] "Movistar"         "Televisa"         "Arca Continental"
## [338,] "Movistar"         "Televisa"         "Bimbo"           
## [339,] "Movistar"         "Televisa"         "Carso"           
## [340,] "Movistar"         "Televisa"         "Liverpool"       
## [341,] "Movistar"         "Televisa"         "Sears"           
## [342,] "Movistar"         "Televisa"         "Telcel"          
## [343,] "Movistar"         "Televisa"         "Telmex"          
## [344,] "Movistar"         "Televisa"         "Walmart"         
## [345,] "Movistar"         "Telmex"           "Arca Continental"
## [346,] "Movistar"         "Telmex"           "Bimbo"           
## [347,] "Movistar"         "Telmex"           "Carso"           
## [348,] "Movistar"         "Telmex"           "Liverpool"       
## [349,] "Movistar"         "Telmex"           "Sears"           
## [350,] "Movistar"         "Telmex"           "Telcel"          
## [351,] "Movistar"         "Telmex"           "Televisa"        
## [352,] "Movistar"         "Telmex"           "Walmart"         
## [353,] "Movistar"         "Walmart"          "Arca Continental"
## [354,] "Movistar"         "Walmart"          "Bimbo"           
## [355,] "Movistar"         "Walmart"          "Carso"           
## [356,] "Movistar"         "Walmart"          "Liverpool"       
## [357,] "Movistar"         "Walmart"          "Sears"           
## [358,] "Movistar"         "Walmart"          "Telcel"          
## [359,] "Movistar"         "Walmart"          "Televisa"        
## [360,] "Movistar"         "Walmart"          "Telmex"          
## [361,] "Sears"            "Arca Continental" "Bimbo"           
## [362,] "Sears"            "Arca Continental" "Carso"           
## [363,] "Sears"            "Arca Continental" "Liverpool"       
## [364,] "Sears"            "Arca Continental" "Movistar"        
## [365,] "Sears"            "Arca Continental" "Telcel"          
## [366,] "Sears"            "Arca Continental" "Televisa"        
## [367,] "Sears"            "Arca Continental" "Telmex"          
## [368,] "Sears"            "Arca Continental" "Walmart"         
## [369,] "Sears"            "Bimbo"            "Arca Continental"
## [370,] "Sears"            "Bimbo"            "Carso"           
## [371,] "Sears"            "Bimbo"            "Liverpool"       
## [372,] "Sears"            "Bimbo"            "Movistar"        
## [373,] "Sears"            "Bimbo"            "Telcel"          
## [374,] "Sears"            "Bimbo"            "Televisa"        
## [375,] "Sears"            "Bimbo"            "Telmex"          
## [376,] "Sears"            "Bimbo"            "Walmart"         
## [377,] "Sears"            "Carso"            "Arca Continental"
## [378,] "Sears"            "Carso"            "Bimbo"           
## [379,] "Sears"            "Carso"            "Liverpool"       
## [380,] "Sears"            "Carso"            "Movistar"        
## [381,] "Sears"            "Carso"            "Telcel"          
## [382,] "Sears"            "Carso"            "Televisa"        
## [383,] "Sears"            "Carso"            "Telmex"          
## [384,] "Sears"            "Carso"            "Walmart"         
## [385,] "Sears"            "Liverpool"        "Arca Continental"
## [386,] "Sears"            "Liverpool"        "Bimbo"           
## [387,] "Sears"            "Liverpool"        "Carso"           
## [388,] "Sears"            "Liverpool"        "Movistar"        
## [389,] "Sears"            "Liverpool"        "Telcel"          
## [390,] "Sears"            "Liverpool"        "Televisa"        
## [391,] "Sears"            "Liverpool"        "Telmex"          
## [392,] "Sears"            "Liverpool"        "Walmart"         
## [393,] "Sears"            "Movistar"         "Arca Continental"
## [394,] "Sears"            "Movistar"         "Bimbo"           
## [395,] "Sears"            "Movistar"         "Carso"           
## [396,] "Sears"            "Movistar"         "Liverpool"       
## [397,] "Sears"            "Movistar"         "Telcel"          
## [398,] "Sears"            "Movistar"         "Televisa"        
## [399,] "Sears"            "Movistar"         "Telmex"          
## [400,] "Sears"            "Movistar"         "Walmart"         
## [401,] "Sears"            "Telcel"           "Arca Continental"
## [402,] "Sears"            "Telcel"           "Bimbo"           
## [403,] "Sears"            "Telcel"           "Carso"           
## [404,] "Sears"            "Telcel"           "Liverpool"       
## [405,] "Sears"            "Telcel"           "Movistar"        
## [406,] "Sears"            "Telcel"           "Televisa"        
## [407,] "Sears"            "Telcel"           "Telmex"          
## [408,] "Sears"            "Telcel"           "Walmart"         
## [409,] "Sears"            "Televisa"         "Arca Continental"
## [410,] "Sears"            "Televisa"         "Bimbo"           
## [411,] "Sears"            "Televisa"         "Carso"           
## [412,] "Sears"            "Televisa"         "Liverpool"       
## [413,] "Sears"            "Televisa"         "Movistar"        
## [414,] "Sears"            "Televisa"         "Telcel"          
## [415,] "Sears"            "Televisa"         "Telmex"          
## [416,] "Sears"            "Televisa"         "Walmart"         
## [417,] "Sears"            "Telmex"           "Arca Continental"
## [418,] "Sears"            "Telmex"           "Bimbo"           
## [419,] "Sears"            "Telmex"           "Carso"           
## [420,] "Sears"            "Telmex"           "Liverpool"       
## [421,] "Sears"            "Telmex"           "Movistar"        
## [422,] "Sears"            "Telmex"           "Telcel"          
## [423,] "Sears"            "Telmex"           "Televisa"        
## [424,] "Sears"            "Telmex"           "Walmart"         
## [425,] "Sears"            "Walmart"          "Arca Continental"
## [426,] "Sears"            "Walmart"          "Bimbo"           
## [427,] "Sears"            "Walmart"          "Carso"           
## [428,] "Sears"            "Walmart"          "Liverpool"       
## [429,] "Sears"            "Walmart"          "Movistar"        
## [430,] "Sears"            "Walmart"          "Telcel"          
## [431,] "Sears"            "Walmart"          "Televisa"        
## [432,] "Sears"            "Walmart"          "Telmex"          
## [433,] "Telcel"           "Arca Continental" "Bimbo"           
## [434,] "Telcel"           "Arca Continental" "Carso"           
## [435,] "Telcel"           "Arca Continental" "Liverpool"       
## [436,] "Telcel"           "Arca Continental" "Movistar"        
## [437,] "Telcel"           "Arca Continental" "Sears"           
## [438,] "Telcel"           "Arca Continental" "Televisa"        
## [439,] "Telcel"           "Arca Continental" "Telmex"          
## [440,] "Telcel"           "Arca Continental" "Walmart"         
## [441,] "Telcel"           "Bimbo"            "Arca Continental"
## [442,] "Telcel"           "Bimbo"            "Carso"           
## [443,] "Telcel"           "Bimbo"            "Liverpool"       
## [444,] "Telcel"           "Bimbo"            "Movistar"        
## [445,] "Telcel"           "Bimbo"            "Sears"           
## [446,] "Telcel"           "Bimbo"            "Televisa"        
## [447,] "Telcel"           "Bimbo"            "Telmex"          
## [448,] "Telcel"           "Bimbo"            "Walmart"         
## [449,] "Telcel"           "Carso"            "Arca Continental"
## [450,] "Telcel"           "Carso"            "Bimbo"           
## [451,] "Telcel"           "Carso"            "Liverpool"       
## [452,] "Telcel"           "Carso"            "Movistar"        
## [453,] "Telcel"           "Carso"            "Sears"           
## [454,] "Telcel"           "Carso"            "Televisa"        
## [455,] "Telcel"           "Carso"            "Telmex"          
## [456,] "Telcel"           "Carso"            "Walmart"         
## [457,] "Telcel"           "Liverpool"        "Arca Continental"
## [458,] "Telcel"           "Liverpool"        "Bimbo"           
## [459,] "Telcel"           "Liverpool"        "Carso"           
## [460,] "Telcel"           "Liverpool"        "Movistar"        
## [461,] "Telcel"           "Liverpool"        "Sears"           
## [462,] "Telcel"           "Liverpool"        "Televisa"        
## [463,] "Telcel"           "Liverpool"        "Telmex"          
## [464,] "Telcel"           "Liverpool"        "Walmart"         
## [465,] "Telcel"           "Movistar"         "Arca Continental"
## [466,] "Telcel"           "Movistar"         "Bimbo"           
## [467,] "Telcel"           "Movistar"         "Carso"           
## [468,] "Telcel"           "Movistar"         "Liverpool"       
## [469,] "Telcel"           "Movistar"         "Sears"           
## [470,] "Telcel"           "Movistar"         "Televisa"        
## [471,] "Telcel"           "Movistar"         "Telmex"          
## [472,] "Telcel"           "Movistar"         "Walmart"         
## [473,] "Telcel"           "Sears"            "Arca Continental"
## [474,] "Telcel"           "Sears"            "Bimbo"           
## [475,] "Telcel"           "Sears"            "Carso"           
## [476,] "Telcel"           "Sears"            "Liverpool"       
## [477,] "Telcel"           "Sears"            "Movistar"        
## [478,] "Telcel"           "Sears"            "Televisa"        
## [479,] "Telcel"           "Sears"            "Telmex"          
## [480,] "Telcel"           "Sears"            "Walmart"         
## [481,] "Telcel"           "Televisa"         "Arca Continental"
## [482,] "Telcel"           "Televisa"         "Bimbo"           
## [483,] "Telcel"           "Televisa"         "Carso"           
## [484,] "Telcel"           "Televisa"         "Liverpool"       
## [485,] "Telcel"           "Televisa"         "Movistar"        
## [486,] "Telcel"           "Televisa"         "Sears"           
## [487,] "Telcel"           "Televisa"         "Telmex"          
## [488,] "Telcel"           "Televisa"         "Walmart"         
## [489,] "Telcel"           "Telmex"           "Arca Continental"
## [490,] "Telcel"           "Telmex"           "Bimbo"           
## [491,] "Telcel"           "Telmex"           "Carso"           
## [492,] "Telcel"           "Telmex"           "Liverpool"       
## [493,] "Telcel"           "Telmex"           "Movistar"        
## [494,] "Telcel"           "Telmex"           "Sears"           
## [495,] "Telcel"           "Telmex"           "Televisa"        
## [496,] "Telcel"           "Telmex"           "Walmart"         
## [497,] "Telcel"           "Walmart"          "Arca Continental"
## [498,] "Telcel"           "Walmart"          "Bimbo"           
## [499,] "Telcel"           "Walmart"          "Carso"           
## [500,] "Telcel"           "Walmart"          "Liverpool"       
## [501,] "Telcel"           "Walmart"          "Movistar"        
## [502,] "Telcel"           "Walmart"          "Sears"           
## [503,] "Telcel"           "Walmart"          "Televisa"        
## [504,] "Telcel"           "Walmart"          "Telmex"          
## [505,] "Televisa"         "Arca Continental" "Bimbo"           
## [506,] "Televisa"         "Arca Continental" "Carso"           
## [507,] "Televisa"         "Arca Continental" "Liverpool"       
## [508,] "Televisa"         "Arca Continental" "Movistar"        
## [509,] "Televisa"         "Arca Continental" "Sears"           
## [510,] "Televisa"         "Arca Continental" "Telcel"          
## [511,] "Televisa"         "Arca Continental" "Telmex"          
## [512,] "Televisa"         "Arca Continental" "Walmart"         
## [513,] "Televisa"         "Bimbo"            "Arca Continental"
## [514,] "Televisa"         "Bimbo"            "Carso"           
## [515,] "Televisa"         "Bimbo"            "Liverpool"       
## [516,] "Televisa"         "Bimbo"            "Movistar"        
## [517,] "Televisa"         "Bimbo"            "Sears"           
## [518,] "Televisa"         "Bimbo"            "Telcel"          
## [519,] "Televisa"         "Bimbo"            "Telmex"          
## [520,] "Televisa"         "Bimbo"            "Walmart"         
## [521,] "Televisa"         "Carso"            "Arca Continental"
## [522,] "Televisa"         "Carso"            "Bimbo"           
## [523,] "Televisa"         "Carso"            "Liverpool"       
## [524,] "Televisa"         "Carso"            "Movistar"        
## [525,] "Televisa"         "Carso"            "Sears"           
## [526,] "Televisa"         "Carso"            "Telcel"          
## [527,] "Televisa"         "Carso"            "Telmex"          
## [528,] "Televisa"         "Carso"            "Walmart"         
## [529,] "Televisa"         "Liverpool"        "Arca Continental"
## [530,] "Televisa"         "Liverpool"        "Bimbo"           
## [531,] "Televisa"         "Liverpool"        "Carso"           
## [532,] "Televisa"         "Liverpool"        "Movistar"        
## [533,] "Televisa"         "Liverpool"        "Sears"           
## [534,] "Televisa"         "Liverpool"        "Telcel"          
## [535,] "Televisa"         "Liverpool"        "Telmex"          
## [536,] "Televisa"         "Liverpool"        "Walmart"         
## [537,] "Televisa"         "Movistar"         "Arca Continental"
## [538,] "Televisa"         "Movistar"         "Bimbo"           
## [539,] "Televisa"         "Movistar"         "Carso"           
## [540,] "Televisa"         "Movistar"         "Liverpool"       
## [541,] "Televisa"         "Movistar"         "Sears"           
## [542,] "Televisa"         "Movistar"         "Telcel"          
## [543,] "Televisa"         "Movistar"         "Telmex"          
## [544,] "Televisa"         "Movistar"         "Walmart"         
## [545,] "Televisa"         "Sears"            "Arca Continental"
## [546,] "Televisa"         "Sears"            "Bimbo"           
## [547,] "Televisa"         "Sears"            "Carso"           
## [548,] "Televisa"         "Sears"            "Liverpool"       
## [549,] "Televisa"         "Sears"            "Movistar"        
## [550,] "Televisa"         "Sears"            "Telcel"          
## [551,] "Televisa"         "Sears"            "Telmex"          
## [552,] "Televisa"         "Sears"            "Walmart"         
## [553,] "Televisa"         "Telcel"           "Arca Continental"
## [554,] "Televisa"         "Telcel"           "Bimbo"           
## [555,] "Televisa"         "Telcel"           "Carso"           
## [556,] "Televisa"         "Telcel"           "Liverpool"       
## [557,] "Televisa"         "Telcel"           "Movistar"        
## [558,] "Televisa"         "Telcel"           "Sears"           
## [559,] "Televisa"         "Telcel"           "Telmex"          
## [560,] "Televisa"         "Telcel"           "Walmart"         
## [561,] "Televisa"         "Telmex"           "Arca Continental"
## [562,] "Televisa"         "Telmex"           "Bimbo"           
## [563,] "Televisa"         "Telmex"           "Carso"           
## [564,] "Televisa"         "Telmex"           "Liverpool"       
## [565,] "Televisa"         "Telmex"           "Movistar"        
## [566,] "Televisa"         "Telmex"           "Sears"           
## [567,] "Televisa"         "Telmex"           "Telcel"          
## [568,] "Televisa"         "Telmex"           "Walmart"         
## [569,] "Televisa"         "Walmart"          "Arca Continental"
## [570,] "Televisa"         "Walmart"          "Bimbo"           
## [571,] "Televisa"         "Walmart"          "Carso"           
## [572,] "Televisa"         "Walmart"          "Liverpool"       
## [573,] "Televisa"         "Walmart"          "Movistar"        
## [574,] "Televisa"         "Walmart"          "Sears"           
## [575,] "Televisa"         "Walmart"          "Telcel"          
## [576,] "Televisa"         "Walmart"          "Telmex"          
## [577,] "Telmex"           "Arca Continental" "Bimbo"           
## [578,] "Telmex"           "Arca Continental" "Carso"           
## [579,] "Telmex"           "Arca Continental" "Liverpool"       
## [580,] "Telmex"           "Arca Continental" "Movistar"        
## [581,] "Telmex"           "Arca Continental" "Sears"           
## [582,] "Telmex"           "Arca Continental" "Telcel"          
## [583,] "Telmex"           "Arca Continental" "Televisa"        
## [584,] "Telmex"           "Arca Continental" "Walmart"         
## [585,] "Telmex"           "Bimbo"            "Arca Continental"
## [586,] "Telmex"           "Bimbo"            "Carso"           
## [587,] "Telmex"           "Bimbo"            "Liverpool"       
## [588,] "Telmex"           "Bimbo"            "Movistar"        
## [589,] "Telmex"           "Bimbo"            "Sears"           
## [590,] "Telmex"           "Bimbo"            "Telcel"          
## [591,] "Telmex"           "Bimbo"            "Televisa"        
## [592,] "Telmex"           "Bimbo"            "Walmart"         
## [593,] "Telmex"           "Carso"            "Arca Continental"
## [594,] "Telmex"           "Carso"            "Bimbo"           
## [595,] "Telmex"           "Carso"            "Liverpool"       
## [596,] "Telmex"           "Carso"            "Movistar"        
## [597,] "Telmex"           "Carso"            "Sears"           
## [598,] "Telmex"           "Carso"            "Telcel"          
## [599,] "Telmex"           "Carso"            "Televisa"        
## [600,] "Telmex"           "Carso"            "Walmart"         
## [601,] "Telmex"           "Liverpool"        "Arca Continental"
## [602,] "Telmex"           "Liverpool"        "Bimbo"           
## [603,] "Telmex"           "Liverpool"        "Carso"           
## [604,] "Telmex"           "Liverpool"        "Movistar"        
## [605,] "Telmex"           "Liverpool"        "Sears"           
## [606,] "Telmex"           "Liverpool"        "Telcel"          
## [607,] "Telmex"           "Liverpool"        "Televisa"        
## [608,] "Telmex"           "Liverpool"        "Walmart"         
## [609,] "Telmex"           "Movistar"         "Arca Continental"
## [610,] "Telmex"           "Movistar"         "Bimbo"           
## [611,] "Telmex"           "Movistar"         "Carso"           
## [612,] "Telmex"           "Movistar"         "Liverpool"       
## [613,] "Telmex"           "Movistar"         "Sears"           
## [614,] "Telmex"           "Movistar"         "Telcel"          
## [615,] "Telmex"           "Movistar"         "Televisa"        
## [616,] "Telmex"           "Movistar"         "Walmart"         
## [617,] "Telmex"           "Sears"            "Arca Continental"
## [618,] "Telmex"           "Sears"            "Bimbo"           
## [619,] "Telmex"           "Sears"            "Carso"           
## [620,] "Telmex"           "Sears"            "Liverpool"       
## [621,] "Telmex"           "Sears"            "Movistar"        
## [622,] "Telmex"           "Sears"            "Telcel"          
## [623,] "Telmex"           "Sears"            "Televisa"        
## [624,] "Telmex"           "Sears"            "Walmart"         
## [625,] "Telmex"           "Telcel"           "Arca Continental"
## [626,] "Telmex"           "Telcel"           "Bimbo"           
## [627,] "Telmex"           "Telcel"           "Carso"           
## [628,] "Telmex"           "Telcel"           "Liverpool"       
## [629,] "Telmex"           "Telcel"           "Movistar"        
## [630,] "Telmex"           "Telcel"           "Sears"           
## [631,] "Telmex"           "Telcel"           "Televisa"        
## [632,] "Telmex"           "Telcel"           "Walmart"         
## [633,] "Telmex"           "Televisa"         "Arca Continental"
## [634,] "Telmex"           "Televisa"         "Bimbo"           
## [635,] "Telmex"           "Televisa"         "Carso"           
## [636,] "Telmex"           "Televisa"         "Liverpool"       
## [637,] "Telmex"           "Televisa"         "Movistar"        
## [638,] "Telmex"           "Televisa"         "Sears"           
## [639,] "Telmex"           "Televisa"         "Telcel"          
## [640,] "Telmex"           "Televisa"         "Walmart"         
## [641,] "Telmex"           "Walmart"          "Arca Continental"
## [642,] "Telmex"           "Walmart"          "Bimbo"           
## [643,] "Telmex"           "Walmart"          "Carso"           
## [644,] "Telmex"           "Walmart"          "Liverpool"       
## [645,] "Telmex"           "Walmart"          "Movistar"        
## [646,] "Telmex"           "Walmart"          "Sears"           
## [647,] "Telmex"           "Walmart"          "Telcel"          
## [648,] "Telmex"           "Walmart"          "Televisa"        
## [649,] "Walmart"          "Arca Continental" "Bimbo"           
## [650,] "Walmart"          "Arca Continental" "Carso"           
## [651,] "Walmart"          "Arca Continental" "Liverpool"       
## [652,] "Walmart"          "Arca Continental" "Movistar"        
## [653,] "Walmart"          "Arca Continental" "Sears"           
## [654,] "Walmart"          "Arca Continental" "Telcel"          
## [655,] "Walmart"          "Arca Continental" "Televisa"        
## [656,] "Walmart"          "Arca Continental" "Telmex"          
## [657,] "Walmart"          "Bimbo"            "Arca Continental"
## [658,] "Walmart"          "Bimbo"            "Carso"           
## [659,] "Walmart"          "Bimbo"            "Liverpool"       
## [660,] "Walmart"          "Bimbo"            "Movistar"        
## [661,] "Walmart"          "Bimbo"            "Sears"           
## [662,] "Walmart"          "Bimbo"            "Telcel"          
## [663,] "Walmart"          "Bimbo"            "Televisa"        
## [664,] "Walmart"          "Bimbo"            "Telmex"          
## [665,] "Walmart"          "Carso"            "Arca Continental"
## [666,] "Walmart"          "Carso"            "Bimbo"           
## [667,] "Walmart"          "Carso"            "Liverpool"       
## [668,] "Walmart"          "Carso"            "Movistar"        
## [669,] "Walmart"          "Carso"            "Sears"           
## [670,] "Walmart"          "Carso"            "Telcel"          
## [671,] "Walmart"          "Carso"            "Televisa"        
## [672,] "Walmart"          "Carso"            "Telmex"          
## [673,] "Walmart"          "Liverpool"        "Arca Continental"
## [674,] "Walmart"          "Liverpool"        "Bimbo"           
## [675,] "Walmart"          "Liverpool"        "Carso"           
## [676,] "Walmart"          "Liverpool"        "Movistar"        
## [677,] "Walmart"          "Liverpool"        "Sears"           
## [678,] "Walmart"          "Liverpool"        "Telcel"          
## [679,] "Walmart"          "Liverpool"        "Televisa"        
## [680,] "Walmart"          "Liverpool"        "Telmex"          
## [681,] "Walmart"          "Movistar"         "Arca Continental"
## [682,] "Walmart"          "Movistar"         "Bimbo"           
## [683,] "Walmart"          "Movistar"         "Carso"           
## [684,] "Walmart"          "Movistar"         "Liverpool"       
## [685,] "Walmart"          "Movistar"         "Sears"           
## [686,] "Walmart"          "Movistar"         "Telcel"          
## [687,] "Walmart"          "Movistar"         "Televisa"        
## [688,] "Walmart"          "Movistar"         "Telmex"          
## [689,] "Walmart"          "Sears"            "Arca Continental"
## [690,] "Walmart"          "Sears"            "Bimbo"           
## [691,] "Walmart"          "Sears"            "Carso"           
## [692,] "Walmart"          "Sears"            "Liverpool"       
## [693,] "Walmart"          "Sears"            "Movistar"        
## [694,] "Walmart"          "Sears"            "Telcel"          
## [695,] "Walmart"          "Sears"            "Televisa"        
## [696,] "Walmart"          "Sears"            "Telmex"          
## [697,] "Walmart"          "Telcel"           "Arca Continental"
## [698,] "Walmart"          "Telcel"           "Bimbo"           
## [699,] "Walmart"          "Telcel"           "Carso"           
## [700,] "Walmart"          "Telcel"           "Liverpool"       
## [701,] "Walmart"          "Telcel"           "Movistar"        
## [702,] "Walmart"          "Telcel"           "Sears"           
## [703,] "Walmart"          "Telcel"           "Televisa"        
## [704,] "Walmart"          "Telcel"           "Telmex"          
## [705,] "Walmart"          "Televisa"         "Arca Continental"
## [706,] "Walmart"          "Televisa"         "Bimbo"           
## [707,] "Walmart"          "Televisa"         "Carso"           
## [708,] "Walmart"          "Televisa"         "Liverpool"       
## [709,] "Walmart"          "Televisa"         "Movistar"        
## [710,] "Walmart"          "Televisa"         "Sears"           
## [711,] "Walmart"          "Televisa"         "Telcel"          
## [712,] "Walmart"          "Televisa"         "Telmex"          
## [713,] "Walmart"          "Telmex"           "Arca Continental"
## [714,] "Walmart"          "Telmex"           "Bimbo"           
## [715,] "Walmart"          "Telmex"           "Carso"           
## [716,] "Walmart"          "Telmex"           "Liverpool"       
## [717,] "Walmart"          "Telmex"           "Movistar"        
## [718,] "Walmart"          "Telmex"           "Sears"           
## [719,] "Walmart"          "Telmex"           "Telcel"          
## [720,] "Walmart"          "Telmex"           "Televisa"

4 * Análisis Crítico De Los Datos Obtenidos

4.1 * Interpretación De La Práctica