陣列

利用 rbind、cbind 與 array 函數建立陣列

陣列可視為多維度的向量變數，跟向量一樣，所有陣列元素的資料屬性必須一致。

> x <- c(1, 2, 3)
> y <- c(4, 5, 6)

> rbind(x, y) # rbind 是利用 row(橫) 合併。
  [,1] [,2] [,3]
x    1    2    3
y    4    5    6

> cbind(x, y) # cbind 是利用 column(直) 合併。
     x y
[1,] 1 4
[2,] 2 5
[3,] 3 6

> array(x,c(1,3)) # c(1,3) 代表產生 1 x 3 陣列
     [,1] [,2] [,3]
[1,]    1    2    3

> array(x,c(2,3)) # c(2,3) 代表產生 2 x 3 陣列
     [,1] [,2] [,3]
[1,]    1    3    2
[2,]    2    1    3

> array(x,c(3,3)) # c(3,3) 代表產生 3 x 3 陣列
     [,1] [,2] [,3]
[1,]    1    1    1
[2,]    2    2    2
[3,]    3    3    3

透過指標提取資料

陣列與向量相同，可以透過指標或名稱選取陣列的元素。

> x <- c(1, 2, 3)
> y <- c(4, 5, 6)

> z = rbind(x, y)
> z
  [,1] [,2] [,3]
x    1    2    3
y    4    5    6

> z[,1] # 選取第一行(column、直)
x y
1 4

> z[1,] # 選取第一列(row、橫)
[1] 1 2 3

> z[1,1:2] # 選取第一列第一到二行
[1] 1 2

基本相關函數

• 陣列加減乘除
• length：計算陣列中的所有元素個數。
• dim：列出維度資訊
• ncol、nrow：計算(column、直) 或 (row、橫) 個數。
• aperm：將陣列轉置

> x <- c(1, 2, 3)
> y <- c(4, 5, 6)

> z = rbind(x, y)
> z
  [,1] [,2] [,3]
x    1    2    3
y    4    5    6

> z + z
  [,1] [,2] [,3]
x    2    4    6
y    8   10   12

> z - 2*z
  [,1] [,2] [,3]
x   -1   -2   -3
y   -4   -5   -6

> z * z # 相對應的陣列元素相乘
  [,1] [,2] [,3]
x    1    4    9
y   16   25   36

> z / z # 相對應的陣列元素相除
  [,1] [,2] [,3]
x    1    1    1
y    1    1    1

> length(z)
[1] 6

> dim(z) # 前者是 row，後者是 column。
[1] 2 3
> ncol(z)
[1] 3
> nrow(z)
[1] 2

> aperm(z) # 等同是從 rbind 轉成 cbind
     x y
[1,] 1 4
[2,] 2 5
[3,] 3 6