美文网首页
几个函数

几个函数

作者: 小森的生统笔记 | 来源:发表于2021-02-24 09:58 被阅读0次

dimnames

在构建矩阵的时候确定矩阵的行名和列名

dimnames=list(rownames(exp),colnames(exp))
data=matrix(as.numeric(as.matrix(exp)),nrow=nrow(exp),dimnames=dimnames)

函数实例

dimnames
参考:R 函数笔记 | dimnames(), dim(), provideDimnames()

avereps

相同ID的数值取均值

data=avereps(data)
data=data[rowMeans(data)>0,]

相同type取均值

> dat
   type Num1 Num2
1     A   90   89
2     B   34   32
3     C   56   53
4     D   99   95
5     E   15   10
6     A   50   44
7     B   20   13
8     C   24   16
9     D   70   61
10    E   14    4
> avereps(dat[,-1],ID=dat$type)
  Num1 Num2
A 70.0 66.5
B 27.0 22.5
C 40.0 34.5
D 84.5 78.0
E 14.5  7.0

参考:avereps相同ID取均值(limma包函数)

rowmeans

计算每行的均值
如上图中使用rowmeans保证每行表达量平均值为整数
示例

>C1<-c(3,2,4,4,5)
> C2<-c(3,7,3,4,5)
> C3<-c(5,4,3,6,3)
> DF<-data.frame(ID=c("A","B","C","D","E"),
C1=C1,C2=C2,C3=C3)
> DF
  ID C1 C2 C3
1  A  3  3  5
2  B  2  7  4
3  C  4  3  3
4  D  4  4  6
5  E  5  5  3
> data.frame(ID=DF[,1], Means=rowMeans(DF[,-1]))
  ID    Means
1  A 3.666667
2  B 4.333333
3  C 3.333333
4  D 4.666667
5  E 4.333333

参考:rowmeans():Use R!

cbind & rbind

cbind根据列进行合并,col~
rbind根据行进行合并,row~

#输出结果
out=rbind(ID=colnames(geneExp),geneExp)
write.table(out,file="immGeneExp.txt",sep="\t",quote=F,col.names=F)

这一不是为了使输出的表格有表头
示例

> a <- matrix(1:12, 3, 4)
> print(a)
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12
> 
> b <- matrix(-1:-12, 3, 4)
> print(b)
     [,1] [,2] [,3] [,4]
[1,]   -1   -4   -7  -10
[2,]   -2   -5   -8  -11
[3,]   -3   -6   -9  -12
> 
> x=cbind(a,b)
> print(x)
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,]    1    4    7   10   -1   -4   -7  -10
[2,]    2    5    8   11   -2   -5   -8  -11
[3,]    3    6    9   12   -3   -6   -9  -12
> 
> y=rbind(a,b)
> print(y)
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12
[4,]   -1   -4   -7  -10
[5,]   -2   -5   -8  -11
[6,]   -3   -6   -9  -12
> 
> 
> c <- matrix(-1:-20, 4, 5)
> print(c)
     [,1] [,2] [,3] [,4] [,5]
[1,]   -1   -5   -9  -13  -17
[2,]   -2   -6  -10  -14  -18
[3,]   -3   -7  -11  -15  -19
[4,]   -4   -8  -12  -16  -20
> 
> x2=cbind(a,c)
Error in cbind(a, c) : 矩阵的行数必需相符(见arg2)
> print(x2)
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9]
[1,]    1    4    7   10   -1   -4   -7  -10  -13
[2,]    2    5    8   11   -2   -5   -8  -11  -14
[3,]    3    6    9   12   -3   -6   -9  -12  -15
> 
> y2=rbind(a,c)
Error in rbind(a, c) : 矩阵的列数必需相符(见arg2)
> print(y2)
Error in print(y2) : 找不到对象'y2'

参考R语言中,cbind和rbind区别

相关文章

  • 几个函数

    // 函数: microtime()返回当前时间戳和微妙数 opendir()打开目录 readdir()读取文件...

  • 几个函数

    dimnames 在构建矩阵的时候确定矩阵的行名和列名 函数实例 参考: avereps 相同ID的数值取均值 相...

  • 进程控制二

    函数exec 函数介绍 这几个函数若出错返回-1,成功不返回。 这几个函数的区别 我们看到这几个函数都是exec开...

  • 几个初等函数

    1、幂函数 2、对数函数 3、指数函数 4、三角函数 5、双曲函数 6、反双曲函数

  • 学几个函数

    1. 首先是dplyr里面的group_by(),在数据某个变量存在多个因子,想要分因子查看特征时,可以用这个,后...

  • Oracle中常用函数(SQL)

    Oracle函授有以下几个分类:数字函数、字符函数、日期函数、转换函数、集合函数、分析函数 数字函数: 字符函数:...

  • (十一)函数<4>几个特殊函数

    1.lambda()---匿名函数,可以把函数压缩在一行里搞定: 平常的作法: 使用lambda(): 或者这样:...

  • ES6对数值的拓展(2018-05-08)

    在ES5中,我们存在几个全局函数 isNaN函数,isFinite函数,parseInt函数,parseFloat...

  • async/await 原理及简单实现

    解决函数回调经历了几个阶段, Promise 对象, Generator 函数到async函数。async函数目...

  • async/await 原理及简单实现

    解决函数回调经历了几个阶段, Promise 对象, Generator 函数到async函数。async函数目前...

网友评论

      本文标题:几个函数

      本文链接:https://www.haomeiwen.com/subject/hpijfltx.html