Objetivo

Construir permutaciones de conjuntos de datos de personas y de nombres de equipos deportivos

Descripción

A partir de conjuntos datos (valores individuales) realizar permutaciones para conocer el número de las mismas y el acomodo de los valores para su interpretación en términos de probabilidad.

La diferencias entre permutaciones y combinaciones tiene que ver con la cantidad o el número de eventos.

Al hacer permutaciones, si importa el orden en que se acomodan los elementos, es decir en que columna aparecen, en la primera, segunda, tercera y y sucesivamente.

Para identificar el orden, se puede decir que no es lo mismo “Oscar”, “Paco” que “Paco”, “Oscar”, están a la inversa o el orden está invertido. Eso es una diferencia con las combinaciones, son los mismos elementos pero el orden en que se acomodan o en que aparecen los elementos está diferente.

Se deben hacer las siguientes acciones:

Cargar librerías

Se van a utilizar funciones de la librería “gtools” por lo que se necesario instalarla previamente: install.packages(“gtools”).

Esta librería permitirá hacer combinaciones y permutaciones.

# install.packages("gtools")
library(gtools)

Marco conceptual

Para hacer permutaciones es necesario identificar la importancia del valor factorial de un número

Factorial

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 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\).

Ejemplo: hallar el factorial de 6 o se sea \(6!=6\times5\times4\times3\times2\times1=720\)

Permutaciones

La regla de conteo de permutaciones permite calcular el número de resultados experimentales cuando se seleccionan cierto número objetos de un conjunto de \(n\) objetos y el orden de selección es relevante.

Los mismos \(r\) objetos seleccionados en orden diferente se consideran un resultado experimental diferente.

Fórmula de permutaciones

\[ S=Pn\binom{n}{r} = \frac{n!}{(n-r)!}\\S \text{ es el espacio muestral y la cantidad de permutaciones} \\Pn \text{ es el número de permutaciones posibles}\\ \binom{n}{r} \text {es símbolo de permutar n elementos en grupos de r}\\ n \text{ es el total de elementos}\\ r \text{ es de cuantos en cuantos elementos se hacen grupos y permutaciones} \]

Ejemplo 1. Nombres de personas

Se trata de hacer permutaciones con los nombres de cuatro personas: “Oscar”, “Paco”, “Paty”, “Laura”, “Rubén”, “Luis”, “Lucy”, “Alberto”, “Juan” en grupos de 2.

Entonces \(n=9\), porque hay cuatro nombres o elementos y \(r=2\) porque se trata de agrupar o permutar de dos en dos.

¿Cuántas permutaciones deberá haber?

  • Oscar y Paco

  • Paco y Oscar

  • Oscar y Paty

  • Paty y Oscar

  • Oscar y Laura

  • Laura y Oscar

  • Paco y Paty

  • Paty y Paco

  • … …

  • … …

  • Paty y Laura

  • Laura y Paty

nombres <- c("Oscar", "Paco", "Paty", "Laura", "Rubén", "Luis", "Lucy", "Alberto", "Juan", "luis", "miguel", "angel","thaily","vianney")
n <- length(nombres)
r <- 2 # ¿cómo agrupar o permutar?

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

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

Ejemplo 2. Nombres de equipos de fútbol en México.

Se trata de hacer combinaciones con los nombres de seis equipos de fútbol: “Atlas”, “Guadalajara”, “Monterrey”, “América”, “Cruz Azul”, “Santos” en grupos de 5. Entonces \(n=9\), porque hay seis equipos o elementos y \(r=5\) porque se trata de agrupar de tres en tres.

¿Cuántas permutaciones deberá haber?

equipos <- c("coca-cola", "barcel", "sabritas", "pepsi", "pond's", "stefano", "google", "amazon", "lenovo")
n <- length(equipos)
r <- 5 # ¿cómo agrupar?

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

paste("Existen ", Pn , " posibles combinaciones del total de ", n , " marcas ", " en grupos de ", r ," en ", r)
## [1] "Existen  126  posibles combinaciones del total de  9  marcas   en grupos de  5  en  5"

Desarrollo

Si bien la fórmula de permutaciones indica el número de permutaciones posibles de un conjunto de elementos pero lo que se desea conocer es ¿cómo se forman o cómo se verían los grupos?.

Se utiliza la función permutation

Permutaciones

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

