Group by Genre and count movies per Genre
mydata_group <- aggregate(Title ~ Genre, data = mydata, FUN = length)