R从数据帧创建一个不均匀的(7行乘6列)转换矩阵

# 创建一个数据帧
data_frame <- data.frame(
  col1 = c(1, 2, 3, 4, 5, 6, 7),
  col2 = c(8, 9, 10, 11, 12, 13, 14),
  col3 = c(15, 16, 17, 18, 19, 20, 21),
  col4 = c(22, 23, 24, 25, 26, 27, 28),
  col5 = c(29, 30, 31, 32, 33, 34, 35),
  col6 = c(36, 37, 38, 39, 40, 41, 42)
)

# 将数据帧转换为矩阵
matrix <- as.matrix(data_frame)

# 打印转换矩阵
print(matrix)