Nombres de personas

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"    "Lucy"   
##  [8] "Alberto" "Juan"    "luis"    "miguel"  "angel"   "thaily"  "vianney"
Pern.nombres <- permutations(n = length(nombres), r = 2, v = nombres)
Pern.nombres
##        [,1]      [,2]     
##   [1,] "Alberto" "angel"  
##   [2,] "Alberto" "Juan"   
##   [3,] "Alberto" "Laura"  
##   [4,] "Alberto" "Lucy"   
##   [5,] "Alberto" "luis"   
##   [6,] "Alberto" "Luis"   
##   [7,] "Alberto" "miguel" 
##   [8,] "Alberto" "Oscar"  
##   [9,] "Alberto" "Paco"   
##  [10,] "Alberto" "Paty"   
##  [11,] "Alberto" "Rubén"  
##  [12,] "Alberto" "thaily" 
##  [13,] "Alberto" "vianney"
##  [14,] "angel"   "Alberto"
##  [15,] "angel"   "Juan"   
##  [16,] "angel"   "Laura"  
##  [17,] "angel"   "Lucy"   
##  [18,] "angel"   "luis"   
##  [19,] "angel"   "Luis"   
##  [20,] "angel"   "miguel" 
##  [21,] "angel"   "Oscar"  
##  [22,] "angel"   "Paco"   
##  [23,] "angel"   "Paty"   
##  [24,] "angel"   "Rubén"  
##  [25,] "angel"   "thaily" 
##  [26,] "angel"   "vianney"
##  [27,] "Juan"    "Alberto"
##  [28,] "Juan"    "angel"  
##  [29,] "Juan"    "Laura"  
##  [30,] "Juan"    "Lucy"   
##  [31,] "Juan"    "luis"   
##  [32,] "Juan"    "Luis"   
##  [33,] "Juan"    "miguel" 
##  [34,] "Juan"    "Oscar"  
##  [35,] "Juan"    "Paco"   
##  [36,] "Juan"    "Paty"   
##  [37,] "Juan"    "Rubén"  
##  [38,] "Juan"    "thaily" 
##  [39,] "Juan"    "vianney"
##  [40,] "Laura"   "Alberto"
##  [41,] "Laura"   "angel"  
##  [42,] "Laura"   "Juan"   
##  [43,] "Laura"   "Lucy"   
##  [44,] "Laura"   "luis"   
##  [45,] "Laura"   "Luis"   
##  [46,] "Laura"   "miguel" 
##  [47,] "Laura"   "Oscar"  
##  [48,] "Laura"   "Paco"   
##  [49,] "Laura"   "Paty"   
##  [50,] "Laura"   "Rubén"  
##  [51,] "Laura"   "thaily" 
##  [52,] "Laura"   "vianney"
##  [53,] "Lucy"    "Alberto"
##  [54,] "Lucy"    "angel"  
##  [55,] "Lucy"    "Juan"   
##  [56,] "Lucy"    "Laura"  
##  [57,] "Lucy"    "luis"   
##  [58,] "Lucy"    "Luis"   
##  [59,] "Lucy"    "miguel" 
##  [60,] "Lucy"    "Oscar"  
##  [61,] "Lucy"    "Paco"   
##  [62,] "Lucy"    "Paty"   
##  [63,] "Lucy"    "Rubén"  
##  [64,] "Lucy"    "thaily" 
##  [65,] "Lucy"    "vianney"
##  [66,] "luis"    "Alberto"
##  [67,] "luis"    "angel"  
##  [68,] "luis"    "Juan"   
##  [69,] "luis"    "Laura"  
##  [70,] "luis"    "Lucy"   
##  [71,] "luis"    "Luis"   
##  [72,] "luis"    "miguel" 
##  [73,] "luis"    "Oscar"  
##  [74,] "luis"    "Paco"   
##  [75,] "luis"    "Paty"   
##  [76,] "luis"    "Rubén"  
##  [77,] "luis"    "thaily" 
##  [78,] "luis"    "vianney"
##  [79,] "Luis"    "Alberto"
##  [80,] "Luis"    "angel"  
##  [81,] "Luis"    "Juan"   
##  [82,] "Luis"    "Laura"  
##  [83,] "Luis"    "Lucy"   
##  [84,] "Luis"    "luis"   
##  [85,] "Luis"    "miguel" 
##  [86,] "Luis"    "Oscar"  
##  [87,] "Luis"    "Paco"   
##  [88,] "Luis"    "Paty"   
##  [89,] "Luis"    "Rubén"  
##  [90,] "Luis"    "thaily" 
##  [91,] "Luis"    "vianney"
##  [92,] "miguel"  "Alberto"
##  [93,] "miguel"  "angel"  
##  [94,] "miguel"  "Juan"   
##  [95,] "miguel"  "Laura"  
##  [96,] "miguel"  "Lucy"   
##  [97,] "miguel"  "luis"   
##  [98,] "miguel"  "Luis"   
##  [99,] "miguel"  "Oscar"  
## [100,] "miguel"  "Paco"   
## [101,] "miguel"  "Paty"   
## [102,] "miguel"  "Rubén"  
## [103,] "miguel"  "thaily" 
## [104,] "miguel"  "vianney"
## [105,] "Oscar"   "Alberto"
## [106,] "Oscar"   "angel"  
## [107,] "Oscar"   "Juan"   
## [108,] "Oscar"   "Laura"  
## [109,] "Oscar"   "Lucy"   
## [110,] "Oscar"   "luis"   
## [111,] "Oscar"   "Luis"   
## [112,] "Oscar"   "miguel" 
## [113,] "Oscar"   "Paco"   
## [114,] "Oscar"   "Paty"   
## [115,] "Oscar"   "Rubén"  
## [116,] "Oscar"   "thaily" 
## [117,] "Oscar"   "vianney"
## [118,] "Paco"    "Alberto"
## [119,] "Paco"    "angel"  
## [120,] "Paco"    "Juan"   
## [121,] "Paco"    "Laura"  
## [122,] "Paco"    "Lucy"   
## [123,] "Paco"    "luis"   
## [124,] "Paco"    "Luis"   
## [125,] "Paco"    "miguel" 
## [126,] "Paco"    "Oscar"  
## [127,] "Paco"    "Paty"   
## [128,] "Paco"    "Rubén"  
## [129,] "Paco"    "thaily" 
## [130,] "Paco"    "vianney"
## [131,] "Paty"    "Alberto"
## [132,] "Paty"    "angel"  
## [133,] "Paty"    "Juan"   
## [134,] "Paty"    "Laura"  
## [135,] "Paty"    "Lucy"   
## [136,] "Paty"    "luis"   
## [137,] "Paty"    "Luis"   
## [138,] "Paty"    "miguel" 
## [139,] "Paty"    "Oscar"  
## [140,] "Paty"    "Paco"   
## [141,] "Paty"    "Rubén"  
## [142,] "Paty"    "thaily" 
## [143,] "Paty"    "vianney"
## [144,] "Rubén"   "Alberto"
## [145,] "Rubén"   "angel"  
## [146,] "Rubén"   "Juan"   
## [147,] "Rubén"   "Laura"  
## [148,] "Rubén"   "Lucy"   
## [149,] "Rubén"   "luis"   
## [150,] "Rubén"   "Luis"   
## [151,] "Rubén"   "miguel" 
## [152,] "Rubén"   "Oscar"  
## [153,] "Rubén"   "Paco"   
## [154,] "Rubén"   "Paty"   
## [155,] "Rubén"   "thaily" 
## [156,] "Rubén"   "vianney"
## [157,] "thaily"  "Alberto"
## [158,] "thaily"  "angel"  
## [159,] "thaily"  "Juan"   
## [160,] "thaily"  "Laura"  
## [161,] "thaily"  "Lucy"   
## [162,] "thaily"  "luis"   
## [163,] "thaily"  "Luis"   
## [164,] "thaily"  "miguel" 
## [165,] "thaily"  "Oscar"  
## [166,] "thaily"  "Paco"   
## [167,] "thaily"  "Paty"   
## [168,] "thaily"  "Rubén"  
## [169,] "thaily"  "vianney"
## [170,] "vianney" "Alberto"
## [171,] "vianney" "angel"  
## [172,] "vianney" "Juan"   
## [173,] "vianney" "Laura"  
## [174,] "vianney" "Lucy"   
## [175,] "vianney" "luis"   
## [176,] "vianney" "Luis"   
## [177,] "vianney" "miguel" 
## [178,] "vianney" "Oscar"  
## [179,] "vianney" "Paco"   
## [180,] "vianney" "Paty"   
## [181,] "vianney" "Rubén"  
## [182,] "vianney" "thaily"

