R：重命名矩阵的列/行的省时方法

Question

有没有更有效的方法：矩阵expr为15745 x 41

for (i in 1:ncol(expr)){
   colnames(expr)[i] <- paste0("V",i);
}
for (i in 1:nrow(expr)){
   rownames(expr)[i] <- paste0(i);
}

Answer 1

colnames(expr) <- paste0("V",1:ncol(expr))
rownames(expr) <- 1:nrow(expr)

Answer 2

我们可以使用dimnames来做到这一点

dimnames(expr) <- list(seq_len(nrow(expr)), paste0("V", seq_len(ncol(expr))))

---

或者，这可以明确地分配也做colnames和rownames正如我们在前面的评论

colnames(expr) <- paste0("V", seq_len(ncol(expr)))
rownames(expr) <- seq_len(nrow(expr))

---

或另一种选择是将其转换为data.frame ，这将自动进行命名（如果可以使用data.frame的话）

as.data.frame(expr)

数据

set.seed(24)
expr <- matrix(rnorm(10*5), 10, 5)