6 向量符号化
向量输入,向量输出
> u<-c(5,2,8)
> v<-c(1,3,9)
> u>v
[1] TRUE FALSE FALSE
很简单,不做解释
> w<-function(x) return(x+1)
> w(u)
[1] 6 3 9
> sqrt(1:9)
[1] 1.000000 1.414214 1.732051 2.000000 2.236068 2.449490
[7] 2.645751 2.828427 3.000000
> y<-c(1.2,3.9,0.4)
> z<-round(y)
> z[1] 1 4 0
> round(1.2)
[1] 1
sqrt()是开根号的运算,round()是四舍五入的运算
> y<-c(12,5,13)
> y+4[1] 16 9 17
> '+'(y,4)
[1] 16 9 17
> f<-function(x,c) return((x+c)^2)
> f(1:3,0)
[1] 1 4 9
> f(1:3,1)
[1] 4 9 16
> f(1:3,1:3)
[1] 4 16 36
仔细一看就明白怎么回事,不解释
> z12<-function(z) return(c(z,z^2))
> x<-1:8
> z12(x)
[1] 1 2 3 4 5 6 7 8 1 4 9 16 25 36 49 64
> matrix(z12(x),ncol=2)
[,1] [,2]
[1,] 1 1
[2,] 2 4
[3,] 3 9
[4,] 4 16
[5,] 5 25
[6,] 6 36
[7,] 7 49
[8,] 8 64
> z12<-function(z) return(c(z,z^2))
> sapply(1:8,z12)
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,] 1 2 3 4 5 6 7 8
[2,] 1 4 9 16 25 36 49 64
Matrix本来就是矩阵的意思,所以它具有将向量以方阵的形式表现出来的作用,sapply(x,f())即对每一个x都调用一次f(),并将结果转化为矩阵。