Nombres de equipos de fútbol

Se muestran las posibles combinaciones de los nombres de equipos de fútbol.

equipos
## [1] "coca-cola" "barcel"    "sabritas"  "pepsi"     "pond's"    "stefano"  
## [7] "google"    "amazon"    "lenovo"
Pern.equipos <- permutations(n = length(equipos), r = 5, v = equipos)

Se muestran solo los primeras diez y últimas diez permutaciones de equipos

head(Pern.equipos)
##      [,1]     [,2]     [,3]        [,4]     [,5]      
## [1,] "amazon" "barcel" "coca-cola" "google" "lenovo"  
## [2,] "amazon" "barcel" "coca-cola" "google" "pepsi"   
## [3,] "amazon" "barcel" "coca-cola" "google" "pond's"  
## [4,] "amazon" "barcel" "coca-cola" "google" "sabritas"
## [5,] "amazon" "barcel" "coca-cola" "google" "stefano" 
## [6,] "amazon" "barcel" "coca-cola" "lenovo" "google"
tail(Pern.equipos)
##          [,1]      [,2]       [,3]     [,4]     [,5]       
## [15115,] "stefano" "sabritas" "pond's" "lenovo" "pepsi"    
## [15116,] "stefano" "sabritas" "pond's" "pepsi"  "amazon"   
## [15117,] "stefano" "sabritas" "pond's" "pepsi"  "barcel"   
## [15118,] "stefano" "sabritas" "pond's" "pepsi"  "coca-cola"
## [15119,] "stefano" "sabritas" "pond's" "pepsi"  "google"   
## [15120,] "stefano" "sabritas" "pond's" "pepsi"  "lenovo"

