|
自 R 實(shí)戰(zhàn) 1. 可以使用 order 函數(shù)對(duì)數(shù)據(jù)框排序，默認(rèn)升序，在排序變量前加一個(gè)減號(hào)，即可得到降序排列。 data.frame[order(data.frame$a),] 在R中，和排序相關(guān)的函數(shù)主要有三個(gè)：sort()，rank()，order()。 下面以一小段R代碼來(lái)舉例說(shuō)明： > x<-c(97,93,85,74,32,100,99,67) > sort(x) [1] > order(x) [1] 5 8 4 3 2 1 7 6 > rank(x) [1] 6 5 4 3 1 8 7 2 假設(shè)x為一組學(xué)生完成某項(xiàng)測(cè)試所花費(fèi)的時(shí)間（所用時(shí)間越短，排名越靠前），rank()的返回值是這組學(xué)生所對(duì)應(yīng)的排名，而order()的返回值是各個(gè)排名的學(xué)生成績(jī)所在向量中的位置。 前一段同學(xué)問(wèn)我一個(gè)問(wèn)題，如何返回一個(gè)數(shù)值向量中滿足某條件的元素在向量中的位置？舉例來(lái)說(shuō)，x<-c(97,93,85,74,32,100,99,67)，希望返回x中滿足值大于50且小于90的元素在向量x中的下標(biāo)。當(dāng)時(shí)想了想，沒(méi)覺(jué)得有什么好的方法，使用了比較繁瑣的語(yǔ)句 sort(x,index.return=TRUE)[[2]][sort(x,index.return=TRUE)[[1]]<90&sort(x,index.return=TRUE)[[1]]>50]，后來(lái)發(fā)現(xiàn)sort(x,index.return=TRUE)[[2]]和order(x)的返回值是一樣的，而sort(x,index.return=TRUE)[[1]]和sort(x)的返回值是相同的，因此語(yǔ)句可以簡(jiǎn)化為order(x)[sort(x)>50&sort(x)<90]。下面是相關(guān)的R代碼： > x [1] > sort(x,index.return=TRUE)[[2]][sort(x,index.return=TRUE)[[1]]<90&sort(x,index.return=TRUE)[[1]]>50] [1] 8 4 3 > order(x)[sort(x)>50&sort(x)<90] [1] 8 4 3 > sort(x,index.return=TRUE) $x [1] $ix [1] 5 8 4 3 2 1 7 6 > order(x) [1] 5 8 4 3 2 1 7 6 或許還有更加方便的方法，比如R中有簡(jiǎn)單的函數(shù)可以直接利用，但是暫時(shí)還沒(méi)有找到，以后碰到牛銀再請(qǐng)求指點(diǎn)吧！ |
|
|
