R語(yǔ)言雜談(二)

1.向量中的元素獲取 [,[[,$

1.1靠位置來(lái)獲取元素

x<-seq(8,12) #產(chǎn)生8,9睦霎,10梢卸,11,12

x[4] #產(chǎn)生11

x[-4] #產(chǎn)生8副女,9蛤高,10,12

x[2:4] #產(chǎn)生9肮塞,10襟齿,11

x[-(2:4)] #產(chǎn)生8,12

x[c(1,5)] #產(chǎn)生8姻锁,12

1.2 靠邏輯獲取數(shù)據(jù)

x[x==10]? #產(chǎn)生10枕赵,x==10產(chǎn)生F,F,T,F

x[x<12]? #產(chǎn)生8,9位隶,10拷窜,11

x[x %in% c(9,13)]? #產(chǎn)生9

1.3 靠名稱(chēng)獲取數(shù)據(jù)

names(x) <-c("a","b","c","d","e")

x["c"] #產(chǎn)生10

2. 矩陣中的元素獲取

x<- seq(1:9)

m<- matrix(x, nrow=3, ncol=3)

colnames(m) <-c("a","b","c")

a b c

1 4 7

2 5 8

3 6 9

class(m) #輸出為"matrix"

m[,1] 產(chǎn)生123 #[行,列]

m[2,3] 產(chǎn)生8 第二行第三列

3. data.frame 的元素獲取

df <-data.frame(xz=1:3, y=c("a","b","c")) #產(chǎn)生的data.frame如下

xz y

1 a

2 b

3 c

df[1] #返回的是第一列xz123

class(df[1]) #返回的還是data.frame

df[[1]] #返回的是123,會(huì)破壞數(shù)據(jù)框的結(jié)構(gòu)

class(df[[1]]) #返回的是"integer"

df$xz #返回的是123,df$列名篮昧,這里class后是integer赋荆,$會(huì)不完全匹配,如df$x返回的也是123

subset函數(shù)也能起到這樣的作用懊昨,subset(df, subset=xz>1, select=y) #返回的是bc窄潭,subset(數(shù)據(jù),行酵颁,列)

數(shù)據(jù)框是特殊的列表嫉你,矩陣是特殊的數(shù)據(jù)框,構(gòu)成的元素是向量

4.字符串的元素獲取

4.1截取字符串

substr(x, start, stop)

substring(x,first, last)

舉個(gè)例子躏惋,test<-"I LOVE YOU"

substr(test,3,6) #返回的是"LOVE"

substring(test,3) #返回的是"LOVE YOU"

4.2 拆分字符串

strsplit(x, split, extended=TRUE, fixed=FALSE, perl=FALSE)

unlist(strsplit("a.b.c", "\\.") )#返回的是 "a" "b" "c",因?yàn)?本身代表了所有元字符(也就是所有字符)幽污,因此需要\\.表示.而不是任意字符,否則會(huì)切割所有字符而不是.

4.3 連接字符串

paste(..., sep="", collapse=NULL)

paste("a","b","c", sep=".") #返回的是"a.b.c"

paste("A",1:6, sep=") #返回的是"A1""A2""A3""A4""A5""A6",這里的"表示去除A與數(shù)字間的間隙

paste("A", 1:6,sep="-") #返回的是"A-1"到"A-6"

paste("A", 1:6, sep="-", collapse="=") #返回的是"A-1=A-2=A-3=A-4=A-5=A-6"

paste0("A","B","C") #返回的是"ABC"

4.4 字符串計(jì)數(shù)

nchar(test) #返回的是該字符串中有多少字符簿姨,10

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末距误,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子扁位,更是在濱河造成了極大的恐慌准潭,老刑警劉巖,帶你破解...
    沈念sama閱讀 216,919評(píng)論 6 502
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件贤牛,死亡現(xiàn)場(chǎng)離奇詭異惋鹅,居然都是意外死亡,警方通過(guò)查閱死者的電腦和手機(jī)殉簸,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,567評(píng)論 3 392
  • 文/潘曉璐 我一進(jìn)店門(mén)闰集,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人般卑,你說(shuō)我怎么就攤上這事武鲁。” “怎么了蝠检?”我有些...
    開(kāi)封第一講書(shū)人閱讀 163,316評(píng)論 0 353
  • 文/不壞的土叔 我叫張陵沐鼠,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我叹谁,道長(zhǎng)饲梭,這世上最難降的妖魔是什么? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 58,294評(píng)論 1 292
  • 正文 為了忘掉前任焰檩,我火速辦了婚禮憔涉,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘析苫。我一直安慰自己兜叨,他們只是感情好穿扳,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,318評(píng)論 6 390
  • 文/花漫 我一把揭開(kāi)白布。 她就那樣靜靜地躺著国旷,像睡著了一般矛物。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上跪但,一...
    開(kāi)封第一講書(shū)人閱讀 51,245評(píng)論 1 299
  • 那天履羞,我揣著相機(jī)與錄音,去河邊找鬼屡久。 笑死吧雹,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的涂身。 我是一名探鬼主播雄卷,決...
    沈念sama閱讀 40,120評(píng)論 3 418
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼蛤售!你這毒婦竟也來(lái)了丁鹉?” 一聲冷哼從身側(cè)響起,我...
    開(kāi)封第一講書(shū)人閱讀 38,964評(píng)論 0 275
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤悴能,失蹤者是張志新(化名)和其女友劉穎揣钦,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體漠酿,經(jīng)...
    沈念sama閱讀 45,376評(píng)論 1 313
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡冯凹,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 37,592評(píng)論 2 333
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了炒嘲。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片宇姚。...
    茶點(diǎn)故事閱讀 39,764評(píng)論 1 348
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖夫凸,靈堂內(nèi)的尸體忽然破棺而出浑劳,到底是詐尸還是另有隱情,我是刑警寧澤夭拌,帶...
    沈念sama閱讀 35,460評(píng)論 5 344
  • 正文 年R本政府宣布魔熏,位于F島的核電站,受9級(jí)特大地震影響鸽扁,放射性物質(zhì)發(fā)生泄漏蒜绽。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,070評(píng)論 3 327
  • 文/蒙蒙 一桶现、第九天 我趴在偏房一處隱蔽的房頂上張望躲雅。 院中可真熱鬧,春花似錦巩那、人聲如沸吏夯。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 31,697評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)噪生。三九已至,卻和暖如春东囚,著一層夾襖步出監(jiān)牢的瞬間跺嗽,已是汗流浹背。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 32,846評(píng)論 1 269
  • 我被黑心中介騙來(lái)泰國(guó)打工页藻, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留桨嫁,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 47,819評(píng)論 2 370
  • 正文 我出身青樓份帐,卻偏偏與公主長(zhǎng)得像璃吧,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子废境,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 44,665評(píng)論 2 354

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