从R

时间:2016-01-15 17:25:58

标签: r dataframe gsub

我在 R

中有以下数据框
V1    V2             V3
A     3.5 - 5.5      2
B     3.5 - 5.5      2.2 - 5.0 
C     18 - 25        3.5
D     0.6 - 1.5      3 - 4.7
E     30             2.3 - 3 
F     11.0 - 13.0    1
G     6.5 - 8.5      3 - 5
H     16 - 19        4 - 10
I     1.5 - 2.0      2
J     11.0 - 14.0    3
K     1.2            5
L     32             7
M     31             8

列表很大(> 100,000行)。我想识别包含数据帧中单个数字的所有行,然后生成第二个数据帧,如:

V1    V2
E     30
K     1.2
L     32
M     31

V1    V3 
A     2
C     3.5
F     1
I     2
J     3
K     5
L     7
M     8

选择单个数字行的最佳方法是什么?我试图用gsub命令弄清楚,但没有成功。

1 个答案:

答案 0 :(得分:3)

寻找连字符并否定它。 grepl()适用于此。

df[!grepl("-", df$V2, fixed = TRUE), -3]
#    V1  V2
# 5   E  30
# 11  K 1.2
# 12  L  32
# 13  M  31

V3-2

相同
df[!grepl("-", df$V3, fixed = TRUE), -2]
#    V1  V3
# 1   A   2
# 3   C 3.5
# 6   F   1
# 9   I   2
# 10  J   3
# 11  K   5
# 12  L   7
# 13  M   8

更新:正如Frank所说,您可以使用is.na()执行此操作,如果您打算将数据用于计算,最好将数据强制转换为数字。在这种情况下,如果V2V3是因素,则可以执行

df[-1] <- lapply(df[-1], function(x) as.numeric(levels(x))[x])

如果它们是字符

df[-1] <- lapply(df[-1], as.numeric)

然后,您可以简单地对is.na()的否定进行子集。

df[!is.na(df$V2), -3]
#    V1   V2
# 5   E 30.0
# 11  K  1.2
# 12  L 32.0
# 13  M 31.0

......等等。