[,1] [,2]
[1,] 3 -1
[2,] 2 1
[3,] 1 1
> which(M[,1]==max(M[M[,2]==1,1]))
[1] 2
R语言常用数学函数sum()、max()、min()、mean()、median()
prod(x) 对x中的元素都连乘
which.max(x) 返回x中最大元素的下标
which.min(x) 返回x中最小元素的下标
range(x) 值域
rev(x) 对x中的元素取逆序
sort(x) 将x中的元素将升序排列
pmin(x,y) 返回一个向量，它的第i个元素是x[i],y[i] 中最小值
pmax(x,y) 返回一个向量，它的第i个元素是x[i],y[i] 中最大值
cumsum(x) 求累积和，返回一个向量，第i个元素等于x[1]到x[i]的和
cumprod(x) 求累积（从左到右）乘积
cummin(x) 求累积最小值（从左到右）
cummax(x) 求累积最大值（从左到右）
match(x,y) 返回一个和x的长度相同的向量，第i个元素表示y中与x[i]相同的元素的位置（没有则返回NA）
na.omit(x) 函数忽略有缺失值（NA）的观察数据（如果x是矩阵或数据框则忽略相应的行）
na.fail(x) 如果x包含至少一个NA则返回一个错误消息
which() 返回符合条件的元素的下标
choose 组合数，二项式，例choose(4,2) 返回6
rep(x,y) 将x重复y次
unique(x) 去掉重复的元素，只取一个
table(x) 返回一个列表，给出y中重复元素的个数列表
subset(x,条件) 返回x中满足特定条件的子集
==符号操作时会先将短向量的长度延长成和长向量的长度一样长，如a<-c("一","二","三","四","五")
长度为5，而
c("一","四")
会被延长为
c("一","四","一","四","一")
产生了截断，所以会警告：长的对象长度不是短的对象长度的整倍数。
你拿c("一","二","三","四","五")和c("一","四","一","四","一")比较，相同的是1,4
而如果是c("一","三")，会延长成c("一","三","一","三","一")，并有警告产生
你拿c("一","二","三","四","五")和c("一","三","一","三","一")比较，相同的是1
