load("D:/DB/R/project_housing/housingwork_20210720.RData")
table1
## c1_1g1
## time 1 2 3 4 5 6 7
## 1980s 521 32 7 3 1 31 0
## 1990s 978 70 6 5 1 46 0
## 2000s 1398 78 14 1 2 35 0
## 2010s 1247 63 3 3 0 42 3
hist(ru80_19$c1_1d1,
xlab = "建设时间",
ylab = "建房数量",
main = "农房建设时间分布图(1980-2019)")
hist(ru08_191$c1_1a1,
breaks = 10,
xlab = "占地面积",
main = "农村住房占地面积分布图")