R語(yǔ)言學(xué)習(xí)筆記11-繪圖篇

- plot
    - plot(c(1,2,3),c(1,2,4))    # draw 3 points (1,1) (2,2) (3,4)
    - plot(c(-3,3),c(-1,5),type="n")    # draw a blank canvas, only axis no content
    - x<-c(1,2,3)
    - y<-c(1,3,8)
    - plot(x,y)
    - lmout<-lm(y~x)    # linear regression
    - abline(lmout)    # draw line
    - lines(c(1.5,2.5),c(3,3)) # draw line with 2 points
    - plot(x,y,type="l")    # draw broken line
    - hist(x)
    - x11()    # pop a window on linux
    - hist(y)    # draw y hist on new window
    - d1=density(testscores$Exam1,from=0,to=100)
    - d2=density(testscores$Exam2,from=0,to=100)
    - plot(d1,main="",xlab="")
    - lines(d2)
    - points(testscores$Exam1,testscores$Exam3,pch="+")    # mark point with +
    - par(bg="yellow")    # yellow background
    - text(2.5,4,"abc")    # place text on axis(2.5,4)
    - hist(c(12,5,13,25,16))
    - locator(1)    # give the exact axis on hist diagram once
    - text(locator(1),"nv=75")    # place the text on locator 1's position on diagram
    - text(2.5,4,"abc",cex=1.5)    # 1.5 times bigger than normal's
    - f<-function(x) return(1-exp(-x))
    - curve(f,0,2)    # draw curve, x starts from 0.2, else from 0 by default
    - polygon(c(1.2,1.4,1.4,1.2),c(0,0,f(1.3),f(1.3)),col="gray")    # x of 1.2 1.4 1.4 1.2
    - plot(testscores)
    - lines(lowess(testscores))    # smooth
    - curve((x^2+1)^0.5,0.5,add=T)    # draw curve on current canvas
    - pdf("d12.pdf')
    - dev.list()    # show devices
    - dev.cur()
        - pdf 3
    - dev.off()
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市洛波,隨后出現(xiàn)的幾起案子胰舆,更是在濱河造成了極大的恐慌,老刑警劉巖蹬挤,帶你破解...
    沈念sama閱讀 211,561評(píng)論 6 492
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件缚窿,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡焰扳,警方通過(guò)查閱死者的電腦和手機(jī)倦零,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 90,218評(píng)論 3 385
  • 文/潘曉璐 我一進(jìn)店門(mén)误续,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人扫茅,你說(shuō)我怎么就攤上這事蹋嵌。” “怎么了葫隙?”我有些...
    開(kāi)封第一講書(shū)人閱讀 157,162評(píng)論 0 348
  • 文/不壞的土叔 我叫張陵栽烂,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我停蕉,道長(zhǎng)愕鼓,這世上最難降的妖魔是什么? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 56,470評(píng)論 1 283
  • 正文 為了忘掉前任慧起,我火速辦了婚禮菇晃,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘蚓挤。我一直安慰自己磺送,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,550評(píng)論 6 385
  • 文/花漫 我一把揭開(kāi)白布灿意。 她就那樣靜靜地躺著估灿,像睡著了一般。 火紅的嫁衣襯著肌膚如雪缤剧。 梳的紋絲不亂的頭發(fā)上馅袁,一...
    開(kāi)封第一講書(shū)人閱讀 49,806評(píng)論 1 290
  • 那天,我揣著相機(jī)與錄音荒辕,去河邊找鬼汗销。 笑死,一個(gè)胖子當(dāng)著我的面吹牛抵窒,可吹牛的內(nèi)容都是我干的弛针。 我是一名探鬼主播,決...
    沈念sama閱讀 38,951評(píng)論 3 407
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼李皇,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼削茁!你這毒婦竟也來(lái)了?” 一聲冷哼從身側(cè)響起掉房,我...
    開(kāi)封第一講書(shū)人閱讀 37,712評(píng)論 0 266
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤茧跋,失蹤者是張志新(化名)和其女友劉穎,沒(méi)想到半個(gè)月后卓囚,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體瘾杭,經(jīng)...
    沈念sama閱讀 44,166評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,510評(píng)論 2 327
  • 正文 我和宋清朗相戀三年捍岳,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了富寿。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點(diǎn)故事閱讀 38,643評(píng)論 1 340
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡锣夹,死狀恐怖页徐,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情银萍,我是刑警寧澤变勇,帶...
    沈念sama閱讀 34,306評(píng)論 4 330
  • 正文 年R本政府宣布,位于F島的核電站贴唇,受9級(jí)特大地震影響搀绣,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜戳气,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,930評(píng)論 3 313
  • 文/蒙蒙 一链患、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧瓶您,春花似錦麻捻、人聲如沸。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 30,745評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)。三九已至夜赵,卻和暖如春明棍,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背寇僧。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 31,983評(píng)論 1 266
  • 我被黑心中介騙來(lái)泰國(guó)打工摊腋, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人婉宰。 一個(gè)月前我還...
    沈念sama閱讀 46,351評(píng)論 2 360
  • 正文 我出身青樓歌豺,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國(guó)和親心包。 傳聞我的和親對(duì)象是個(gè)殘疾皇子类咧,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,509評(píng)論 2 348

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