可以通过以下步骤实现:
matrix <- matrix(NA, nrow = 3, ncol = 4)
values <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)
index <- 1
for (i in 1:nrow(matrix)) {
for (j in 1:ncol(matrix)) {
matrix[i, j] <- values[index]
index <- index + 1
}
}
has_duplicates <- any(duplicated(matrix)) || any(duplicated(t(matrix)))
如果has_duplicates
的值为FALSE
,则表示矩阵中的行和列没有重复的值。
完整的代码示例:
matrix <- matrix(NA, nrow = 3, ncol = 4)
values <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)
index <- 1
for (i in 1:nrow(matrix)) {
for (j in 1:ncol(matrix)) {
matrix[i, j] <- values[index]
index <- index + 1
}
}
has_duplicates <- any(duplicated(matrix)) || any(duplicated(t(matrix)))
这个方法可以用于将任意长度的值列表分发到任意大小的矩阵中,并且保证行和列中没有重复的值。
领取专属 10元无门槛券
手把手带您无忧上云