摘要：
引用：http://www.biostatistic.net/thread-98-1-1.html1 直接用system（）命令 比如有个test.R程序，可以通过下面的方式调用： system("R <test.R --vanilla")如果要调用可执行程序，如：lwolf.exe只需： system("lwolf.exe") 阅读全文
摘要：
R 字符串处理1 #字符串连接：paste() #paste(..., sep = " ", collapse = NULL)> paste("a","b","c",sep=">")[1] "a>b>c"2 字符串分割：strsplit() #strsplit(x, split, extended = TRUE, fixed = FALSE, perl = FALSE)> strsplit("a>b>c",&quo 阅读全文
摘要：
批量读取本地文件在批量读取文档时一般先将其存放在某一个目录下。先用dir()函数获取目录中的文件名，然后用paste()将路径合成，最后用循环或向量化方法处理文档。例如：doc.names <- dir("path") doc.path <- sapply(doc.names,function(names) paste(path,names,sep='/')) doc <- sapply(doc.path, function(doc) readLines(doc)) 阅读全文
摘要：
R graph：如何自定义坐标轴刻度标示(tick label)这里要说的不是轴标。轴标用xlab或者ylab赋值。我要说的是轴上的刻度标志（tickmark）相对应的那些标识（labels)如何自定义。首先要在plot里面压制自动生成坐标轴；因为你想自定义，当然需要压制自动生成的了。例如用xaxt="n"就压制了x轴刻度标志以及刻度标识。其次使用axis()命令自定义刻度标识。重要参数有四个：side(在哪个轴上建立刻度标识)，at（建立哪几个标识），tck（刻度标志tickmark长度，可以是负值），labels（列出要自定义的标识文字）。例如我想在X轴上建立自定义标识 阅读全文
摘要：
##读取前200行#open (IN2,"G:\\PROJECT\\project_insection\\insert_B73_1.txt") or die "$!";#open (OUT2,"+>G:\\PROJECT\\project_insection\\insert_B73_1_myout.txt") or die "$!";#my @myout;#while(<IN2>)#{# if($.<=200)# {# push @myout,$_;# }#}#print OUT2 @myo 阅读全文
摘要：
> a <- matrix( c(5, 3, 4, 2, 2, 6, 8, 9, 7, 6, 12, 10, 11, 14, 13), 5)> a [,1] [,2] [,3][1,] 5 6 12[2,] 3 8 10[3,] 4 9 11[4,] 2 7 14[5,] 2 6 13按第一列升序：> a[order(a[,1]),] [,1] [,2] [,3][1,] 2 7 14[2,] 2 6 13[3,] 3 8 10[4,] 4 ... 阅读全文