ggplot散點圖加相關系數(shù)

計算一組數(shù)據(jù)有沒有相關性以及相關程度時勃教,可以使用cor()淤击,以及cor.test()計算顯著性,如下所示故源,我們想計算這兩種花的長度有沒有相關性遭贸。

head(iris)
plot(iris$Sepal.Length,iris$Petal.Length)
cor(iris$Sepal.Length,iris$Petal.Length)
#[1] 0.8717538
cor.test(iris$Sepal.Length,iris$Petal.Length)


#   Pearson's product-moment correlation

#data:  iris$Sepal.Length and iris$Petal.Length
#t = 21.646, df = 148, p-value < 2.2e-16
#alternative hypothesis: true correlation is not equal to 0
#95 percent confidence interval:
# 0.8270363 0.9055080
#sample estimates:
#     cor 
#0.8717538

我們可以手動將計算的相關系數(shù)以及p-value加在圖上,也可以直接使用ggpubr包中的stat_cor()來將散點圖直接標記相關系數(shù)以及p-value心软。

library(ggplot2)
library(ggpubr)
ggplot(iris, aes(x=iris$Sepal.Length, y=iris$Petal.Length)) + 
  geom_point()+ geom_smooth(method = 'lm', se = F, color = 'red')+theme_bw()+stat_cor(data=iris, method = "spearman")
?著作權歸作者所有,轉載或內容合作請聯(lián)系作者
  • 序言:七十年代末壕吹,一起剝皮案震驚了整個濱河市,隨后出現(xiàn)的幾起案子删铃,更是在濱河造成了極大的恐慌耳贬,老刑警劉巖,帶你破解...
    沈念sama閱讀 206,126評論 6 481
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件猎唁,死亡現(xiàn)場離奇詭異咒劲,居然都是意外死亡,警方通過查閱死者的電腦和手機诫隅,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 88,254評論 2 382
  • 文/潘曉璐 我一進店門腐魂,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人逐纬,你說我怎么就攤上這事蛔屹。” “怎么了豁生?”我有些...
    開封第一講書人閱讀 152,445評論 0 341
  • 文/不壞的土叔 我叫張陵兔毒,是天一觀的道長。 經(jīng)常有香客問我甸箱,道長育叁,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 55,185評論 1 278
  • 正文 為了忘掉前任芍殖,我火速辦了婚禮豪嗽,結果婚禮上,老公的妹妹穿的比我還像新娘豌骏。我一直安慰自己龟梦,他們只是感情好,可當我...
    茶點故事閱讀 64,178評論 5 371
  • 文/花漫 我一把揭開白布肯适。 她就那樣靜靜地躺著变秦,像睡著了一般。 火紅的嫁衣襯著肌膚如雪框舔。 梳的紋絲不亂的頭發(fā)上,一...
    開封第一講書人閱讀 48,970評論 1 284
  • 那天,我揣著相機與錄音刘绣,去河邊找鬼樱溉。 笑死,一個胖子當著我的面吹牛纬凤,可吹牛的內容都是我干的福贞。 我是一名探鬼主播,決...
    沈念sama閱讀 38,276評論 3 399
  • 文/蒼蘭香墨 我猛地睜開眼停士,長吁一口氣:“原來是場噩夢啊……” “哼挖帘!你這毒婦竟也來了?” 一聲冷哼從身側響起恋技,我...
    開封第一講書人閱讀 36,927評論 0 259
  • 序言:老撾萬榮一對情侶失蹤拇舀,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后蜻底,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體骄崩,經(jīng)...
    沈念sama閱讀 43,400評論 1 300
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內容為張勛視角 年9月15日...
    茶點故事閱讀 35,883評論 2 323
  • 正文 我和宋清朗相戀三年薄辅,在試婚紗的時候發(fā)現(xiàn)自己被綠了要拂。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 37,997評論 1 333
  • 序言:一個原本活蹦亂跳的男人離奇死亡站楚,死狀恐怖脱惰,靈堂內的尸體忽然破棺而出,到底是詐尸還是另有隱情窿春,我是刑警寧澤枪芒,帶...
    沈念sama閱讀 33,646評論 4 322
  • 正文 年R本政府宣布,位于F島的核電站谁尸,受9級特大地震影響舅踪,放射性物質發(fā)生泄漏。R本人自食惡果不足惜良蛮,卻給世界環(huán)境...
    茶點故事閱讀 39,213評論 3 307
  • 文/蒙蒙 一抽碌、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧决瞳,春花似錦货徙、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,204評論 0 19
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至屡贺,卻和暖如春蠢棱,著一層夾襖步出監(jiān)牢的瞬間锌杀,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 31,423評論 1 260
  • 我被黑心中介騙來泰國打工泻仙, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留糕再,地道東北人。 一個月前我還...
    沈念sama閱讀 45,423評論 2 352
  • 正文 我出身青樓玉转,卻偏偏與公主長得像突想,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子究抓,可洞房花燭夜當晚...
    茶點故事閱讀 42,722評論 2 345

推薦閱讀更多精彩內容