First Letters Over Time

This project explores the popularity of the Beatles.

The data was collected here:

https://data.cityofnewyork.us/Health/Popular-Baby-Names/25th-nujf/about_data

First, we load the necessary packages:

# do not install, just load packages
library(babynames)

library(tidyverse)

── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.4     ✔ readr     2.1.5
✔ forcats   1.0.0     ✔ stringr   1.5.1
✔ ggplot2   3.4.4     ✔ tibble    3.2.1
✔ lubridate 1.9.3     ✔ tidyr     1.3.1
✔ purrr     1.0.2     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

babynames |> 
  filter(name %in% "Mary") |> 
  filter(sex=="F") |> 
  ggplot(aes(year, prop)) + geom_line()

library(readr)
dogNames <- read_csv("~/Desktop/Current Classes/MEA3290/babynames/dogNames.csv")

Rows: 508196 Columns: 8
── Column specification ────────────────────────────────────────────────────────
Delimiter: ","
chr (5): AnimalName, AnimalGender, BreedName, LicenseIssuedDate, LicenseExpi...
dbl (3): AnimalBirthYear, ZipCode, Extract Year

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

# no View() or install commands