#install.packages("gtrendsR")
library(tidyverse)
## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ──
## ✔ ggplot2 3.3.5     ✔ purrr   0.3.4
## ✔ tibble  3.1.8     ✔ dplyr   1.0.8
## ✔ tidyr   1.2.0     ✔ stringr 1.4.0
## ✔ readr   2.1.2     ✔ forcats 0.5.1
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
library(gtrendsR)

getwd()

Paso 1. Definir el término a buscar

termino <- c("Heineken")

Paso 2. Definir la locación (ISO3166 - 2 country codes)

ubicacion <- c("MX")

Paso 3. Definir el canal: web, news, images, youtube

canal <- "web"

Paso 4. Definir la ventana de tiempo

periodo <- ("2009-01-01 2022-09-13") # año-mes-día

Paso 5. Función

tendencia <- gtrends(termino, ubicacion, canal, time = periodo)
plot(tendencia) # 100 = dia que mas veces se busco 

Conclusiones

En esta actividad, observamos como por medio de una libreria de R detectar las tendencias que tiene alguna marca, producto, etc,. en internet, especificamente en lo que podria ser web, news, images y youtube. En este caso, observamos la tendencia de busqueda en la web de la marca Heineken, en la que podemos notar una gran tendencia de busqueda en el año 2013.