> x<-seq(2,10)
> x
[1] 2 3 4 5 6 7 8 9 10
> x[2] #取出下标对应的元素
[1] 3
> x[-2] #除下标外的剩余元素
[1] 2 4 5 6 7 8 9 10
> x[c(1,3,5)] #如果要取多个元素,可以用向量做下标
[1] 2 4 6
> x[-c(2,4,6)] #如果要排除多个元素
[1] 2 4 6 8 9 10
> x[which(x>6)] #取出满足条件的元素,可使用which()函数
[1] 7 8 9 10
> x[which.max(x)] #取最大的元素
[1] 10
> x[which.min(x)] #取最小的元素
[1] 2
> x[1:5] #取出连续的元素
[1] 2 3 4 5 6
> sqrt(x) #向量开方
[1] 1.414214 1.732051 2.000000 2.236068 2.449490 2.645751 2.828427
[8] 3.000000 3.162278
> y<-2:5 #产生向量y
> y
[1] 2 3 4 5
> x+y #向量加法,R中重复短的向量,直到元素与长向量相同
[1] 4 6 8 10 8 10 12 14 12
> crossprod(x,x) #向量的内积
[,1]
[1,] 384
> tcrossprod(x,x) #向量的外积
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9]
[1,] 4 6 8 10 12 14 16 18 20
[2,] 6 9 12 15 18 21 24 27 30
[3,] 8 12 16 20 24 28 32 36 40
[4,] 10 15 20 25 30 35 40 45 50
[5,] 12 18 24 30 36 42 48 54 60
[6,] 14 21 28 35 42 49 56 63 70
[7,] 16 24 32 40 48 56 64 72 80
[8,] 18 27 36 45 54 63 72 81 90
[9,] 20 30 40 50 60 70 80 90 100
> length(x) #向量的长度
[1] 9