语言的数学运算和一些简单的函数整理如下:
向量可以进行那些常规的算术运算,不同长度的向量可以相加,这种情况下最短的向量将被循环使用。
> x <- 1:4
> a <- 10
> x * a
[1] 10 20 30 40
> x + a
[1] 11 12 13 14
> sum(x)
[1] 10
> prod(x)
[1] 24
> prod(2:8)
[1] 40320
> prod(2:4)
[1] 24
> max(x)
[1] 4
> min(x)
[1] 1
> which.max(x)
[1] 4
> which.min(x)
[1] 1
> x <- 4:1
> x
[1] 4 3 2 1
> which.min(x)
[1] 4
> which.max(x)
[1] 1
> range(x)
[1] 1 4
> mean(x)
[1] 2.5
> median(x)
[1] 2.5
> var(x)
[1] 1.666667
> x
[1] 4 3 2 1
> rev(x)
[1] 1 2 3 4
> sort(x)
[1] 1 2 3 4
> x
[1] 4 3 2 1
> cumsum(x)
[1] 4
> cumsum(rev(x))
[1] 1
> y <- 11:14
> pmin(x,y)
[1] 4 3 2 1
> x <- rev(x) #重新赋值
> pmin(x,y)
[1] 1 2 3 4
> pmax(x,y)
[1] 11 12 13 14
> cumprod(x) #求累积(从左向右)乘积
[1] 1
> cummin(x)
[1] 1 1 1 1
> cummax(x)
[1] 1 2 3 4
> match(x, y)
[1] NA NA NA NA
> y[c(2,4)] <- c(2,4)
> y
[1] 11 2 13
> match(x, y)
[1] NA 2
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)
[1] 1 2 3 4
> table(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, . . . ),同样包括各种统计学中有用的函数。 |
|
来自: Becky_Spencer > 《R语言》