r-组合base和dplyr:使用as.matrix()强制在最终对象中创建行号

Question

在我的情况下，我想打开我的数据集(RES_F(，并应用一些dplyr函数，并使用as.matrix在我的X_train最终对象中强制创建行号

library(dplyr)
RES_F<-read.csv("https://raw.githubusercontent.com/Leprechault/trash/main/cnn_ds.csv",sep=",",h=T)
RES_train<-RES_F%>% group_by(status) %>% sample_n(1280)
X_train <- RES_train %>% select(-status) %>% as.matrix(nrow = length(RES_train[,2]), ncol = ncol(RES_train)-1, byrow = TRUE)
str(X_train)
# chr [1:2560, 1:5] "attack" "attack" "attack" "attack" "attack" "attack" "attack" "attack" "attack" "attack" "attack" ...
# - attr(*, "dimnames")=List of 2
#  ..$ : NULL
#  ..$ : chr [1:5] "status" "NDVI" "SIPI" "RGI" ...

但是，我没有成功地将..$ : NULL替换为X_train。我的目标是：

#  ..$ : chr [1:2560] "1" "2" "3" "4" ...
#  ..$ : chr [1:5] "status" "NDVI" "SIPI" "RGI" ...

有什么想法吗？

Answer 1

rownames(X_train) <- seq(1,nrow(X_train))
str(X_train)
# chr [1:2560, 1:5] "attack" "attack" "attack" "attack" "attack" "attack" "attack" "attack" #"attack" "attack" "attack" ...
# - attr(*, "dimnames")=List of 2
#  ..$ : chr [1:2560] "1" "2" "3" "4" ...
#  ..$ : chr [1:5] "status" "NDVI" "SIPI" "RGI" ...