?prod()
矩阵的对角线,例如
> diag(10,3,4)#返回三行四列,且对角线是10
[,1] [,2] [,3] [,4]
[1,] 10 0 0 0
[2,] 0 10 0 0
[3,] 0 0 10 0
提取方阵的对角线
> a=matrix(1:16,nrow=4,ncol=4)
> a
[,1] [,2] [,3] [,4]
[1,] 1 5 9 13
[2,] 2 6 10 14
[3,] 3 7 11 15
[4,] 4 8 12 16
> diag(a)
[1] 1 6 11 16
?%*%
rnorm() 正态分布函数
rpois() 泊松分布
rexp() 指数分布
rgamma() Gamma分布函数
runif() 均匀分布
rbinom() 二项分布
rgeom() 几何分布
就是连乘,例如 x = c(1:5),则prod(x) = 1*2*3*4*5 = 120
产生向量,例如 seq(5, 20); seq(5, 121, by=2),步长为2; seq(5, 121, length=10)
矩阵的对角线,例如
> diag(10,3,4)#返回三行四列,且对角线是10
[,1] [,2] [,3] [,4]
[1,] 10 0 0 0
[2,] 0 10 0 0
[3,] 0 0 10 0
提取方阵的对角线
> a=matrix(1:16,nrow=4,ncol=4)
> a
[,1] [,2] [,3] [,4]
[1,] 1 5 9 13
[2,] 2 6 10 14
[3,] 3 7 11 15
[4,] 4 8 12 16
> diag(a)
[1] 1 6 11 16
?%*%
两个矩阵的乘积,要求第一个矩阵的行数要和第二个矩阵列数相等
?solve()
矩阵求逆;求解线性方程,例如solve(A,B),求解线性方程Ax=b,solve(4,2) 输出0.5
特征向量
?安装包
R的编辑命令行窗口,输入安装命令: install.packages("gee") ;
工具栏里面“程序包”-->“从本地ZIP文件安装程序包”。
?source()
运行R脚本
1、round() #四舍五入
例:x <- c(3.1416, 15.377, 269.7)
round(x, 0) #保留整数位
round(x, 2) #保留两位小数1、round() #四舍五入
例:x <- c(3.1416, 15.377, 269.7)
round(x, 0) #保留整数位
round(x, 2) #保留两位小数
round(x, -1) #保留到十位
例:x <- c(3.1416, 15.377, 269.7)
round(x, 0) #保留整数位
round(x, 2) #保留两位小数
round(x, -1) #保留到十位
round(x, -1) #保留到十位
rnorm() 正态分布函数
rpois() 泊松分布
rexp() 指数分布
rgamma() Gamma分布函数
runif() 均匀分布
rbinom() 二项分布
rgeom() 几何分布