R语言学习笔记（一）

从数据库导入数据：

library（RODBC）

channel<-odbcConnect('itdb1',uid='readonly',pwd='123456',believeNrows=FALSE)#最后这句话在window平台是需要加的。

query<-'select * from DATAAPP1.cicc_ashare_industry a where a.industry_id like 'b1%' and is_active=1'
mydata<-sqlQuery(channel,query,errors=TRUE)
close(channel)

改变数据类型

as.character()
as.numeric()

拼接两个向量

append(vector1,vector2)

创建一个新的date.frame

1.最实用的是利用已有的相同的变量复制，框架并赋值为NA

indzhx<-indgz
indzhx[T]<-NA

2.传统的方法

data.frame(c1,c2,c3,...)

从一个向量变成Pandas里的Series

方法是names(x)<-name_vector.这个方法对于已知编码文件的情况下字符编码很方便。

批量生成字符串的方法

paste(pattern,variable,sep='')
paste('110',1:9,sep='')

date.frame按照某一列排序

df[order(df$industry_ID),]

统计一个vector的频数

unique（c）

a %in% b返回逻辑值，与a等长，表示a是否在b中

批量赋值采用assign函数，这是<-和=不容易达到的。

ls()显示当前所有变量

a <- 3
if( a == 1)
{
   print("a == 1")
}else                       # 注意这里，else必须紧跟在上一个大括号后面
{
   print("a != 1")
}

也可以写作一行

> a<-4
> if(a==1){print('a==1')}else{print('a!=1')}

cat函数把，字符串和变量混在一起输出：

sum<-0
for(i in 1:100){sum<-sum+i}
cat('i=',i,'sum=',sum)

ITPub博客

一周学会R语言心得（二）

最新文章