ฟังก์ชันเมทริกซ์ใน R: สร้าง พิมพ์ เพิ่มคอลัมน์ และสไลซ์
ฟังก์ชันเมทริกซ์ใน R
ฟังก์ชันเมทริกซ์ใน R คืออาร์เรย์ 2 มิติที่มีจำนวนแถว m และจำนวนคอลัมน์ n กล่าวอีกนัยหนึ่ง เมทริกซ์ในการเขียนโปรแกรม R คือการรวมกันของเวกเตอร์สองตัวขึ้นไปที่มีชนิดข้อมูลเดียวกัน
หมายเหตุ คุณสามารถสร้างอาร์เรย์มิติมากกว่าสองมิติด้วยฟังก์ชันเมทริกซ์ใน R ได้
วิธีสร้างเมทริกซ์ใน R
เราสามารถสร้างเมทริกซ์โดยใช้ฟังก์ชัน matrix() ต่อไปนี้คือฟังก์ชันในการสร้างเมทริกซ์ใน R ซึ่งรับอาร์กิวเมนต์สามตัว:
matrix(data, nrow, ncol, byrow = FALSE)
ข้อโต้แย้ง:
- ข้อมูล: การรวบรวมองค์ประกอบที่ R จะจัดเรียงเป็นแถวและคอลัมน์ของเมทริกซ์ \
- แคบ: จำนวนแถว
- น: จำนวนคอลัมน์
- แถวๆ: แถวจะเต็มจากซ้ายไปขวา เราใช้ `byrow = FALSE` (ค่าเริ่มต้น) ถ้าเราต้องการให้คอลัมน์เติมเมทริกซ์ เช่น ค่าจะถูกเติมจากบนลงล่าง
เรามาสร้างเมทริกซ์ขนาด 5×2 สองตัวที่มีลำดับตัวเลขตั้งแต่ 1 ถึง 10 โดยอันหนึ่งมี byrow = TRUE และอีกอันมี byrow = FALSE เพื่อดูความแตกต่าง
# Construct a matrix with 5 rows that contain the numbers 1 up to 10 and byrow = TRUE matrix_a <-matrix(1:10, byrow = TRUE, nrow = 5) matrix_a
Output:
มิติการพิมพ์ของเมทริกซ์ด้วย dim()
ตอนนี้ เรามาพิมพ์มิติของเมทริกซ์ใน R ด้วย dim() ไวยากรณ์ในการพิมพ์เมทริกซ์ใน R โดยใช้ dim() คือ:
# Print dimension of the matrix with dim() dim(matrix_a)
Output:
## [1] 5 2
สร้างเมทริกซ์ที่มี 5 แถวซึ่งประกอบด้วยตัวเลขตั้งแต่ 1 ถึง 10 และ byrow = FALSE
# Construct a matrix with 5 rows that contain the numbers 1 up to 10 and byrow = FALSE matrix_b <-matrix(1:10, byrow = FALSE, nrow = 5) matrix_b
Output:
มิติการพิมพ์ของเมทริกซ์ด้วย dim()
อีกครั้ง พิมพ์มิติของเมทริกซ์โดยใช้ dim() ด้านล่างนี้เป็นไวยากรณ์ของมิติเมทริกซ์การพิมพ์ R:
# Print dimension of the matrix with dim() dim(matrix_b)
Output:
## [1] 5 2
หมายเหตุ: การใช้คำสั่ง matrix_b <-matrix(1:10, byrow = FALSE, ncol = 2) จะมีผลเช่นเดียวกับข้างต้น
คุณสามารถสร้างเมทริกซ์ 4×3 โดยใช้ ncol ได้ R จะสร้าง 3 คอลัมน์และเติมแถวจากบนลงล่าง ตรวจสอบตัวอย่าง
matrix_c <-matrix(1:12, byrow = FALSE, ncol = 3) matrix_c
Output:
## [,1] [,2] [,3] ## [1,] 1 5 9 ## [2,] 2 6 10 ## [3,] 3 7 11 ## [4,] 4 8 12
ตัวอย่าง:
dim(matrix_c)
Output:
## [1] 4 3
เพิ่มคอลัมน์ให้กับเมทริกซ์ด้วยคำสั่ง cbind()
คุณสามารถเพิ่มคอลัมน์ให้กับเมทริกซ์ R ด้วยคำสั่ง cbind() cbind() หมายถึงคอลัมน์binding.cbind() สามารถต่อเมทริกซ์หรือคอลัมน์ได้มากเท่าที่ระบุไว้ ตัวอย่างเช่น ตัวอย่างก่อนหน้านี้ของเราสร้างเมทริกซ์ขนาด 5×2 เราเชื่อมคอลัมน์ที่สามเข้าด้วยกันและตรวจสอบว่ามิติข้อมูลเป็น 5×3
ตัวอย่าง:
# concatenate c(1:5) to the matrix_a matrix_a1 <- cbind(matrix_a, c(1:5)) # Check the dimension dim(matrix_a1)
Output:
## [1] 5 3
ตัวอย่าง:
matrix_a1
เอาท์พุต
## [,1] [,2] [,3] ## [1,] 1 2 1 ## [2,] 3 4 2 ## [3,] 5 6 3 ## [4,] 7 8 4 ## [5,] 9 10 5
ตัวอย่าง:
นอกจากนี้เรายังสามารถเพิ่มคอลัมน์ลงในเมทริกซ์ R ได้มากกว่าหนึ่งครั้ง เรามาดูลำดับถัดไปของตัวเลขของเมทริกซ์ matrix_a2 มิติของเมทริกซ์ใหม่ใน R จะเป็น 4×6 โดยมีตัวเลขตั้งแต่ 1 ถึง 24
matrix_a2 <-matrix(13:24, byrow = FALSE, ncol = 3)
Output:
## [,1] [,2] [,3] ## [1,] 13 17 21 ## [2,] 14 18 22 ## [3,] 15 19 23 ## [4,] 16 20 24
ตัวอย่าง:
matrix_c <-matrix(1:12, byrow = FALSE, ncol = 3) matrix_d <- cbind(matrix_a2, matrix_c) dim(matrix_d)
Output:
## [1] 4 6
หมายเหตุ: จำนวนแถวของเมทริกซ์ใน R ควรเท่ากันสำหรับงาน cbind
cbind()ต่อคอลัมน์ rbind() ต่อท้ายแถว ลองเพิ่มหนึ่งแถวในเมทริกซ์ matrix_c ของเราและตรวจสอบว่ามิติคือ 5×3
matrix_c <-matrix(1:12, byrow = FALSE, ncol = 3) # Create a vector of 3 columns add_row <- c(1:3) # Append to the matrix matrix_c <- rbind(matrix_c, add_row) # Check the dimension dim(matrix_c)
Output:
## [1] 5 3
ตัดเมทริกซ์
เราสามารถเลือกองค์ประกอบหนึ่งหรือหลายองค์ประกอบจากเมทริกซ์ใน การเขียนโปรแกรม R โดยใช้เครื่องหมายวงเล็บเหลี่ยม [ ] นี่คือจุดที่การแบ่งส่วนเข้ามาเกี่ยวข้อง
ตัวอย่างเช่น:
- matrix_c[1,2] เลือกองค์ประกอบที่แถวแรกและคอลัมน์ที่สอง
- matrix_c[1:3,2:3] ส่งผลให้เกิดเมทริกซ์ส่วน R พร้อมข้อมูลในแถว 1, 2, 3 และคอลัมน์ 2, 3
- matrix_c[,1] เลือกองค์ประกอบทั้งหมดของคอลัมน์แรก
- matrix_c[1,] เลือกองค์ประกอบทั้งหมดของแถวแรก
นี่คือผลลัพธ์ที่คุณได้รับสำหรับโค้ดด้านบน