¿Para qué sirve encontrar el número de permutaciones y la forma en que se agrupan?

Eso sería el espacio muestral que ya construído éste, permite hacer interpretaciones en términos probabilísticos.

Interpretación

El resultado de las permutaciones permite construir un espacio muestral que ofrece la oportunidad de conocer en términos de probabilidad, la cantidad de ocasiones y lo que representa un evento conforme a todo el espacio muestral, es decir frecuencia y frecuencia porcentual.

Preguntas sobre espacio muestral nombres

¿En cuántas ocasiones aparece el nombre de Laura en permutaciones de dos en dos?. Aparece PENDIENTE(16) ocasiones. ¿En cuántas ocasiones aparece el nombre de Oscar en las combinaciones de dos en dos?, Aparece PENDIENTE(16) ocasiones.

En las permutaciones de nombres de dos en dos, ¿en cuántas ocasiones existe Laura y Oscar juntos o contiguos y en ese orden?. Se utiliza la función subset() para hacer filtros y responder a las preguntas.

La nominación [ , ] significa acceder al valor de un data frame por la primer colmna y [ ,2] la segunda columna.

filtro <- subset(Pern.nombres, Pern.nombres[,1] == "Laura" & Pern.nombres[,2] == "Oscar")
filtro
##      [,1]    [,2]   
## [1,] "Laura" "Oscar"
frecuencia <- nrow(filtro)

paste("Existen ", frecuencia, " ocasiones en que se encuentran Laura y Oscar juntos en ese orden, de un total de ", nrow(Pern.nombres), " representan ", round(frecuencia / nrow(Pern.nombres) * 100, 2), "%")
## [1] "Existen  1  ocasiones en que se encuentran Laura y Oscar juntos en ese orden, de un total de  182  representan  0.55 %"

En las permutaciones de nombres de dos en dos, ¿en cuántas ocasiones existe Oscar en la primer columna de todo el espacio muestral?

filtro <- subset(Pern.nombres, Pern.nombres[,1] == "Oscar")
filtro
##       [,1]    [,2]     
##  [1,] "Oscar" "Alberto"
##  [2,] "Oscar" "angel"  
##  [3,] "Oscar" "Juan"   
##  [4,] "Oscar" "Laura"  
##  [5,] "Oscar" "Lucy"   
##  [6,] "Oscar" "luis"   
##  [7,] "Oscar" "Luis"   
##  [8,] "Oscar" "miguel" 
##  [9,] "Oscar" "Paco"   
## [10,] "Oscar" "Paty"   
## [11,] "Oscar" "Rubén"  
## [12,] "Oscar" "thaily" 
## [13,] "Oscar" "vianney"
frecuencia <- nrow(filtro)

paste("Existen ", frecuencia, " ocasiones en que se encuentran Oscar en la primer columna  , de un total de ", nrow(Pern.nombres), " representan ", round(frecuencia / nrow(Pern.nombres) * 100, 2), "%")
## [1] "Existen  13  ocasiones en que se encuentran Oscar en la primer columna  , de un total de  182  representan  7.14 %"

En cuántas ocasiones aparece en primera columna Oscar y Paco o Paty en segunda columna

filtro <- subset(Pern.nombres, Pern.nombres[,1] == "Oscar" & (Pern.nombres[,2] == "Paco" | Pern.nombres[,2] == "Paty"))
filtro
##      [,1]    [,2]  
## [1,] "Oscar" "Paco"
## [2,] "Oscar" "Paty"
frecuencia <- nrow(filtro)

paste("Existen ", frecuencia, " ocasiones en que se encuentran aparece en primera columna Oscar y Paco o Paty en segunda columna, de un total de ", nrow(Pern.nombres), " representan ", round(frecuencia / nrow(Pern.nombres) * 100, 2), "%")
## [1] "Existen  2  ocasiones en que se encuentran aparece en primera columna Oscar y Paco o Paty en segunda columna, de un total de  182  representan  1.1 %"

Preguntas sobre espacio muestral equipos

En cuántas ocasiones aparece de manera contigua y en este orden los equipos de América y Guadalajara en primera y segunda columna respectivamente.

