在R中，如何提取矩阵维度名称(或标签)并将这些名称列在另一个向量中？

# 创建一个矩阵
matrix_data <- matrix(1:9, nrow = 3, ncol = 3)
dimnames(matrix_data) <- list(c("row1", "row2", "row3"), c("col1", "col2", "col3"))

# 提取行名称
row_names <- dimnames(matrix_data)[[1]]
print(row_names)

# 提取列名称
col_names <- dimnames(matrix_data)[[2]]
print(col_names)

[1] "row1" "row2" "row3"
[1] "col1" "col2" "col3"