R语言常用数学函数

来源:互联网 时间:2016-01-06

语言的数学运算和一些简单的函数整理如下:

向量可以进行那些常规的算术运算,不同长度的向量可以相加,这种情况下最短的向量将被循环使用。

 

> x <- 1:4

> a <- 10

> x * a

[1] 10 20 30 40

 

> x + a

[1] 11 12 13 14

 

> sum(x)        #对x中的元素求和

[1] 10

 

> prod(x)       #对x中的元素求连乘积

[1] 24

 

> prod(2:8)         #8的阶乘

[1] 40320

 

> prod(2:4)         #4的阶乘

[1] 24

 

> max(x)            #x中元素的最大值

[1] 4

 

> min(x)            #x中元素的最小值

[1] 1

 

> which.max(x)      #返回x中最大元素的下标

[1] 4

 

> which.min(x)      #返回x中最小元素的下标

[1] 1

 

> x <- 4:1          #对向量x重新赋值

> x

[1] 4 3 2 1

 

> which.min(x)

[1] 4

 

> which.max(x)

[1] 1

 

> range(x)           #与c(min(x), max(x))作用相同

[1] 1 4

 

> mean(x)            #x中元素的均值

[1] 2.5

 

> median(x)          #x中元素的中位数

[1] 2.5

 

> var(x)         #x中元素的的方差(用n-1做分母)

[1] 1.666667

 

> x

[1] 4 3 2 1

 

> rev(x)         #对x中的元素取逆序

[1] 1 2 3 4

 

> sort(x)        #将x中的元素按升序排列;

[1] 1 2 3 4

 

> x

[1] 4 3 2 1

 

> cumsum(x)      #求累积和,返回一个向量,它的第i个元素是从x[1]到x[i]的和

[1] 4  7  9 10

 

> cumsum(rev(x))

[1] 1  3  6 10

 

> y <- 11:14

> pmin(x,y)      #返回一个向量,它的第i个元素是x[i], y[i], . . .中最小值

[1] 4 3 2 1

 

> x <- rev(x) #重新赋值

> pmin(x,y)

[1] 1 2 3 4

 

> pmax(x,y)   #返回一个向量,它的每个元素是向量x和y在相应位置的元素的最大者

[1] 11 12 13 14

 

> cumprod(x) #求累积(从左向右)乘积

[1] 1  2  6 24

 

> cummin(x)  #求累积最小值(从左向右)

[1] 1 1 1 1

 

> cummax(x)  #求累积最大值(从左向右)

[1] 1 2 3 4

 

> match(x, y)  #返回一个和x的长度相同的向量,表示x中与y中元素相同的元素在y中的位置(没有则返回NA)

[1] NA NA NA NA

 

> y[c(2,4)] <- c(2,4)

> y

[1] 11 2 13  4

 

> match(x, y)

[1] NA 2   NA  4

 

na.omit(x)函数忽略有缺失值(NA)的观察数据(如果x是矩阵或数据框则忽略相应的行)

> na.omit(match(x,y))

[1] 2 4

 

attr(,"na.action")

[1] 1 3

 

attr(,"class")

[1] "omit"

 

> na.fail(match(x,y)) #na.fail(x) 如果x包含至少一个NA则返回一个错误消息

错误于na.fail.default(match(x,y)) : 对象里有遺漏值

 

which()函数返回一个包含x符合条件(当比较运算结果为真(TRUE)的下标的向量,在这个结果向量中数值i说明x[i] == a(这个函数的参数必须是逻辑型变量)

> which( x == 2)

[1] 2

 

> which( x <= 2)

[1] 1 2

 

求组合数

> choose(4,2)

[1] 6

 

> choose(3,1)

[1] 3

 

> choose(-3,1)

[1] -3

 

> choose(-4,2)

[1] 10

 

> y <- c(1:4, rep(4,1))

> y

[1] 1 2 3 4 4

 

> unique(y)    #如果y是一个向量或者数据框,则返回一个类似的对象但是去掉所有重复的元素(对于重复的元素只取一个)

[1] 1 2 3 4

 

> table(y)              #返回一个表格,给出y中重复元素的个数列表(尤其对于整数型或者因子型变量)

y

 

1 2 3 4

 

1 1 1 2

 

> subset(x, x>2) #返回x中的一个满足特定条件...的子集

[1] 3 4

 

> sample(x, 2) #从x中无放回抽取size个样本,选项replace= TRUE表示有放回的抽样

[1] 1 2

 

> sample(x, 2, replace = TRUE) #有放回的抽样

[1] 2 3

 

 

R中用来处理数据的函数太多了而不能全部列在这里。读者可以找到所有的基本数学函数(log, exp, log10, log2, sin, cos, tan, asin, acos, atan, abs, sqrt,. . . ), 专业函数(gamma,digamma, beta, besselI, . . . ),同样包括各种统计学中有用的函数。

相关阅读:
Top