R学习小计
安装R扩展包：install.packages("FKF")
http://www.douban.com/note/243004605/
1、输入数据
l读入有分隔符数据：A<-Scan(file=“./a.txt”,sep=“;”)
l读入首行为文件头的数据:
txt格式： z<-read.table("a1.txt",header=T)
csv格式： z1<-read.csv("ab.csv",header=T)
将数据写入本地：
write.table(iris,file='abc.csv',sep=',')
l生成规则数据：A<-1:10 ；B<-seq(1,5,0.5)
l生成随机数据：A<-rnorm(10,mean=0,sd=1)
计算日期：
> mydate=as.POSIXct(1400906973173/1000, origin = "1970-01-01 00:00:00")
> mydate
[1] "2014-05-24 12:49:33 CST"
> format(mydate, format="%Y-%m-%d %H-%M-%OS3")
[1] "2014-05-24 12-49-33.173"
> as.Date('2014-02-20')+100
[1] "2014-05-31"
2、矩阵向量计算
生成向量
v<-c(1,2,3,4,5)
查看向量长度: length(v)
> length(v)
[1] 5
查看向量的数据类型: mode(v)
> mode(v)
[1] "numeric"
注意：NA表示缺失值
生成序列函数:
> a1<-seq(-2,1,0.5)
> a1
[1] -2.0 -1.5 -1.0 -0.5 0.0 0.5 1.0
> rep("hi",5)
[1] "hi" "hi" "hi" "hi" "hi"
gl(k,n) k表示因子水平个数；n表示每个水平的重复数
> gl(2,3,labels=c("female","male"))
[1] female female female male male male
Levels: female male
l生成矩阵：A<-matrix(1:12,nrow=3,ncol=4)
l矩阵转置：t(A)
l矩阵相乘：A%*%B
l矩阵求逆：solve(A)
3、数据框：与二维矩阵类似，但是每列可以有不同类型的数据。
> my.dataset<-data.frame(site=c('A','B','A','A','B'),
+ season=c('Winter','Summer','Summer','Spring','Fall'),
+ pH=c(7.4,6.3,8.6,7.2,8.9))
> my.dataset
site season pH
1 A Winter 7.4
2 B Summer 6.3
3 A Summer 8.6
4 A Spring 7.2
5 B Fall 8.9
> my.dataset$pH
[1] 7.4 6.3 8.6 7.2 8.9
> my.dataset[my.dataset$pH>6,]
site season pH
1 A Winter 7.4
2 B Summer 6.3
3 A Summer 8.6
4 A Spring 7.2
5 B Fall 8.9
4、画图(专门显示图形的窗口)
l列出已开启的绘图设备：dev.list()
l给出正在使用的绘图设备： dev.cur()
l画图函数：plot(),pie(),hist(),barplot()等
5、功能性语句
l查看保存在内存中的变量：Ls()
l删除指定变量：rm(A)
l查看帮助：？rm
6、汇总数据
l显示变量频数 table(x)
l 输出频数直方图： barplot(table(x))
l 输出频数饼图： pie(table(x))
l 汇总后画图：barplot(table(x1,x2),beside=T,col=1:4)
l 统计量图形表示：
barplot(apply(z1[,2:3],1,mean))
pie(apply(z1[,2:3],2,mean))
boxplot(z1[,2:3])
处理数据：
sapply(UScrime[c("U1", "U2")], function(x) (c(mean = mean(x), sd = sd(x))))
sapply(UScrime[c("U1", "U2")], median)
变量的重组：
class <- state.region
> var <- state.x77[, c("Illiteracy")]
> mydata <- as.data.frame(cbind(class, var))
7、连接mysql数据库
1、 配置MySQL ODBC必须先安装MySQL ODBC driver 下载地址可以为：http://www.mysql.com/downloads/connector/odbc/
2、控制面板\系统和安全\管理工具 选择 “数据源(ODBC)”
enter image description here
3、完成配置后，进入R，就能用了
> library(RODBC)
> test = odbcConnect('mysqldata')
> sqlQuery(test,"select * from test.user")
转载至：http://www.ituring.com.cn/article/34860
程序实践：
导入数据：a<-read.csv("abc.csv",header=T)
sam=0
for(i in 1:115518)
{ sam=sam+a[i,1]
b[i]=a[i,2]/sam
}
导出到文档文件夹：write.csv(b, file="b.csv", row.names=FALSE)
R语言处理字符串：
http://blog.sina.com.cn/s/blog_49040b720100rlkj.html
R在Centos下安装
R语言是主要用于统计分析、绘图的语言和操作环境。
官方网站：
http://www.r-project.org/
Windows下面有直接的安装包，直接下载安装很方便，但是对于刚出的CentOS6.0上不能直接通过yum 安装R，需要自己编译。
下载页面：
http://ftp.ctex.org/mirrors/CRAN/
在编译R之前，需要通过yum安装以下几个程序：
#yum install gcc-gfortran #否则报”configure: error: No F77 compiler found”错误
#yum install gcc gcc-c++ #否则报”configure: error: C++ preprocessor “/lib/cpp” fails sanity check”错误
#yum install readline-devel #否则报”–with-readline=yes (default) and headers/libs are not available”错误
#yum install libXt-devel #否则报”configure: error: –with-x=yes (default) and X11 headers/libs are not available”错误
然后下载源代码,编译
#cd
#wget http://ftp.ctex.org/mirrors/CRAN/src/base/R-2/R-2.13.1.tar.gz
#tar zxvf R-2.13.1.tar.gz
#cd R-2.13.1
#./configure
#make
#make install
即可完成编译安装。
转载：http://blog.sina.com.cn/s/blog_6cfc336b01018wvl.html