filtro <- subset(Pern.equipos, Pern.equipos[,1] == "amazon" & (Pern.equipos[,2] == "google"))
filtro
##        [,1]     [,2]     [,3]        [,4]        [,5]       
##   [1,] "amazon" "google" "barcel"    "coca-cola" "lenovo"   
##   [2,] "amazon" "google" "barcel"    "coca-cola" "pepsi"    
##   [3,] "amazon" "google" "barcel"    "coca-cola" "pond's"   
##   [4,] "amazon" "google" "barcel"    "coca-cola" "sabritas" 
##   [5,] "amazon" "google" "barcel"    "coca-cola" "stefano"  
##   [6,] "amazon" "google" "barcel"    "lenovo"    "coca-cola"
##   [7,] "amazon" "google" "barcel"    "lenovo"    "pepsi"    
##   [8,] "amazon" "google" "barcel"    "lenovo"    "pond's"   
##   [9,] "amazon" "google" "barcel"    "lenovo"    "sabritas" 
##  [10,] "amazon" "google" "barcel"    "lenovo"    "stefano"  
##  [11,] "amazon" "google" "barcel"    "pepsi"     "coca-cola"
##  [12,] "amazon" "google" "barcel"    "pepsi"     "lenovo"   
##  [13,] "amazon" "google" "barcel"    "pepsi"     "pond's"   
##  [14,] "amazon" "google" "barcel"    "pepsi"     "sabritas" 
##  [15,] "amazon" "google" "barcel"    "pepsi"     "stefano"  
##  [16,] "amazon" "google" "barcel"    "pond's"    "coca-cola"
##  [17,] "amazon" "google" "barcel"    "pond's"    "lenovo"   
##  [18,] "amazon" "google" "barcel"    "pond's"    "pepsi"    
##  [19,] "amazon" "google" "barcel"    "pond's"    "sabritas" 
##  [20,] "amazon" "google" "barcel"    "pond's"    "stefano"  
##  [21,] "amazon" "google" "barcel"    "sabritas"  "coca-cola"
##  [22,] "amazon" "google" "barcel"    "sabritas"  "lenovo"   
##  [23,] "amazon" "google" "barcel"    "sabritas"  "pepsi"    
##  [24,] "amazon" "google" "barcel"    "sabritas"  "pond's"   
##  [25,] "amazon" "google" "barcel"    "sabritas"  "stefano"  
##  [26,] "amazon" "google" "barcel"    "stefano"   "coca-cola"
##  [27,] "amazon" "google" "barcel"    "stefano"   "lenovo"   
##  [28,] "amazon" "google" "barcel"    "stefano"   "pepsi"    
##  [29,] "amazon" "google" "barcel"    "stefano"   "pond's"   
##  [30,] "amazon" "google" "barcel"    "stefano"   "sabritas" 
##  [31,] "amazon" "google" "coca-cola" "barcel"    "lenovo"   
##  [32,] "amazon" "google" "coca-cola" "barcel"    "pepsi"    
##  [33,] "amazon" "google" "coca-cola" "barcel"    "pond's"   
##  [34,] "amazon" "google" "coca-cola" "barcel"    "sabritas" 
##  [35,] "amazon" "google" "coca-cola" "barcel"    "stefano"  
##  [36,] "amazon" "google" "coca-cola" "lenovo"    "barcel"   
##  [37,] "amazon" "google" "coca-cola" "lenovo"    "pepsi"    
##  [38,] "amazon" "google" "coca-cola" "lenovo"    "pond's"   
##  [39,] "amazon" "google" "coca-cola" "lenovo"    "sabritas" 
##  [40,] "amazon" "google" "coca-cola" "lenovo"    "stefano"  
##  [41,] "amazon" "google" "coca-cola" "pepsi"     "barcel"   
##  [42,] "amazon" "google" "coca-cola" "pepsi"     "lenovo"   
##  [43,] "amazon" "google" "coca-cola" "pepsi"     "pond's"   
##  [44,] "amazon" "google" "coca-cola" "pepsi"     "sabritas" 
##  [45,] "amazon" "google" "coca-cola" "pepsi"     "stefano"  
##  [46,] "amazon" "google" "coca-cola" "pond's"    "barcel"   
##  [47,] "amazon" "google" "coca-cola" "pond's"    "lenovo"   
##  [48,] "amazon" "google" "coca-cola" "pond's"    "pepsi"    
##  [49,] "amazon" "google" "coca-cola" "pond's"    "sabritas" 
##  [50,] "amazon" "google" "coca-cola" "pond's"    "stefano"  
##  [51,] "amazon" "google" "coca-cola" "sabritas"  "barcel"   
##  [52,] "amazon" "google" "coca-cola" "sabritas"  "lenovo"   
##  [53,] "amazon" "google" "coca-cola" "sabritas"  "pepsi"    
##  [54,] "amazon" "google" "coca-cola" "sabritas"  "pond's"   
##  [55,] "amazon" "google" "coca-cola" "sabritas"  "stefano"  
##  [56,] "amazon" "google" "coca-cola" "stefano"   "barcel"   
##  [57,] "amazon" "google" "coca-cola" "stefano"   "lenovo"   
##  [58,] "amazon" "google" "coca-cola" "stefano"   "pepsi"    
##  [59,] "amazon" "google" "coca-cola" "stefano"   "pond's"   
##  [60,] "amazon" "google" "coca-cola" "stefano"   "sabritas" 
##  [61,] "amazon" "google" "lenovo"    "barcel"    "coca-cola"
##  [62,] "amazon" "google" "lenovo"    "barcel"    "pepsi"    
##  [63,] "amazon" "google" "lenovo"    "barcel"    "pond's"   
##  [64,] "amazon" "google" "lenovo"    "barcel"    "sabritas" 
##  [65,] "amazon" "google" "lenovo"    "barcel"    "stefano"  
##  [66,] "amazon" "google" "lenovo"    "coca-cola" "barcel"   
##  [67,] "amazon" "google" "lenovo"    "coca-cola" "pepsi"    
##  [68,] "amazon" "google" "lenovo"    "coca-cola" "pond's"   
##  [69,] "amazon" "google" "lenovo"    "coca-cola" "sabritas" 
##  [70,] "amazon" "google" "lenovo"    "coca-cola" "stefano"  
##  [71,] "amazon" "google" "lenovo"    "pepsi"     "barcel"   
##  [72,] "amazon" "google" "lenovo"    "pepsi"     "coca-cola"
##  [73,] "amazon" "google" "lenovo"    "pepsi"     "pond's"   
##  [74,] "amazon" "google" "lenovo"    "pepsi"     "sabritas" 
##  [75,] "amazon" "google" "lenovo"    "pepsi"     "stefano"  
##  [76,] "amazon" "google" "lenovo"    "pond's"    "barcel"   
##  [77,] "amazon" "google" "lenovo"    "pond's"    "coca-cola"
##  [78,] "amazon" "google" "lenovo"    "pond's"    "pepsi"    
##  [79,] "amazon" "google" "lenovo"    "pond's"    "sabritas" 
##  [80,] "amazon" "google" "lenovo"    "pond's"    "stefano"  
##  [81,] "amazon" "google" "lenovo"    "sabritas"  "barcel"   
##  [82,] "amazon" "google" "lenovo"    "sabritas"  "coca-cola"
##  [83,] "amazon" "google" "lenovo"    "sabritas"  "pepsi"    
##  [84,] "amazon" "google" "lenovo"    "sabritas"  "pond's"   
##  [85,] "amazon" "google" "lenovo"    "sabritas"  "stefano"  
##  [86,] "amazon" "google" "lenovo"    "stefano"   "barcel"   
##  [87,] "amazon" "google" "lenovo"    "stefano"   "coca-cola"
##  [88,] "amazon" "google" "lenovo"    "stefano"   "pepsi"    
##  [89,] "amazon" "google" "lenovo"    "stefano"   "pond's"   
##  [90,] "amazon" "google" "lenovo"    "stefano"   "sabritas" 
##  [91,] "amazon" "google" "pepsi"     "barcel"    "coca-cola"
##  [92,] "amazon" "google" "pepsi"     "barcel"    "lenovo"   
##  [93,] "amazon" "google" "pepsi"     "barcel"    "pond's"   
##  [94,] "amazon" "google" "pepsi"     "barcel"    "sabritas" 
##  [95,] "amazon" "google" "pepsi"     "barcel"    "stefano"  
##  [96,] "amazon" "google" "pepsi"     "coca-cola" "barcel"   
##  [97,] "amazon" "google" "pepsi"     "coca-cola" "lenovo"   
##  [98,] "amazon" "google" "pepsi"     "coca-cola" "pond's"   
##  [99,] "amazon" "google" "pepsi"     "coca-cola" "sabritas" 
## [100,] "amazon" "google" "pepsi"     "coca-cola" "stefano"  
## [101,] "amazon" "google" "pepsi"     "lenovo"    "barcel"   
## [102,] "amazon" "google" "pepsi"     "lenovo"    "coca-cola"
## [103,] "amazon" "google" "pepsi"     "lenovo"    "pond's"   
## [104,] "amazon" "google" "pepsi"     "lenovo"    "sabritas" 
## [105,] "amazon" "google" "pepsi"     "lenovo"    "stefano"  
## [106,] "amazon" "google" "pepsi"     "pond's"    "barcel"   
## [107,] "amazon" "google" "pepsi"     "pond's"    "coca-cola"
## [108,] "amazon" "google" "pepsi"     "pond's"    "lenovo"   
## [109,] "amazon" "google" "pepsi"     "pond's"    "sabritas" 
## [110,] "amazon" "google" "pepsi"     "pond's"    "stefano"  
## [111,] "amazon" "google" "pepsi"     "sabritas"  "barcel"   
## [112,] "amazon" "google" "pepsi"     "sabritas"  "coca-cola"
## [113,] "amazon" "google" "pepsi"     "sabritas"  "lenovo"   
## [114,] "amazon" "google" "pepsi"     "sabritas"  "pond's"   
## [115,] "amazon" "google" "pepsi"     "sabritas"  "stefano"  
## [116,] "amazon" "google" "pepsi"     "stefano"   "barcel"   
## [117,] "amazon" "google" "pepsi"     "stefano"   "coca-cola"
## [118,] "amazon" "google" "pepsi"     "stefano"   "lenovo"   
## [119,] "amazon" "google" "pepsi"     "stefano"   "pond's"   
## [120,] "amazon" "google" "pepsi"     "stefano"   "sabritas" 
## [121,] "amazon" "google" "pond's"    "barcel"    "coca-cola"
## [122,] "amazon" "google" "pond's"    "barcel"    "lenovo"   
## [123,] "amazon" "google" "pond's"    "barcel"    "pepsi"    
## [124,] "amazon" "google" "pond's"    "barcel"    "sabritas" 
## [125,] "amazon" "google" "pond's"    "barcel"    "stefano"  
## [126,] "amazon" "google" "pond's"    "coca-cola" "barcel"   
## [127,] "amazon" "google" "pond's"    "coca-cola" "lenovo"   
## [128,] "amazon" "google" "pond's"    "coca-cola" "pepsi"    
## [129,] "amazon" "google" "pond's"    "coca-cola" "sabritas" 
## [130,] "amazon" "google" "pond's"    "coca-cola" "stefano"  
## [131,] "amazon" "google" "pond's"    "lenovo"    "barcel"   
## [132,] "amazon" "google" "pond's"    "lenovo"    "coca-cola"
## [133,] "amazon" "google" "pond's"    "lenovo"    "pepsi"    
## [134,] "amazon" "google" "pond's"    "lenovo"    "sabritas" 
## [135,] "amazon" "google" "pond's"    "lenovo"    "stefano"  
## [136,] "amazon" "google" "pond's"    "pepsi"     "barcel"   
## [137,] "amazon" "google" "pond's"    "pepsi"     "coca-cola"
## [138,] "amazon" "google" "pond's"    "pepsi"     "lenovo"   
## [139,] "amazon" "google" "pond's"    "pepsi"     "sabritas" 
## [140,] "amazon" "google" "pond's"    "pepsi"     "stefano"  
## [141,] "amazon" "google" "pond's"    "sabritas"  "barcel"   
## [142,] "amazon" "google" "pond's"    "sabritas"  "coca-cola"
## [143,] "amazon" "google" "pond's"    "sabritas"  "lenovo"   
## [144,] "amazon" "google" "pond's"    "sabritas"  "pepsi"    
## [145,] "amazon" "google" "pond's"    "sabritas"  "stefano"  
## [146,] "amazon" "google" "pond's"    "stefano"   "barcel"   
## [147,] "amazon" "google" "pond's"    "stefano"   "coca-cola"
## [148,] "amazon" "google" "pond's"    "stefano"   "lenovo"   
## [149,] "amazon" "google" "pond's"    "stefano"   "pepsi"    
## [150,] "amazon" "google" "pond's"    "stefano"   "sabritas" 
## [151,] "amazon" "google" "sabritas"  "barcel"    "coca-cola"
## [152,] "amazon" "google" "sabritas"  "barcel"    "lenovo"   
## [153,] "amazon" "google" "sabritas"  "barcel"    "pepsi"    
## [154,] "amazon" "google" "sabritas"  "barcel"    "pond's"   
## [155,] "amazon" "google" "sabritas"  "barcel"    "stefano"  
## [156,] "amazon" "google" "sabritas"  "coca-cola" "barcel"   
## [157,] "amazon" "google" "sabritas"  "coca-cola" "lenovo"   
## [158,] "amazon" "google" "sabritas"  "coca-cola" "pepsi"    
## [159,] "amazon" "google" "sabritas"  "coca-cola" "pond's"   
## [160,] "amazon" "google" "sabritas"  "coca-cola" "stefano"  
## [161,] "amazon" "google" "sabritas"  "lenovo"    "barcel"   
## [162,] "amazon" "google" "sabritas"  "lenovo"    "coca-cola"
## [163,] "amazon" "google" "sabritas"  "lenovo"    "pepsi"    
## [164,] "amazon" "google" "sabritas"  "lenovo"    "pond's"   
## [165,] "amazon" "google" "sabritas"  "lenovo"    "stefano"  
## [166,] "amazon" "google" "sabritas"  "pepsi"     "barcel"   
## [167,] "amazon" "google" "sabritas"  "pepsi"     "coca-cola"
## [168,] "amazon" "google" "sabritas"  "pepsi"     "lenovo"   
## [169,] "amazon" "google" "sabritas"  "pepsi"     "pond's"   
## [170,] "amazon" "google" "sabritas"  "pepsi"     "stefano"  
## [171,] "amazon" "google" "sabritas"  "pond's"    "barcel"   
## [172,] "amazon" "google" "sabritas"  "pond's"    "coca-cola"
## [173,] "amazon" "google" "sabritas"  "pond's"    "lenovo"   
## [174,] "amazon" "google" "sabritas"  "pond's"    "pepsi"    
## [175,] "amazon" "google" "sabritas"  "pond's"    "stefano"  
## [176,] "amazon" "google" "sabritas"  "stefano"   "barcel"   
## [177,] "amazon" "google" "sabritas"  "stefano"   "coca-cola"
## [178,] "amazon" "google" "sabritas"  "stefano"   "lenovo"   
## [179,] "amazon" "google" "sabritas"  "stefano"   "pepsi"    
## [180,] "amazon" "google" "sabritas"  "stefano"   "pond's"   
## [181,] "amazon" "google" "stefano"   "barcel"    "coca-cola"
## [182,] "amazon" "google" "stefano"   "barcel"    "lenovo"   
## [183,] "amazon" "google" "stefano"   "barcel"    "pepsi"    
## [184,] "amazon" "google" "stefano"   "barcel"    "pond's"   
## [185,] "amazon" "google" "stefano"   "barcel"    "sabritas" 
## [186,] "amazon" "google" "stefano"   "coca-cola" "barcel"   
## [187,] "amazon" "google" "stefano"   "coca-cola" "lenovo"   
## [188,] "amazon" "google" "stefano"   "coca-cola" "pepsi"    
## [189,] "amazon" "google" "stefano"   "coca-cola" "pond's"   
## [190,] "amazon" "google" "stefano"   "coca-cola" "sabritas" 
## [191,] "amazon" "google" "stefano"   "lenovo"    "barcel"   
## [192,] "amazon" "google" "stefano"   "lenovo"    "coca-cola"
## [193,] "amazon" "google" "stefano"   "lenovo"    "pepsi"    
## [194,] "amazon" "google" "stefano"   "lenovo"    "pond's"   
## [195,] "amazon" "google" "stefano"   "lenovo"    "sabritas" 
## [196,] "amazon" "google" "stefano"   "pepsi"     "barcel"   
## [197,] "amazon" "google" "stefano"   "pepsi"     "coca-cola"
## [198,] "amazon" "google" "stefano"   "pepsi"     "lenovo"   
## [199,] "amazon" "google" "stefano"   "pepsi"     "pond's"   
## [200,] "amazon" "google" "stefano"   "pepsi"     "sabritas" 
## [201,] "amazon" "google" "stefano"   "pond's"    "barcel"   
## [202,] "amazon" "google" "stefano"   "pond's"    "coca-cola"
## [203,] "amazon" "google" "stefano"   "pond's"    "lenovo"   
## [204,] "amazon" "google" "stefano"   "pond's"    "pepsi"    
## [205,] "amazon" "google" "stefano"   "pond's"    "sabritas" 
## [206,] "amazon" "google" "stefano"   "sabritas"  "barcel"   
## [207,] "amazon" "google" "stefano"   "sabritas"  "coca-cola"
## [208,] "amazon" "google" "stefano"   "sabritas"  "lenovo"   
## [209,] "amazon" "google" "stefano"   "sabritas"  "pepsi"    
## [210,] "amazon" "google" "stefano"   "sabritas"  "pond's"
frecuencia <- nrow(filtro)

