零散内容

1.ls("packege:包名")

显示包内所有函数

> ls("package:stringr")
 [1] "%>%"             "boundary"        "coll"           
 [4] "fixed"           "fruit"           "invert_match"   
 [7] "regex"           "sentences"       "str_c"          
[10] "str_conv"        "str_count"       "str_detect"     
[13] "str_dup"         "str_ends"        "str_extract"    
[16] "str_extract_all" "str_flatten"     "str_glue"       
[19] "str_glue_data"   "str_interp"      "str_length"     
[22] "str_locate"      "str_locate_all"  "str_match"      
[25] "str_match_all"   "str_order"       "str_pad"        
[28] "str_remove"      "str_remove_all"  "str_replace"    
[31] "str_replace_all" "str_replace_na"  "str_sort"       
[34] "str_split"       "str_split_fixed" "str_squish"     
[37] "str_starts"      "str_sub"         "str_sub<-"      
[40] "str_subset"      "str_to_lower"    "str_to_sentence"
[43] "str_to_title"    "str_to_upper"    "str_trim"       
[46] "str_trunc"       "str_view"        "str_view_all"   
[49] "str_which"       "str_wrap"        "word"           
[52] "words"

同时芯片注释包通过用此语句可以知道基因命名的方式有哪些

> ls("package:hgu133a.db")
 [1] "hgu133a"              "hgu133a_dbconn"      
 [3] "hgu133a_dbfile"       "hgu133a_dbInfo"      
 [5] "hgu133a_dbschema"     "hgu133a.db"          
 [7] "hgu133aACCNUM"        "hgu133aALIAS2PROBE"  
 [9] "hgu133aCHR"           "hgu133aCHRLENGTHS"   
[11] "hgu133aCHRLOC"        "hgu133aCHRLOCEND"    
[13] "hgu133aENSEMBL"       "hgu133aENSEMBL2PROBE"
[15] "hgu133aENTREZID"      "hgu133aENZYME"       
[17] "hgu133aENZYME2PROBE"  "hgu133aGENENAME"     
[19] "hgu133aGO"            "hgu133aGO2ALLPROBES" 
[21] "hgu133aGO2PROBE"      "hgu133aMAP"          
[23] "hgu133aMAPCOUNTS"     "hgu133aOMIM"         
[25] "hgu133aORGANISM"      "hgu133aORGPKG"       
[27] "hgu133aPATH"          "hgu133aPATH2PROBE"   
[29] "hgu133aPFAM"          "hgu133aPMID"         
[31] "hgu133aPMID2PROBE"    "hgu133aPROSITE"      
[33] "hgu133aREFSEQ"        "hgu133aSYMBOL"       
[35] "hgu133aUNIGENE"       "hgu133aUNIPROT"

2.保留最大值并去除重复

先用order进行倒叙排列，再！duplicated去除重复。

ids <- ids[order(ids$symbol,ids$median,decreasing = T),]
ids <- ids[!duplicated(ids$symbol),]

3.获得排列后的行名

对矩阵用apply处理时，会产生行名或列名对应的查找表，可用names函数将名称导出

> a <- matrix(rnorm(10*10),nrow = 10)
> row.names(a) <- paste0("A",1:10)
> names(sort(apply(a,1,sd),decreasing = T))
 [1] "A8"  "A7"  "A10" "A3"  "A2"  "A1"  "A4"  "A5"  "A6" 
[10] "A9"