标签:desktop aggregate set 说明 mount code ima table 北京
环境: R
研究对象:
1. 二手房数据的区域特征
2. 二手房数据的面积特征
1. 导入原始数据
setwd("/Users/mac/Desktop/lianjia/") d = read.csv("/Users/mac/Desktop/lianjia/Lianjia.csv")
2. 数据清洗
- 将数据设置为数据框格式,并查看数据汇总信息
as.data.frame(d) summary(d)
- 初步观察:一共有11个变量,目标变量为Price
- 移除第六列ID信息,不具有分析价值。添加新的特征每平米房价 PerPrice (总价/面积),并调整列的顺序。
d <- d[,-6] dp <- d$Price/d$Size d2 <- transform(d,PerPrice=dp)
3. 数据可视化
3.1 区域特征分析
#各大区二手房每平米房价对比 means1 <- aggregate(d2$PerPrice, by=list(d2$Region), FUN = mean) #https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/aggregate means1 <- means1[order(means1$x, decreasing = T),] a1 <- means1$x bar1 <- barplot(a1, names.arg = means1$Group.1, family=‘STXihei‘, ylim = c(0,15), main = "各大区每平米房价")
#各大区二手房数量 amount <- table(d2$Region) bar2 <- barplot(sort(amount, decreasing = T), main = "各大区二手房数量", horiz = F, ylim = c(0,4000))
标签:desktop aggregate set 说明 mount code ima table 北京
原文地址:https://www.cnblogs.com/zfkepic/p/12147888.html