# Load csv file
marriage <- read.csv("/Users/michellenguyen/Downloads/marriage_age_2019.csv")
# Load dplyr
library(dplyr)
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
# Load dataset to see number of observations
marriage
## Year Men Women
## 1 1890 26.1 22.0
## 2 1900 25.9 21.9
## 3 1910 25.1 21.6
## 4 1920 24.6 21.2
## 5 1930 24.3 21.3
## 6 1940 24.3 21.5
## 7 1947 23.7 20.5
## 8 1948 23.3 20.4
## 9 1949 22.7 20.3
## 10 1950 22.8 20.3
## 11 1951 22.9 20.4
## 12 1952 23.0 20.2
## 13 1953 22.8 20.2
## 14 1954 23.0 20.3
## 15 1955 22.6 20.2
## 16 1956 22.5 20.1
## 17 1957 22.6 20.3
## 18 1958 22.6 20.2
## 19 1959 22.5 20.2
## 20 1960 22.8 20.3
## 21 1961 22.8 20.3
## 22 1962 22.7 20.3
## 23 1963 22.8 20.5
## 24 1964 23.1 20.5
## 25 1965 22.8 20.6
## 26 1966 22.8 20.5
## 27 1967 23.1 20.6
## 28 1968 23.1 20.8
## 29 1969 23.2 20.8
## 30 1970 23.2 20.8
## 31 1971 23.1 20.9
## 32 1972 23.3 20.9
## 33 1973 23.2 21.0
## 34 1974 23.1 21.1
## 35 1975 23.5 21.1
## 36 1976 23.8 21.3
## 37 1977 24.0 21.6
## 38 1978 24.2 21.8
## 39 1979 24.4 22.1
## 40 1980 24.7 22.0
## 41 1981 24.8 22.3
## 42 1982 25.2 22.5
## 43 1983 25.4 22.8
## 44 1984 25.4 23.0
## 45 1985 25.5 23.3
## 46 1986 25.7 23.1
## 47 1987 25.8 23.6
## 48 1988 25.9 23.6
## 49 1989 26.2 23.8
## 50 1990 26.1 23.9
## 51 1991 26.3 24.1
## 52 1992 26.5 24.4
## 53 1993 26.5 24.5
## 54 1994 26.7 24.5
## 55 1995 26.9 24.5
## 56 1996 27.1 24.8
## 57 1997 26.8 25.0
## 58 1998 26.7 25.0
## 59 1999 26.9 25.1
## 60 2000 26.8 25.1
## 61 2001 26.9 25.1
## 62 2002 26.9 25.3
## 63 2003 27.1 25.3
## 64 2004 27.4 25.3
## 65 2005 27.1 25.3
## 66 2006 27.5 25.5
## 67 2007 27.5 25.6
## 68 2008 27.6 25.9
## 69 2009 28.1 25.9
## 70 2010 28.2 26.1
## 71 2011 28.4 26.4
## 72 2012 28.6 26.6
## 73 2013 29.0 26.6
## 74 2014 29.3 27.0
## 75 2015 29.2 27.1
## 76 2016 29.5 27.4
## 77 2017 29.5 27.4
## 78 2018 29.8 27.8
## 79 2019 29.8 28.0