# 向量 ### 利用 c(...) 建立向量，但切記向量元素必須是同個資料屬性。 ~~~ > c(1, 2, 3) [1] 1 2 3 > c(1, TRUE, "test") # 全部都變成 character [1] "1" "TRUE" "test" > c(1.1, TRUE, "test") # 全部都變成 character [1] "1.1" "TRUE" "test" > c(1+2i, TRUE, "test") # 全部都變成 character [1] "1+2i" "TRUE" "test" > c(1, TRUE) # 全部自動轉成 integer [1] 1 1 > c(1.1, TRUE) # 全部自動轉成 numeric [1] 1.1 1.0 > c(1+2i, TRUE) # 全部自動轉成 complex [1] 1+2i 1+0i > c(1, 1.1) # 全部自動轉成 integer [1] 1.0 1.1 > c(1, 1.1, 1+2i) # 全部自動轉成 complex [1] 1.0+0i 1.1+0i 1.0+2i ~~~ 註：經由以上比較後，可以得到當放入的形態不同時，會被轉成同一形態，且可以每個形態的強弱不同，以下是強到弱排序。 character > complex > numeric > integer > logical ### 透過指標與名稱提取資料 我們可以透過以下二種方式取得向量元素。 - 指標 - 元素名稱 另外可以搭配 [] 或 [[]]，這樣分別會回傳向量元素的所有資訊或向量元素的數值，總共可以分成以下四種狀況。 - x[i]：回傳向量元素所有資訊 - x[[i]]：只回傳向量元素的值 - x[元素名稱]：回傳向量元素所有資訊 - x[元素名稱]：只回傳向量元素的值 ~~~ > x <- c(joe=12, vicky=14, bob=17) > x[1] joe 12 > x[[1]] [1] 12 > x["joe"] joe 12 > x[["joe"]] [1] 12 > x[1] joe 12 > x[[1]] [1] 12 > x[1:2] # 一次取多個向量元素 joe vicky 12 14 ~~~ ### c(...) 類似的函數 x:y、seq 與 rep - x:y：回傳 x 到 y 的整數向量，所以 x 與 y 都是整數。 - seq(s, e, by)：產生一個等差級數的向量。 - s 是初始值 - e 是結束值 - by 是遞增值，預設是 1 - rep(x, times, each)：產生一個重覆循環的向量。 - x 是需重覆循環的數值 - times 是重覆循環次數 - each 是 x 內元素重覆的次數 ~~~ > 1:5 [1] 1 2 3 4 5 > seq(1, 5) [1] 1 2 3 4 5 > seq(1, 5, 0.3) # 就算沒有剛好加到跟結束值一樣也沒關係 [1] 1.0 1.3 1.6 1.9 2.2 2.5 2.8 3.1 3.4 3.7 4.0 4.3 4.6 4.9 > rep(c(1, 2, 3), times = 3, each = 2) [1] 1 1 2 2 3 3 1 1 2 2 3 3 1 1 2 2 3 3 > rep(1:4, times = 3, each = 2) [1] 1 1 2 2 3 3 4 4 1 1 2 2 3 3 4 4 1 1 2 2 3 3 4 4 ~~~ ### 基本相關函數 - 向量加減乘除 - length：計算向量中的元素個數。 - sum：將向量所有元素加總。 - prod：將向量所有元素相乘。 - cumsum：回傳元素累加向量。 - cumprod：回傳元素累乘向量。 - sort：將向量元素排列，產生排序過的向量。 - rank：回傳各向量元素的排序值。 ~~~ > c(3, 4, 2) + c(3, 4, 2) [1] 6 8 4 > c(3, 4, 2) - c(3, 4, 2) [1] 0 0 0 > c(3, 4, 2) * c(3, 4, 2) [1] 9 16 4 > c(3, 4, 2) / c(3, 4, 2) [1] 1 1 1 > length(c(3, 4, 2)) [1] 3 > sum(c(3, 4, 2)) [1] 9 > cumsum(c(3, 4, 2)) [1] 3 7 9 > cumprod(c(3, 4, 2)) [1] 3 12 24 > prod(c(3, 4, 2)) [1] 24 > sort(c(3, 4, 2)) [1] 2 3 4 > rank(c(3, 4, 2)) [1] 2 3 1 ~~~ 上述向量加減乘除時，向量個數都是一樣的狀況，但不同的狀況會發生什麼結果，請看以下測試。 ### 加跟減 如果長度較長的向量長度是較短的倍數的話是可以相加或相減的。 ~~~ > c(1, 2) + c(1, 2, 3) [1] 2 4 4 警告訊息： In c(1, 2) + c(1, 2, 3) : 較長的物件長度並非較短物件長度的倍數 > c(1, 2) + c(1, 2, 3, 4) # 1+1 2+2 1+3 1+4 [1] 2 4 4 6 ~~~ ### 乘跟除 乘跟除的情況與加跟減狀況一致，只是當長度不是倍數時會有結果但也會警告。 ~~~ > c(1, 2) * c(1, 2, 3) # 1*1 2*2 1*3 [1] 1 4 3 警告訊息： In c(1, 2) * c(1, 2, 3) : 較長的物件長度並非較短物件長度的倍數 > c(1, 2) * c(1, 2, 3, 4) # 1*1 2*2 1*3 2*4 [1] 1 4 3 8 ~~~