ggplot高級繪圖舉例

一雹舀、cars包中的Salaries數(shù)據(jù)集

1.查看原數(shù)據(jù)結(jié)構(gòu)

library(ggplot2)
library(car)
head(Salaries)

原數(shù)據(jù)前六行

其中rank為學(xué)術(shù)等級绎狭,sex為性別,yrs.since.phd為獲得博士學(xué)位的年數(shù),yrs.service為工齡竞穷,salary為9個月的薪水。
2.查看薪水如何隨學(xué)術(shù)等級變化

ggplot(Salaries,aes(x=salary,fill=rank))+geom_density()

數(shù)據(jù)有重疊系吩,調(diào)整透明度

ggplot(Salaries,aes(x=salary,fill=rank))+geom_density(alpha=.3)


3.查看博士學(xué)位畢業(yè)年數(shù)與薪水關(guān)系

ggplot(Salaries,aes(x=yrs.since.phd,y=salary,color=rank,shape=sex))+geom_point()

修改為刻面圖

ggplot(Salaries,aes(x=yrs.since.phd,y=salary,color=rank,shape=sex))+geom_point()+facet_grid(.~sex)

暫時忽略性別和學(xué)術(shù)等級来庭,做非參數(shù)光滑曲線loess,即默認(rèn)值smooth

ggplot(Salaries,aes(x=yrs.since.phd,y=salary))+geom_point()+geom_smooth()

顯示不是線性的關(guān)系穿挨,則按性別擬合一個二次多項式回歸

ggplot(Salaries,aes(x=yrs.since.phd,y=salary,linetype=sex,shape=sex,color=sex))+geom_point(size=2)+geom_smooth(method=lm,formula = y~poly(x,2),se=FALSE,size=1)

得出男性從0-30增加然后下降月弛,女性一直上升,數(shù)據(jù)集中沒有女性獲得博士學(xué)位超過40年科盛,男性大部分可以拿到很高的薪水帽衙。

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市贞绵,隨后出現(xiàn)的幾起案子厉萝,更是在濱河造成了極大的恐慌,老刑警劉巖榨崩,帶你破解...
    沈念sama閱讀 217,657評論 6 505
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件谴垫,死亡現(xiàn)場離奇詭異,居然都是意外死亡母蛛,警方通過查閱死者的電腦和手機翩剪,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,889評論 3 394
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來彩郊,“玉大人前弯,你說我怎么就攤上這事★牛” “怎么了恕出?”我有些...
    開封第一講書人閱讀 164,057評論 0 354
  • 文/不壞的土叔 我叫張陵,是天一觀的道長违帆。 經(jīng)常有香客問我浙巫,道長,這世上最難降的妖魔是什么前方? 我笑而不...
    開封第一講書人閱讀 58,509評論 1 293
  • 正文 為了忘掉前任狈醉,我火速辦了婚禮,結(jié)果婚禮上惠险,老公的妹妹穿的比我還像新娘苗傅。我一直安慰自己,他們只是感情好班巩,可當(dāng)我...
    茶點故事閱讀 67,562評論 6 392
  • 文/花漫 我一把揭開白布渣慕。 她就那樣靜靜地躺著嘶炭,像睡著了一般。 火紅的嫁衣襯著肌膚如雪逊桦。 梳的紋絲不亂的頭發(fā)上眨猎,一...
    開封第一講書人閱讀 51,443評論 1 302
  • 那天,我揣著相機與錄音强经,去河邊找鬼睡陪。 笑死,一個胖子當(dāng)著我的面吹牛匿情,可吹牛的內(nèi)容都是我干的兰迫。 我是一名探鬼主播,決...
    沈念sama閱讀 40,251評論 3 418
  • 文/蒼蘭香墨 我猛地睜開眼炬称,長吁一口氣:“原來是場噩夢啊……” “哼汁果!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起玲躯,我...
    開封第一講書人閱讀 39,129評論 0 276
  • 序言:老撾萬榮一對情侶失蹤据德,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后跷车,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體棘利,經(jīng)...
    沈念sama閱讀 45,561評論 1 314
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 37,779評論 3 335
  • 正文 我和宋清朗相戀三年朽缴,在試婚紗的時候發(fā)現(xiàn)自己被綠了赡译。 大學(xué)時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 39,902評論 1 348
  • 序言:一個原本活蹦亂跳的男人離奇死亡不铆,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出裹唆,到底是詐尸還是另有隱情誓斥,我是刑警寧澤,帶...
    沈念sama閱讀 35,621評論 5 345
  • 正文 年R本政府宣布许帐,位于F島的核電站劳坑,受9級特大地震影響,放射性物質(zhì)發(fā)生泄漏成畦。R本人自食惡果不足惜距芬,卻給世界環(huán)境...
    茶點故事閱讀 41,220評論 3 328
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望循帐。 院中可真熱鬧框仔,春花似錦、人聲如沸拄养。這莊子的主人今日做“春日...
    開封第一講書人閱讀 31,838評論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至跛梗,卻和暖如春寻馏,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背核偿。 一陣腳步聲響...
    開封第一講書人閱讀 32,971評論 1 269
  • 我被黑心中介騙來泰國打工诚欠, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人漾岳。 一個月前我還...
    沈念sama閱讀 48,025評論 2 370
  • 正文 我出身青樓轰绵,卻偏偏與公主長得像,于是被迫代替她去往敵國和親蝗羊。 傳聞我的和親對象是個殘疾皇子藏澳,可洞房花燭夜當(dāng)晚...
    茶點故事閱讀 44,843評論 2 354

推薦閱讀更多精彩內(nèi)容

  • ggplot2包的目的是提供一個全面的、基于語法的耀找、連貫一致的圖形生成系統(tǒng)翔悠,允許用戶創(chuàng)建新穎的、有創(chuàng)新性的數(shù)據(jù)可視...
    井底蛙蛙呱呱呱閱讀 3,395評論 0 11
  • 以三個數(shù)據(jù)集解釋ggplot2的使用野芒。第一個是lattice包中的singer數(shù)據(jù)集蓄愁,它包括紐約合唱團(tuán)歌手的高度和...
    王詩翔閱讀 18,004評論 8 54
  • 首頁 資訊 文章 資源 小組 相親 登錄 注冊 首頁 最新文章 IT 職場 前端 后端 移動端 數(shù)據(jù)庫 運維 其他...
    Helen_Cat閱讀 3,874評論 1 10
  • 今天晚上八點是五星巴西對哥斯達(dá)黎加,本想是一場沒有懸念的比賽狞悲,巴西在世界足壇的底蘊撮抓,如果巴西說自己第二,可能沒...
    姚常春閱讀 237評論 2 1
  • 文/墨染書香 紅塵幾許 不過是歲月輪回中的背影相望 幽林深巷 不知靜藏了多少詩云子墨的絕唱 芳草斜陽 到底蹉跎了多...
    海洋的筆閱讀 386評論 2 2