A friend recently mentioned to me that there were basically no sexual Super Bowl ads this year. In fact, I’ve heard people speculating for a while now that the eating-a-burger-in-a-bikini-style ads are on the decline.
I then woke up to a the following news in Data is Plural: the good people at 538 watched 233 Super Bowl ads between 2000-2021(!!!) and coded up info on them. Included in that coding? Whether each ad “uses sex to sell a product”. Here’s the raw data.
So, here I plot the % of ads from their sample that “use sex to sell a product” over the years 2000-2021. Indeed, the strategy of “sex sells” seems to be on the decline.
library(tidyverse); library(data.table);library(scales);library(emoGG)
superbowl<-fread("https://raw.githubusercontent.com/fivethirtyeight/superbowl-ads/main/superbowl-ads.csv")
superbowl%>%group_by(year)%>%
summarise(tot=n(),
use_sex=sum(use_sex==T),
sex_rate=use_sex/tot)%>%
ggplot(aes(x=year, y=sex_rate))+
geom_emoji(emoji="1f351", size=.04)+
scale_y_continuous(limits=c(0,.65), breaks=seq(0,.6,0.1),
labels = percent_format(accuracy = 1))+
scale_x_continuous(breaks=seq(2000,2020, 2))+
theme_minimal()+
theme(text=element_text(family="Palatino", size=15),
plot.title = element_text(size=25),
plot.title.position = "plot")+
ggtitle("The Decline of the Sexual Super Bowl Ad")+
geom_smooth(method = lm, se = FALSE, color=alpha("#E69F00",0.5))+
labs(x="", y="% ads that use sex to sell a product\n",
caption="Data: FiveThirtyEight Super Bowl Ads Dataset | Graph: Alex Albright\n\n(Note: Sample limited to ads 'from the 10 brands that had the most [ads] in Super Bowls from\n2000 to 2020, according to data from superbowl-ads.com, with matching videos found on YouTube')")
`summarise()` ungrouping output (override with `.groups` argument)
ggsave("sexual_superbowl_ads.png", width=7.25, height=6.5, dpi=300)

