install.packages$(\text{'}$gtrendsR$\text{'})$

library$(\text{'}$gtrendsR$\text{'})$

MLB$=$gtrends$("$MLB$",$ time $="2014-01-012019-12-31")$

MLB$interest$\_$over$\_$time

MLB$interest$\_$over$\_$time$hits

MLB$interest$\_$over$\_$time$date

max$($MLB$interest$\_$over$\_$time$hits$)$

which.max$($MLB$interest$\_$over$\_$time$hits$)$

MLB$interest$\_$over$\_$time$date$[70]$

which.min$($MLB$interest$\_$over$\_$time$hits$)$

MLB$interest$\_$over$\_$time$date$[25]$

sum$($MLB$interest$\_$over$\_$time$hits$)$