r - 数字作为 read.delim 后的因素

Question

我有一个如下所示的数据框:

 A      B      C      D       
 1      2      3      4   
 E      F      G      H     
 5      6      7      8    

我想使用以下代码仅对数字部分进行子集化:

 sub_num = DF[sapply(DF, is.numeric)] 

问题是数字是使用 read.delim 读取 data.frame 后的因子。如果我设置 stringsAsFactors = FALSE 数字是字符。这可能是一个基本问题，但我无法解决。

Answer 1

试试下面的方法

 sub_num <- DF[!is.na(as.numeric(sapply(DF, as.character)))[1:ncol(DF)], ]
 #     V1 V2 V3 V4
 #   2  1  2  3  4
 #   4  5  6  7  8 

---

至于你的sapply语句，sapply(DF, is.numeric)，为了正常工作，它需要as.character

sapply(DF, function(X) is.numeric(as.character(X)))

但这不会像您期望的那样为您的 DF 编制索引