- This will determine the rank of the name Nicole among females in 2000 by popularity.
babynames %>%
filter(year == 2000, sex == "F") %>%
mutate(rank = row_number()) %>%
mutate(percent = round(prop * 100, 1)) %>%
filter(name == "Nicole")
Nicole was the 31st most popular name in the year 2000.
- This will create a word cloud of popular names of females in 2000.
babynames %>%
filter(year == 2000) %>%
filter(sex == "F") %>%
select(name, n) %>%
top_n(100, n) %>%
wordcloud2(size = , color = "pink")
- This will create a graph of the popularity of the name Nicole throughout time.
babynames %>%
filter(name == "Nicole", sex == "F") %>%
ggplot(aes(x = year, y = prop)) +
geom_line()

It looks like the name Nicole reached its peak in popularity in the mid-1980’s. In 2000, the year I was born, the popularity Nicole steadily decreased until the 2010’s.
- This will create a table of the top 10 years the name Nicole was most popular.
babynames %>%
filter(name == "Nicole", sex == "F") %>%
top_n(10, prop) %>%
arrange(-prop)
NA
- This will create a graph comparing the popularity of the names Nicole, Allison, and Tristin over time.
babynames %>%
filter(name == "Nicole" | name == "Allison" | name == "Tristin") %>%
filter(sex == "F") %>%
ggplot(aes(x = year, y = n, color = name)) +
geom_line()

This shows that out of the three names, Nicole was the most popular but is slowly losing popularity, the name Allison has gained popularity, and the name Tristin is consistently less used.
LS0tDQp0aXRsZTogIk5hbWUgYW5hbHlzaXMiDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KMS4gVGhpcyB3aWxsIGRldGVybWluZSB0aGUgcmFuayBvZiB0aGUgbmFtZSBOaWNvbGUgYW1vbmcgZmVtYWxlcyBpbiAyMDAwIGJ5IHBvcHVsYXJpdHkuIA0KDQpgYGB7cn0NCmJhYnluYW1lcyAlPiUgICAgICAgICAgICAgICAgICAgICAgICAgICAgIA0KICBmaWx0ZXIoeWVhciA9PSAyMDAwLCBzZXggPT0gIkYiKSAlPiUgICAgDQogIG11dGF0ZShyYW5rID0gcm93X251bWJlcigpKSAlPiUgICAgICAgICANCiAgbXV0YXRlKHBlcmNlbnQgPSByb3VuZChwcm9wICogMTAwLCAxKSkgJT4lIA0KICBmaWx0ZXIobmFtZSA9PSAiTmljb2xlIikgICAgICAgICAgICAgICANCmBgYA0KDQpOaWNvbGUgd2FzIHRoZSAzMXN0IG1vc3QgcG9wdWxhciBuYW1lIGluIHRoZSB5ZWFyIDIwMDAuIA0KDQoyLiBUaGlzIHdpbGwgY3JlYXRlIGEgd29yZCBjbG91ZCBvZiBwb3B1bGFyIG5hbWVzIG9mIGZlbWFsZXMgaW4gMjAwMC4gDQoNCmBgYHtyfQ0KYmFieW5hbWVzICU+JQ0KICBmaWx0ZXIoeWVhciA9PSAyMDAwKSAlPiUgICAgIA0KICBmaWx0ZXIoc2V4ID09ICJGIikgJT4lICAgICAgIA0KICBzZWxlY3QobmFtZSwgbikgJT4lICAgICAgICAgICANCiAgdG9wX24oMTAwLCBuKSAlPiUgICAgICAgICAgIA0KICB3b3JkY2xvdWQyKHNpemUgPSAsIGNvbG9yID0gInBpbmsiKSAgICAgICAgICAgICAgICAgDQpgYGANCg0KMy4gVGhpcyB3aWxsIGNyZWF0ZSBhIGdyYXBoIG9mIHRoZSBwb3B1bGFyaXR5IG9mIHRoZSBuYW1lIE5pY29sZSB0aHJvdWdob3V0IHRpbWUuIA0KDQpgYGB7cn0NCmJhYnluYW1lcyAlPiUgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICANCiAgZmlsdGVyKG5hbWUgPT0gIk5pY29sZSIsIHNleCA9PSAiRiIpICU+JSAgICAgIA0KICBnZ3Bsb3QoYWVzKHggPSB5ZWFyLCB5ID0gcHJvcCkpICsgICAgICAgICAgICAgIA0KICBnZW9tX2xpbmUoKSAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIA0KDQpgYGANCg0KSXQgbG9va3MgbGlrZSB0aGUgbmFtZSBOaWNvbGUgcmVhY2hlZCBpdHMgcGVhayBpbiBwb3B1bGFyaXR5IGluIHRoZSBtaWQtMTk4MCdzLiBJbiAyMDAwLCB0aGUgeWVhciBJIHdhcyBib3JuLCB0aGUgcG9wdWxhcml0eSBOaWNvbGUgc3RlYWRpbHkgZGVjcmVhc2VkIHVudGlsIHRoZSAyMDEwJ3MuIA0KDQo0LiBUaGlzIHdpbGwgY3JlYXRlIGEgdGFibGUgb2YgdGhlIHRvcCAxMCB5ZWFycyB0aGUgbmFtZSBOaWNvbGUgd2FzIG1vc3QgcG9wdWxhci4NCg0KYGBge3J9DQpiYWJ5bmFtZXMgJT4lICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIA0KICBmaWx0ZXIobmFtZSA9PSAiTmljb2xlIiwgc2V4ID09ICJGIikgJT4lICAgIA0KICB0b3BfbigxMCwgcHJvcCkgJT4lICAgICAgICAgICAgICAgICAgICAgICAgICANCiAgYXJyYW5nZSgtcHJvcCkgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgDQoNCmBgYA0KDQo1LiBUaGlzIHdpbGwgY3JlYXRlIGEgZ3JhcGggY29tcGFyaW5nIHRoZSBwb3B1bGFyaXR5IG9mIHRoZSBuYW1lcyBOaWNvbGUsIEFsbGlzb24sIGFuZCBUcmlzdGluIG92ZXIgdGltZS4NCg0KYGBge3J9DQpiYWJ5bmFtZXMgJT4lDQogIGZpbHRlcihuYW1lID09ICJOaWNvbGUiIHwgbmFtZSA9PSAiQWxsaXNvbiIgfCBuYW1lID09ICJUcmlzdGluIikgJT4lIA0KICBmaWx0ZXIoc2V4ID09ICJGIikgJT4lIA0KICBnZ3Bsb3QoYWVzKHggPSB5ZWFyLCB5ID0gbiwgY29sb3IgPSBuYW1lKSkgKw0KICBnZW9tX2xpbmUoKQ0KYGBgDQoNClRoaXMgc2hvd3MgdGhhdCBvdXQgb2YgdGhlIHRocmVlIG5hbWVzLCBOaWNvbGUgd2FzIHRoZSBtb3N0IHBvcHVsYXIgYnV0IGlzIHNsb3dseSBsb3NpbmcgcG9wdWxhcml0eSwgdGhlIG5hbWUgQWxsaXNvbiBoYXMgZ2FpbmVkIHBvcHVsYXJpdHksIGFuZCB0aGUgbmFtZSBUcmlzdGluIGlzIGNvbnNpc3RlbnRseSBsZXNzIHVzZWQuICANCg==