paste("Existen ", frecuencia, " ocasiones en que se encuentran aparece en primera columna amazon y google en segunda columna, de un total de ", nrow(Pern.equipos), " representan ", round(frecuencia / nrow(Pern.equipos) * 100, 2), "%")
## [1] "Existen  210  ocasiones en que se encuentran aparece en primera columna amazon y google en segunda columna, de un total de  15120  representan  1.39 %"

En cuántas ocasiones aparece de manera contigua y en este orden los equipos de Atlas y Guadalajara en primera y segunda columna respectivamente.

filtro <- subset(Pern.nombres, Pern.nombres[,1] == "stefano" & (Pern.nombres[,2] == "sabritas"))
filtro
##      [,1] [,2]
frecuencia <- nrow(filtro)

paste("Existen ", frecuencia, " ocasiones en que se encuentran aparece en primera columna stefano y sabrias en segunda columna, de un total de ", nrow(Pern.nombres), " representan ", round(frecuencia / nrow(Pern.nombres) * 100, 2), "%")
## [1] "Existen  0  ocasiones en que se encuentran aparece en primera columna stefano y sabrias en segunda columna, de un total de  182  representan  0 %"

¿En cuántas ocasiones aparece de manera contigua y en este orden los equipos de Guadalajara y Mazatlán en cualquier columna uno y dos, dos y tres, tres y cuatro o cuatro y cinco?

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

paste("Existen ", frecuencia, " aparece de manera contigua y en este orden los equipos de amazon y google en cualquier columna , de un total de ", nrow(Pern.equipos), " representan ", round(frecuencia / nrow(Pern.equipos) * 100, 2), "%")
## [1] "Existen  840  aparece de manera contigua y en este orden los equipos de amazon y google en cualquier columna , de un total de  15120  representan  5.56 %"

Bibliografía