ggplot2 画图
-
基本要素
- Data
- Mapping
- Geometric
- Scale
- Statistics
- Coordinate
- Layer
- Facet
- Theme -
查看ggplot2 里的 geom_函数
ls("package:ggplot2"
-
散点图 geom_point()
x+y
p <- ggplot(data = st.kilda, mapping = aes(x = BuildingArea, y = Price/1000)) p + geom_point()```
x + y + shape
p <- ggplot(data = st.kilda, mapping = aes(x = BuildingArea, y = Price/1000, shape = Type))
p + geom_point()
4. 直方图 geom_histogram()
x
h <- ggplot(data = st.kilda, mapping = aes(x = Price/1000))
h + geom_histogram()
x + fill
h <- ggplot(data = st.kilda, mapping = aes(x = Price/1000, fill = Type))
h + geom_histogram()
5. 柱状图 geom_bar()
x
c <- ggplot(data = st.kilda, mapping = aes(x = Rooms))
c + geom_bar()
6. 密度函数图 geom_density()
x+color
d <- ggplot(data = st.kilda, mapping = aes(x = Price/1000, color = Type))
d + geom_density()
7. 箱式图 geom_boxplot()
x + y + fill
b <- ggplot(data = st.kilda, mapping = aes(x = Type, y=Price/1000, fill = Method))
b + geom_boxplot()
8. 标尺 scale
s<- ggplot(data = st.kilda, mapping = aes(x = BuildingArea, y = Price/1000, shape = Type, color = Method))
s + geom_point() + scale_y_log10()+scale_color_manual(values = rainbow(5))
坐标变换 之前
s + geom_point()
- 统计变换 stat_
S <-ggplot(data = st.kilda, mapping = aes(x = BuildingArea, y = Price/1000))
S + geom_point()+scale_y_log10()+stat_smooth()
- 坐标 coord_
x + fill
B <- ggplot(data = st.kilda, mapping = aes(x = Type, fill = Type))
B + geom_bar()+coord_flip()
B + geom_bar() + coord_polar(theta = "y")
t<- ggplot(data = st.kilda, mapping = aes(x = factor(1), fill = Type))
t + geom_bar() + coord_polar(theta = "y")
t + geom_bar() + coord_polar()
w<- ggplot(data = st.kilda, mapping = aes(x = Method, fill = Type))
w + geom_bar()+coord_polar()
- 分面
P <- ggplot(data = st.kilda, mapping = aes(x = BuildingArea, y = Price/1000))
P + geom_point(aes(color = Method))+scale_y_log10()+facet_wrap(~Method)+stat_smooth()