ฟังก์ชันเมทริกซ์ใน R: สร้าง พิมพ์ เพิ่มคอลัมน์ และสไลซ์

ฟังก์ชันเมทริกซ์ใน R

ฟังก์ชันเมทริกซ์ใน R คืออาร์เรย์ 2 มิติที่มีจำนวนแถว m และจำนวนคอลัมน์ n กล่าวอีกนัยหนึ่ง เมทริกซ์ในการเขียนโปรแกรม R คือการรวมกันของเวกเตอร์สองตัวขึ้นไปที่มีชนิดข้อมูลเดียวกัน

หมายเหตุ คุณสามารถสร้างอาร์เรย์มิติมากกว่าสองมิติด้วยฟังก์ชันเมทริกซ์ใน 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:

สร้างเมทริกซ์ใน R

มิติการพิมพ์ของเมทริกซ์ด้วย 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:

เมทริกซ์ที่มี 5 แถวที่มีแถวเรียง = FALSE

มิติการพิมพ์ของเมทริกซ์ด้วย 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,] เลือกองค์ประกอบทั้งหมดของแถวแรก

นี่คือผลลัพธ์ที่คุณได้รับสำหรับโค้ดด้านบน

ตัดเมทริกซ์