R语言数据可视化-散点图

zoufuxian 20190216

散点图绘制

打开软件，然后更改工作文件

install.packages("ggplot2")#安装ggplot2包#

install.packages("xlsx")#安装xlsx包

#若之前安装过则可以不用安装

将数据文件放入工作文件

library(ggplot2)#调用ggplot2包#

library(xlsx)#调用XLSX包

Z

head(Z)#查看前六行数据是否正确

plot(C~A,data = Z)#绘制数据中以C变量为纵坐标，A变量为横坐标的散点图

qplot(C,A,data = Z)#第二种绘制散点图方法，以C为横坐标，A为纵坐标

ggplot(Z,aes(A,C))+

geom_point()#第三种绘制散点图方法，以A为横坐标，C为纵坐标，geom_point代表绘制的是散点图

#这里推荐第三种继续讲解

#Z为数据集，A为横坐标，C为纵坐标

#颜色以F为权重，数字越大颜色越深，也可以将B改为red，则所有散点均为红色

#颜色也可以设置为不同类别，可以不用数字填写

#散点大小以B为权重，数字越大，则点越大

#geom_smooth中引号内loess代表局部多项式回归拟合，若替换为lm则为线性拟合

#se代表是否显示置信区间（默认区间0.95），拟合线为黑色

#geom_text增加散点的标签,后面是使标签相对散点向Y轴上移2个单位，若不需要显示标签，删除本行即可

#修改横纵坐标名称

#alpha设置散点透明度(0-1)之间

ggplot(Z,aes(x=A,y=C,size=B,colour=F))+

geom_smooth(method ="loess",se=TRUE,level=0.95,colour="black")+

geom_text(aes(label=E,y=C+2))+

labs(x="横坐标名称",y="纵坐标名称")+

geom_point(alpha = 0.5)

全部代码：

install.packages("ggplot2")#安装ggplot2包#

install.packages("xlsx")#安装xlsx包

#若之前安装过则可以不用安装

library(ggplot2)

library(xlsx)

Z

head(Z)

ggplot(Z,aes(x=A,y=C,size=B,colour=F))+

geom_smooth(method = "loess",se=TRUE,level=0.95,colour="black")+

geom_text(aes(label=E,y=C+2))+

labs(x="横坐标名称",y="纵坐标名称")+

geom_point(alpha = 0.5)

代码文件下载

示范文件下载

参考：https://blog.csdn.net/guomj_cdc/article/details/78308915