Data

준비한 자료는 E. Saez 교수의 홈페이지에 있는 TabFig2018prel.xls 를 손봐서 불러들인 것이다.

Year P90_100 P95_100 P99_100 P99.5_100 P99.9_100 P99.99_100 P90_95 P95_99 P99_99.5 P99.5_99.9 P99.9_99.99
1913 NA NA 17.96 14.73 8.62 2.755 NA NA 3.23 6.11 5.86
1914 NA NA 18.16 15.08 8.60 2.729 NA NA 3.08 6.48 5.87
1915 NA NA 17.58 14.58 9.22 4.360 NA NA 3.00 5.36 4.86
1916 NA NA 19.31 16.37 10.52 4.781 NA NA 2.94 5.86 5.73
1917 40.5 30.6 17.74 14.34 8.40 3.365 9.87 12.9 3.40 5.94 5.04
1918 40.1 29.5 15.96 12.43 6.72 2.454 10.61 13.5 3.53 5.71 4.26
1919 40.3 30.2 16.41 12.64 6.63 2.287 10.15 13.8 3.77 6.01 4.34
1920 39.0 28.3 14.83 11.14 5.36 1.663 10.69 13.5 3.69 5.79 3.69
1921 43.2 30.8 15.64 11.70 5.60 1.688 12.38 15.2 3.94 6.10 3.91
1922 43.7 31.9 17.06 13.06 6.63 2.274 11.78 14.9 4.00 6.42 4.36
1923 41.5 29.8 15.64 11.91 5.91 1.998 11.68 14.1 3.73 6.00 3.91
1924 44.4 32.1 17.42 13.40 6.79 2.325 12.29 14.7 4.02 6.61 4.46
1925 46.4 35.0 20.25 15.86 8.52 3.311 11.35 14.8 4.38 7.34 5.21
1926 45.7 34.6 19.91 15.55 8.46 3.364 11.10 14.7 4.36 7.09 5.09
1927 46.7 35.7 21.02 16.60 9.25 3.754 10.98 14.7 4.43 7.34 5.50
1928 49.3 38.6 23.94 19.40 11.54 5.025 10.72 14.6 4.54 7.86 6.52
1929 46.7 36.5 22.35 18.07 10.91 4.990 10.23 14.1 4.29 7.15 5.92
1930 43.9 32.1 17.22 13.20 7.07 2.845 11.80 14.8 4.02 6.13 4.23
1931 44.5 31.2 15.50 11.57 5.89 2.250 13.31 15.7 3.93 5.67 3.64
1932 46.4 32.7 15.56 11.62 5.97 1.989 13.70 17.1 3.93 5.65 3.98
1933 45.6 33.2 16.46 12.46 6.61 2.344 12.41 16.7 4.00 5.86 4.26
1934 45.8 33.7 16.40 12.29 6.13 2.073 12.07 17.3 4.10 6.17 4.06
1935 44.5 32.3 16.68 12.63 6.39 2.188 12.21 15.6 4.04 6.24 4.20
1936 46.6 34.6 19.29 14.86 7.57 2.537 11.96 15.3 4.43 7.29 5.03
1937 44.2 32.3 17.15 13.02 6.49 2.174 11.96 15.1 4.13 6.53 4.32
1938 44.1 31.3 15.76 11.78 5.88 2.195 12.73 15.6 3.98 5.89 3.69
1939 45.5 32.3 16.18 12.06 5.87 1.963 13.24 16.1 4.12 6.19 3.91
1940 45.3 32.2 16.48 12.33 6.00 2.044 13.07 15.7 4.14 6.33 3.96
1941 41.9 30.0 15.79 11.86 5.81 1.977 11.94 14.2 3.92 6.05 3.83
1942 36.1 25.8 13.43 10.07 4.81 1.546 10.32 12.4 3.36 5.25 3.27
1943 33.7 24.1 12.31 9.15 4.26 1.235 9.61 11.8 3.16 4.88 3.03
1944 32.5 22.8 11.28 8.26 3.76 1.164 9.75 11.5 3.02 4.50 2.59
1945 34.4 24.8 12.52 9.14 4.16 1.263 9.63 12.3 3.38 4.98 2.90
1946 36.7 26.8 13.28 9.61 4.39 1.473 9.93 13.5 3.67 5.22 2.92
1947 34.3 24.7 11.96 8.61 3.92 1.304 9.67 12.7 3.34 4.70 2.62
1948 35.0 25.1 12.24 8.90 4.05 1.305 9.96 12.8 3.34 4.84 2.75
1949 34.8 24.5 11.73 8.48 3.83 1.243 10.25 12.8 3.25 4.64 2.59
1950 35.6 25.5 12.82 9.37 4.39 1.220 10.03 12.7 3.45 4.98 3.17
1951 34.2 24.2 11.79 8.53 3.89 1.281 10.02 12.4 3.26 4.64 2.61
1952 33.2 23.1 10.79 7.74 3.43 1.088 10.14 12.3 3.06 4.31 2.34
1953 32.3 22.0 9.90 7.02 3.06 0.967 10.29 12.1 2.88 3.97 2.09
1954 33.6 23.3 10.77 7.71 3.49 1.169 10.34 12.5 3.06 4.22 2.32
1955 33.9 23.6 11.06 7.96 3.71 1.317 10.34 12.5 3.10 4.25 2.40
1956 33.5 23.1 10.67 7.70 3.49 1.198 10.34 12.5 2.97 4.22 2.29
1957 33.0 22.6 10.16 7.23 3.18 1.053 10.38 12.4 2.93 4.05 2.13
1958 33.6 22.9 10.21 7.27 3.22 1.081 10.63 12.7 2.94 4.05 2.14
1959 34.0 23.4 10.65 7.72 3.45 1.194 10.61 12.7 2.93 4.27 2.26
1960 33.5 22.6 10.04 7.13 3.25 1.175 10.90 12.5 2.90 3.88 2.07
1961 34.3 23.5 10.64 7.66 3.65 1.382 10.75 12.9 2.98 4.00 2.27
1962 33.7 22.8 9.95 7.06 3.19 1.161 10.89 12.9 2.89 3.86 2.03
1963 33.8 22.8 9.92 7.00 3.15 1.146 10.94 12.9 2.92 3.85 2.00
1964 34.4 23.5 10.48 7.38 3.37 1.302 10.92 13.0 3.09 4.01 2.07
1965 34.8 23.9 10.89 7.72 3.65 1.489 10.90 13.0 3.17 4.07 2.17
1966 33.7 22.9 10.18 7.22 3.38 1.290 10.75 12.7 2.96 3.83 2.10
1967 34.4 23.7 10.74 7.67 3.68 1.416 10.74 13.0 3.06 4.00 2.26
1968 34.8 24.2 11.21 8.14 4.02 1.615 10.70 12.9 3.07 4.12 2.41
1969 33.9 23.1 10.35 7.45 3.69 1.558 10.85 12.7 2.91 3.75 2.14
1970 32.6 21.7 9.03 6.25 2.77 0.996 10.96 12.6 2.77 3.48 1.78
1971 33.3 22.3 9.40 6.56 2.99 1.114 11.08 12.9 2.83 3.58 1.87
1972 33.6 22.5 9.64 6.78 3.13 1.178 11.07 12.9 2.86 3.65 1.95
1973 33.3 22.2 9.16 6.30 2.76 0.941 11.12 13.1 2.86 3.54 1.82
1974 33.3 22.1 9.12 6.31 2.73 0.879 11.19 13.0 2.82 3.58 1.85
1975 33.4 22.0 8.87 6.07 2.56 0.847 11.45 13.1 2.81 3.50 1.72
1976 33.4 22.0 8.86 6.07 2.60 0.860 11.44 13.1 2.79 3.47 1.74
1977 33.6 22.1 9.03 6.22 2.71 0.924 11.46 13.1 2.81 3.51 1.78
1978 33.5 22.0 8.95 6.16 2.65 0.856 11.45 13.1 2.79 3.51 1.79
1979 34.2 22.9 9.96 7.11 3.44 1.373 11.28 13.0 2.85 3.67 2.07
1980 34.6 23.2 10.02 7.15 3.41 1.276 11.46 13.1 2.87 3.74 2.13
1981 34.5 23.0 10.02 7.23 3.57 1.366 11.51 13.0 2.78 3.67 2.20
1982 35.3 23.8 10.80 7.96 4.18 1.734 11.50 13.0 2.83 3.79 2.44
1983 36.4 24.9 11.55 8.63 4.62 1.884 11.53 13.3 2.92 4.01 2.74
1984 36.7 25.3 11.99 9.04 4.98 2.154 11.45 13.3 2.95 4.06 2.83
1985 37.6 26.1 12.67 9.62 5.32 2.236 11.44 13.4 3.04 4.31 3.08
1986 40.6 29.5 15.92 12.62 7.40 3.344 11.14 13.6 3.29 5.22 4.05
1987 38.2 26.5 12.66 9.45 4.90 1.908 11.71 13.9 3.21 4.55 2.99
1988 40.6 29.3 15.49 12.09 6.80 2.863 11.34 13.8 3.40 5.29 3.94
1989 40.1 28.5 14.49 11.08 6.00 2.455 11.54 14.1 3.41 5.08 3.54
1990 40.0 28.4 14.33 10.94 5.83 2.334 11.57 14.1 3.38 5.12 3.49
1991 39.5 27.7 13.36 9.99 5.12 1.957 11.82 14.4 3.38 4.86 3.17
1992 40.8 29.1 14.67 11.20 6.03 2.463 11.76 14.4 3.47 5.17 3.57
1993 40.7 28.8 14.24 10.78 5.73 2.318 11.85 14.6 3.46 5.05 3.41
1994 40.8 28.9 14.23 10.73 5.70 2.295 11.89 14.7 3.50 5.03 3.41
1995 42.1 30.2 15.23 11.57 6.21 2.463 11.89 15.0 3.66 5.36 3.74
1996 43.5 31.8 16.69 12.91 7.24 3.058 11.73 15.1 3.78 5.67 4.18
1997 44.6 33.1 18.02 14.16 8.19 3.526 11.50 15.1 3.86 5.97 4.66
1998 45.4 34.1 19.09 15.18 9.00 3.923 11.30 15.0 3.91 6.18 5.07
1999 46.5 35.2 20.04 16.04 9.62 4.214 11.25 15.2 4.01 6.41 5.41
2000 47.6 36.6 21.52 17.45 10.88 5.073 11.00 15.1 4.07 6.58 5.80
2001 44.8 33.4 18.22 14.32 8.37 3.700 11.47 15.1 3.90 5.96 4.67
2002 43.8 32.1 16.86 13.04 7.34 3.142 11.75 15.2 3.83 5.70 4.20
2003 44.5 32.8 17.53 13.67 7.87 3.492 11.76 15.2 3.86 5.80 4.38
2004 46.4 35.0 19.75 15.74 9.46 4.342 11.45 15.2 4.01 6.28 5.12
2005 48.3 37.2 21.92 17.77 10.98 5.128 11.18 15.2 4.14 6.79 5.86
2006 49.3 38.1 22.82 18.61 11.59 5.460 11.24 15.3 4.21 7.03 6.13
2007 49.7 38.7 23.50 19.31 12.28 6.036 11.07 15.2 4.19 7.04 6.24
2008 48.2 36.5 20.95 16.87 10.40 5.034 11.71 15.6 4.08 6.47 5.37
2009 46.5 34.1 18.12 14.15 8.29 3.894 12.39 16.0 3.97 5.86 4.40
2010 48.0 35.9 19.86 15.83 9.66 4.779 12.19 16.0 4.03 6.17 4.88
2011 48.1 35.9 19.65 15.55 9.27 4.322 12.24 16.2 4.10 6.28 4.94
2012 50.6 38.8 22.83 18.59 11.71 5.811 11.78 16.0 4.24 6.88 5.90
2013 48.6 36.4 20.01 15.81 9.43 4.466 12.19 16.4 4.20 6.38 4.96
2014 49.9 37.9 21.52 17.23 10.57 5.126 11.95 16.4 4.29 6.66 5.45
2015 50.0 38.0 21.59 17.29 10.61 5.116 11.96 16.4 4.30 6.68 5.49
2016 49.5 37.4 20.70 16.44 9.88 4.669 12.15 16.7 4.26 6.57 5.21
2017 50.6 38.6 21.95 17.63 10.85 5.275 11.96 16.6 4.32 6.78 5.58
2018 50.5 38.5 21.76 17.45 10.79 5.340 12.00 16.8 4.31 6.66 5.45

Top 10%의 소득점유율

소득 상위 10%(P90_100)의 소득점유율 변화

## quartz_off_screen 
##                 3
## quartz_off_screen 
##                 2

Top 10% 분할

소득 상위 10%(P90_100)를 상위 1%(P99_100), 차상위 4%(P95_99), 차차상위 5%(P90_95)로 분할

## quartz_off_screen 
##                 3
## quartz_off_screen 
##                 2

Top 1% 분할

소득 상위 1%(P99_100)를 상위 0.1%(P99.9_100), 차상위 0.4%(P99.5_99.9), 차차상위 0.5%(P99_99.5)로 분할

## quartz_off_screen 
##                 3
## quartz_off_screen 
##                 2

Top 0.1% 분할

소득 상위 0.1%(P99.9_100)를 상위 0.01%(P99.99_100)와 다음 0.09%(P99_9.99.99)로 분할

## quartz_off_screen 
##                 3
## quartz_off_screen 
##                 2

ggplot

Tidy Data

tidyverse 패키지를 이용하여 tidy data

Top 10%의 소득점유(%)

Top 10%의 분할

Top 1%의 분할

Top 0.1%의 분할