在使用normalize.quantiles时保留行名和列名

Question

我有一个带有行名和列名的数据框，请参见下文

set.seed(123)
dat<-data.frame(expand.grid(c("A", "B"), LETTERS[1:4]), 
           matrix(sample(40), ncol = 5))
rownames(dat)<-LETTERS[1:8]

我使用normalize.quantiles对数据进行规范化

library(preprocessCore)
n.dat<-normalize.quantiles(as.matrix(dat[ 3:ncol(dat)]))

问题是归一化row col names消失之后。 如何在不重命名行和列的情况下保留它？