一. 讀取數(shù)據(jù)
因為我們一般自己錄的數(shù)據(jù)都是excel表格的贞铣，對于讀取excel闹啦，此處有一個小技巧
讀取excel方法
1.把excel文件另存為CSV文件
1png
2.png
3.png
4.png
2.按照讀取csv文件方法讀取
dat <- read.table("excel1.csv",sep=",",header = TRUE)
此名為excel1文件被R語言讀取
二. 利用ggplot2畫圖
1.加載ggplot2包
library(ggplot2)#加載ggplot2包
注意此處初學者容易出現(xiàn)一個錯誤，ggplot并不是R包辕坝，而是ggplot2包中的函數(shù)窍奋，所以你如果加載或安裝ggplot那肯定會是提示無法加載或安裝的
問題是它還會加載進度條，最后安裝失敗酱畅，所以反反復復會讓你懷疑人生琳袄，我就這樣試過
QQ截圖20190322211336.jpg
QQ截圖20190322211351.jpg
2.畫出散點圖
ggplot(data=dat, aes(x=gene, y=gene2))+geom_point(color="red")
#data=后跟需要畫圖的數(shù)據(jù)的文件名
#X=后跟作為X軸的數(shù)據(jù)的那一列的列名
#Y=后跟作為Y軸的數(shù)據(jù)的那一列的列名
#geom_point函數(shù)是個性化設置散點圖點的形狀，顏色纺酸，大小等窖逗，此處只設置了顏色，有需要可自行加入
Rplot.jpeg
3.畫出擬合曲線
ggplot(data=dat, aes(x=gene, y=gene2))+geom_point(color="red")+stat_smooth(method="lm",se=FALSE)
#stat_smooth是畫擬合曲線的函數(shù)
#se=FALSE意思為不畫出置信區(qū)間
有se=FALSE的運行結果
無se=FALSE的運行結果
4.進行相關性分析
library(ggpubr)
ggplot(data=dat, aes(x=gene, y=gene2))+geom_point(color="red")+stat_smooth(method="lm",se=FALSE)++stat_cor(data=dat, method = "pearson")
#stat_cor(data=dat, method = "pearson")意為用pearson相關進行相關性分析吁峻，可以自行更改方法
具有散點圖滑负、擬合線、相關系數(shù)用含、P值的相關分析圖片就出來了
注意此處有一個易錯點矮慕，就是忘記加載ggpubr，因為stat_cor是ggpubr包中的啄骇，如果未加載ggpubr包痴鳄，則會出現(xiàn)
忘記加載ggpubr
此處有一個小技巧分享，當我們新手發(fā)現(xiàn)某個函數(shù)不可用時缸夹，利用痪寻？?stat_cor去查說明書，可以看到此函數(shù)屬于哪個包虽惭，再加載或安裝這個包橡类，函數(shù)不可用這個問題就解決了
利用？?stat_cor去查說明書
得知函數(shù)屬于哪個包
