#R语言备忘录三#

#数组array和矩阵matrix、列表list、数据框dataframe

#数组

#数组的重要属性就是dim，维数

#得到4*5的矩阵

z

dim(z)

z

#构建数组

x

#三维

y

#数组下标

y[1, 2, 3]

#数组的广义转置,维度发生变化，把2维变成1维，把3维变成2维，把1维变成3维，即D[i,j,k] = C[j,k,i]

C

D

#apply用于数组固定某一维度不变，进行计算

apply(A, 1, sum)

#矩阵

#产生矩阵

A

B

#求方阵行列式的值

det(matrix(1:4, ncol = 2))

#内积

#矩阵的内积

A %*% B

#也可以使用crossprod函数

crossprod(A, B)

crossprod(A)

#向量的外积，也叫叉积

x

y

x %o% y

#也可以使用tcrossprod函数、outer

outer(x, y)

tcrossprod(x)

#产生对角阵

#如果变量是一个向量，则是以向量为对角线元素的对角阵

v

diag(v)

#如果变量是一个矩阵，则是取矩阵对角线元素作为对角阵对角线元素

diag(A)

#解线性方程Ax=b，

b

B

solve(B,b)

#求矩阵的逆

solve(B)

#ev$values是特征根，ev$vectors是特征向量组成的矩阵

SM

ev

#奇异解,svd$d返回的是矩阵A的奇异值，svd$u则是正交阵U，svd$v对应的是正交阵V, A = UDVT

svdA

#把矩阵拉成向量

as.vector(A)

#数组或矩阵的维的名字

X

dimnames = list(c("one", "two", "three"), c("First", "Second")),

byrow = T)

#亦或是

dimnames(A)

colnames(A)

rownames(A)

#列表

#构建列表

Lst

#列表元素，列表名[[下标]]

Lst[[2]]

Lst[[4]][2]

#也可以使用名字代替下标

Lst[["name"]]

Lst$name

#修改列表

Lst$name

#删除列表某项

Lst$name

#连接几个列表

list.ABC

#数据框

#data.frame，用法和list相同，如果list里的成分满足数据框，也可以使用as.data.frame转换

df

Name=c("Alice", "Becka", "James", "Jeffrey", "John"), Sex=c("F", "F", "M", "M", "M"),

Age=c(13, 13, 12, 13, 12),

Height=c(56.5, 65.3, 57.3, 62.5, 59.0)

Weight=c(84.0, 98.0, 83.0, 84.0, 99.5)

)

df

#矩阵可以通过data.frame(X)转换

#取数据框的一部分

df[1:2, 3:5]

df[["Height"]]

df$Weight

#命名

names(df)

rownames(df)

#attch()函数将数据框中的变量调入内存中，方便调用当中的数据

attach(df)

#取消连接

detach(df)

#调用edit进行编辑数据

edit(df)

#因子factor

sex

sexf

#因子水平

sex_level

#用table统计各类数据的频数

sex_tab

#用gl()产生因子

#gl(n, k, length = n * k, labels = 1:n, ordered = FALSE)