)R第二天

变量

赋值

a<-c(2,,3,4,5,6,7,8,9)

变量取用

a[] 表示取用变量，但是如果cat(a)，仍然输出的是a<-c(2,,3,4,5,6,7,8,9),取出的仍然是向量，是暂时的，如果想要保存下来，可以将其在复制该一个变量如m<-a[]

（1）根据元素位置

#这里的x是你刚才赋值的变量名，根据自己的情况来修改
x[4] #x第4个元素
x[-4]#排除法，除了第4个元素之外剩余的元素
x[2:4]#第2到4个元素
x[-(2:4)]#除了第2-4个元素
x[c(1,5)] #第1个和第5个元素

（2）根据值

x[x==10]#等于10的元素
x[x<0]
x[x %in% c(1,2,5)]#存在于向量c（1，2，5）中的元素

数据框

输入数据框

read.csv(“数据名”，sep=“”,hesder=T)

header

标题
一个逻辑值，指示文件是否包含变量名作为第一行。如果缺少，则根据文件格式确定该值：当且仅当第一行包含的字段少于列数时，标题设置为TRUE

sep

字段分隔符
文件每行上的值由该字符分隔。如果sep=“（read.table的默认值）分隔符为“空白”，即一个或多个空格、制表符、换行符或回车符

设置列名与行名

colnames(X) #查看列名

rownames(X) #查看行名,默认值的行名就是行号，1.2.3.4

colnames(X)[1]<-"bioplanet"#有的公司返回数据，左上角第一格为空，R会自动补为x,用这个命令来修改

X<-read.csv(file = "huahua.txt",sep = " ",header =T,row.names=1)#最后row.names的意思是修改第一列为行名

==colnames()查看行名，返回的是向量，如果修改行名列名。需要赋值如rownames(x) <- c("a","b","c","d","e")，并且数量与原来的行数或者列数相同==

数据框的导出

write.csv(数据框，file=“命名.csv”,sep=“”,quote=F)

==write.table(X,file = "yu.txt",sep = ",",quote=F)#分隔符改为逗号，字符串不加双引号（默认格式带由双引号)==

==quote=F表示不添加引号，T或者" "都表示添加引号==

变量的保存与重新加载

save.image(file="bioinfoplanet.RData")#保存当前所有变量

save(X,file="test.RData")#保存其中一个变量

load("test.RData")#再次使用RData时的加载命令

==保存的文件格式是.R==

提取数据框的元素

x[1,2]第一行第二例

x[1,]第一行

x[2]第二列

x[,2]第二列

x[2:3]第二列到第三列

X$列名#也可以提取列（优秀写法，而且这个命令还优秀到不用写括号的地步，并且支持Tab自动补全哦，不过只能提取一列）