数据结构
Part 1 向量 Vector
1.向量赋值
1.1 使用c函数 x <- c(1,2,3)
1.2 使用：取区间x <- 1:3
1.3 使用seq函数在1到10之间以步长为1取用数字
x <- seq(1,10,by=1)
1.4 使用rep函数将1-3重复三次
x <- rep(1:3,3)
2.取用向量的元素
2.1 根据下标取用
x[4]
x[-4]#获取除了第四个元素外的元素
x[-(2:4)]#获取除了第2至第4之外的元素，要加括号
x[c(1,4)]#获取第一个和第四个元素
2.2 根据元素值取用
x[x==10]#等于10的元素
x[x < 0]#小于0的元素
x[x %in% c(1,2,5)]#存在于向量（1，2，5）中的元素
- “=”是赋值，而“==” 是等于
Part 2 数据框 Data frame
1 读取本地数据
1.1 使用a <- read.table(file= "huahua.txt",sep ="\t",header= T)
read.csv
read.table
.csv是非常好的数据文件格式，跨平台支持非常好,在Excel或者SPSS中创建的数据，只要存为csv格式，就可以使用几乎任何数据处理软件对这些数据进行处理了。
read.csv和read.table不同的是的默认参数有别，table默认不接受缺失值。
- \t :横向制表(HT) (跳到下一个TAB位置)
- sep: 指定分隔符，默认是空格
- header: 判断数据文件中第一行是不是标题
2 设置行名和列名
X <- read.csv('doudou.txt')
colnames(X)#查看列名
rownames(X)#查看行名
colnames(X)[1] <- "MOU" #修改左上角第一格为某
X<- read.csv(file="huahua.txt",sep=" ",header=T,row.names=1)
3 导出数据框
write.table(变量,file="文件名",sep=",",quote=F)#改分割符号为逗号，字符去除双引号
4 变量保存与重新加载
- 保存格式为RData
4.1 保存所有变量
save.image("文件名")
4.2 保存一个变量
save(变量名,file="文件名")
4.3 加载变量
load("文件名")
5 提取数据框的元素
- 数据框以列为大单位
5.1 提取1行2列
a[1,2]
5.2 提取第1行
a[1,]
5.3 提取第2列
a[2]
a[,2]
a[1:3] #提取1到3列
a[c(1,3)] #提取1，3列
a$name #根据列名提取该列
6 使用数据框中的变量做散点图
6.1 使用赋值和plot函数
a <-data.frame(case=paste("S",1:50),values=runif(50))
plot(a$case,a$values)
paste函数将参数转换为字符串并连接，字符串之间用seq间隔分开。
6.1 使用attach函数
- attach()是对数据框/列表添加路径索引，避免重复输入名称。
- detach()是撤销attach()建立的路径索引，往往二者配套使用。
attach(a)
plot(case,values)
attach
6.2 使用with函数
with(a,{
plot(case,values)
x<<-sum(values) #求和并赋值给x
})
x #运行完后打印x
- <<的意思是作为全局变量，也就是出了大括号仍有效。
-
小括号()定义函数的参数，在运算中作为优先级
中括号 [] 用做对象的元素索引
大括号{} 作为代码段落的起止
with - with函数可以将所有操作（expr）局限于（data）中，避免多次输入变量名。
7 保存脚本
-
通过快捷键Ctrl+Shift+N新建脚本并将with函数敲进去后保存。
with
问题
-
save(X,file="test.RData")遇到X报错说明变量X不存在，通过load()函数载入变量。
