ma <- matrix(c(1:4, 6, 9:15), nrow = 3)? ###建立矩陣
ma
# 給他一個名字
colnames(ma) <- c("A","B","C","D")
rownames(ma) <- c("x","y","z")
ma
##返回的結果是：
? ?A B C D
x 1 4 10 13
y 2 6 11 14
z 3 9 12 15
## 針對矩陣的一些函數(shù)
## 按照行取平均值蘸鲸，超級實用
rowMeans(ma)
## 按照行求和
rowSums(ma)
## 按照列取平均值
colMeans(ma)
## 按照列求和
colSums(ma)
# 性價比最高函數(shù)就是t(),使用頻率特別高! 行列轉置
ma
ma_t <-t(ma)
ma_t
##返回的是：
? ? ? x y z
A? ? 1 2 3
B? ? 4 6 9
C 10 11 12
D 13 14 15
## which祟牲，返回某個值所在的位置，幾行凌彬，幾列
## 再一次見證參數(shù)的作用!
which(ma==11,arr.ind = T)
###返回的是
? row col
y? 2? ?3
#############
## as表示轉換
is.data.frame(ma) ##判斷是不是data.frame
ma_df <- as.data.frame(ma)
is.data.frame(ma_df)
# as 有個系列淫痰！也很重要最楷，用于轉換數(shù)據(jù)
## 以因子來舉例
a <- rep(18:21,3)??
a? ? ? ? ? ? ? ? ? ? ? ? ? ??##18 19 21 18 19 21 18 19 21
# 因子就是分類器
a <- factor(a)
a
# 調整順序,作圖橫坐標的順序就是levels的順序
aa <- factor(a,levels = c("21","18","20","19"),ordered = F)
aa
##小坑一個，因子轉數(shù)字需要先轉換成字符串###
############################################
###?????????################################
d <- as.numeric(as.character(a))
