在r中从一岁出生到另一岁

Question

我有这个出生年份的数据，我想在2017年转换成这个不同的人的年龄。我该怎么做呢？

table(d$age)

1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 
 175  155  134  133  199  215  237  278  325  350  433  479  574  532  549  527  560  644  707 
1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 
 816  811  812  926  850  856  880  840  921  879  879  879  822  932  838  904  869  936  903 
1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 
 880  802  843  875  871  786  795  803  742  759  719  746  778  788  808  694  731  691  663 
1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 
 653  683  613  673  618  634  576  640  532  509  528  550  533  507  541  604  471  504  350 
2004 
  45

Answer 1

这并不难做到：

如果您的出生年份数据是数字：

yob <- c(1955, 2000, 1900)
age <- 2021 - yob
age
[1]  66  21 121

如果它们是字符：

yob <- c("1955", "2000", "1900")
age <- 2021 - as.numeric(yob)