Quick note: there are lots of options for customizing the points here. I picked the classic peach emoji but you could use a relevant superbowl ad screengrab or even a football in a bikini or whatever really. Feel free to remix to your hearts content. The code is just the simple chunk above.
LS0tCnRpdGxlOiAiVGhlIERlY2xpbmUgb2YgdGhlIFNleHVhbCBTdXBlciBCb3dsIEFkIgphdXRob3I6IEFsZXggQWxicmlnaHQKZGF0ZTogIjIvMTAvMjEiCm91dHB1dDogaHRtbF9ub3RlYm9vawotLS0KCkEgZnJpZW5kIHJlY2VudGx5IG1lbnRpb25lZCB0byBtZSB0aGF0IHRoZXJlIHdlcmUgYmFzaWNhbGx5IG5vIHNleHVhbCBTdXBlciBCb3dsIGFkcyB0aGlzIHllYXIuIEluIGZhY3QsIEkndmUgaGVhcmQgcGVvcGxlIHNwZWN1bGF0aW5nIGZvciBhIHdoaWxlIG5vdyB0aGF0IHRoZSBlYXRpbmctYS1idXJnZXItaW4tYS1iaWtpbmktc3R5bGUgYWRzIGFyZSBvbiB0aGUgZGVjbGluZS4KCkkgdGhlbiB3b2tlIHVwIHRvIGEgdGhlIGZvbGxvd2luZyBuZXdzIGluIFtEYXRhIGlzIFBsdXJhbF0oaHR0cHM6Ly9kb2NzLmdvb2dsZS5jb20vc3ByZWFkc2hlZXRzL2QvMXdaaFBMTUNIS0p2d09rUDRqdWNsaGpGZ3FJWThmUUZNZW13S0wyYzY0dmsvZWRpdCNnaWQ9MCk6IHRoZSBnb29kIHBlb3BsZSBhdCA1Mzggd2F0Y2hlZCAyMzMgU3VwZXIgQm93bCBhZHMgYmV0d2VlbiAyMDAwLTIwMjEoISEhKSBhbmQgY29kZWQgdXAgaW5mbyBvbiB0aGVtLiBJbmNsdWRlZCBpbiB0aGF0IGNvZGluZz8gV2hldGhlciBlYWNoIGFkICJ1c2VzIHNleCB0byBzZWxsIGEgcHJvZHVjdCIuIFtIZXJlXShodHRwczovL2dpdGh1Yi5jb20vZml2ZXRoaXJ0eWVpZ2h0L3N1cGVyYm93bC1hZHMpJ3MgdGhlIHJhdyBkYXRhLl5bU2FtcGxlOiBhZHMgImZyb20gdGhlIDEwIGJyYW5kcyB0aGF0IGhhZCB0aGUgbW9zdCBhZHZlcnRpc2VtZW50cyBpbiBTdXBlciBCb3dscyBmcm9tIDIwMDAgdG8gMjAyMCwgYWNjb3JkaW5nIHRvIGRhdGEgZnJvbSBzdXBlcmJvd2wtYWRzLmNvbSwgd2l0aCBtYXRjaGluZyB2aWRlb3MgZm91bmQgb24gWW91VHViZSJdCgpTbywgaGVyZSBJIHBsb3QgdGhlICUgb2YgYWRzIGZyb20gdGhlaXIgc2FtcGxlIHRoYXQgInVzZSBzZXggdG8gc2VsbCBhIHByb2R1Y3QiIG92ZXIgdGhlIHllYXJzIDIwMDAtMjAyMS4gSW5kZWVkLCB0aGUgc3RyYXRlZ3kgb2YgInNleCBzZWxscyIgc2VlbXMgdG8gYmUgb24gdGhlIGRlY2xpbmUuCgpgYGB7cn0KbGlicmFyeSh0aWR5dmVyc2UpOyBsaWJyYXJ5KGRhdGEudGFibGUpO2xpYnJhcnkoc2NhbGVzKTtsaWJyYXJ5KGVtb0dHKQpzdXBlcmJvd2w8LWZyZWFkKCJodHRwczovL3Jhdy5naXRodWJ1c2VyY29udGVudC5jb20vZml2ZXRoaXJ0eWVpZ2h0L3N1cGVyYm93bC1hZHMvbWFpbi9zdXBlcmJvd2wtYWRzLmNzdiIpCgpzdXBlcmJvd2wlPiVncm91cF9ieSh5ZWFyKSU+JQogIHN1bW1hcmlzZSh0b3Q9bigpLAogICAgICAgICAgICB1c2Vfc2V4PXN1bSh1c2Vfc2V4PT1UKSwKICAgICAgICAgICAgc2V4X3JhdGU9dXNlX3NleC90b3QpJT4lCiAgZ2dwbG90KGFlcyh4PXllYXIsIHk9c2V4X3JhdGUpKSsKICBnZW9tX2Vtb2ppKGVtb2ppPSIxZjM1MSIsIHNpemU9LjA0KSsKICBzY2FsZV95X2NvbnRpbnVvdXMobGltaXRzPWMoMCwuNjUpLCBicmVha3M9c2VxKDAsLjYsMC4xKSwgCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHBlcmNlbnRfZm9ybWF0KGFjY3VyYWN5ID0gMSkpKwogIHNjYWxlX3hfY29udGludW91cyhicmVha3M9c2VxKDIwMDAsMjAyMCwgMikpKwogIHRoZW1lX21pbmltYWwoKSsKICB0aGVtZSh0ZXh0PWVsZW1lbnRfdGV4dChmYW1pbHk9IlBhbGF0aW5vIiwgc2l6ZT0xNSksIAogICAgICAgIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoc2l6ZT0yNSksCiAgICAgICAgcGxvdC50aXRsZS5wb3NpdGlvbiA9ICJwbG90IikrCiAgZ2d0aXRsZSgiVGhlIERlY2xpbmUgb2YgdGhlIFNleHVhbCBTdXBlciBCb3dsIEFkIikrCiAgZ2VvbV9zbW9vdGgobWV0aG9kID0gbG0sIHNlID0gRkFMU0UsIGNvbG9yPWFscGhhKCIjRTY5RjAwIiwwLjUpKSsKICBsYWJzKHg9IiIsIHk9IiUgYWRzIHRoYXQgdXNlIHNleCB0byBzZWxsIGEgcHJvZHVjdFxuIiwgCiAgICAgICBjYXB0aW9uPSJEYXRhOiBGaXZlVGhpcnR5RWlnaHQgU3VwZXIgQm93bCBBZHMgRGF0YXNldCB8IEdyYXBoOiBBbGV4IEFsYnJpZ2h0XG5cbihOb3RlOiBTYW1wbGUgbGltaXRlZCB0byBhZHMgJ2Zyb20gdGhlIDEwIGJyYW5kcyB0aGF0IGhhZCB0aGUgbW9zdCBbYWRzXSBpbiBTdXBlciBCb3dscyBmcm9tXG4yMDAwIHRvIDIwMjAsIGFjY29yZGluZyB0byBkYXRhIGZyb20gc3VwZXJib3dsLWFkcy5jb20sIHdpdGggbWF0Y2hpbmcgdmlkZW9zIGZvdW5kIG9uIFlvdVR1YmUnKSIpCmdnc2F2ZSgic2V4dWFsX3N1cGVyYm93bF9hZHMucG5nIiwgd2lkdGg9Ny4yNSwgaGVpZ2h0PTYuNSwgZHBpPTMwMCkKYGBgCgpRdWljayBub3RlOiB0aGVyZSBhcmUgbG90cyBvZiBvcHRpb25zIGZvciBjdXN0b21pemluZyB0aGUgcG9pbnRzIGhlcmUuIEkgcGlja2VkIHRoZSBjbGFzc2ljIHBlYWNoIGVtb2ppIGJ1dCB5b3UgY291bGQgdXNlIGEgcmVsZXZhbnQgc3VwZXJib3dsIGFkIHNjcmVlbmdyYWIgb3IgZXZlbiBhIGZvb3RiYWxsIGluIGEgYmlraW5pIG9yIHdoYXRldmVyIHJlYWxseS4gRmVlbCBmcmVlIHRvIHJlbWl4IHRvIHlvdXIgaGVhcnRzIGNvbnRlbnQuIFRoZSBjb2RlIGlzIGp1c3QgdGhlIHNpbXBsZSBjaHVuayBhYm92ZS4=