我有一个大型数据库,数据示例如下:
data <- tibble(
time = c(1,2,3,4),
year = c("2000 (x", "2002", "2005 (b)","2004(z)"),
temp = c("20", "30 M", "43 (N)", "60" ),
year2 = c("1970", "1980(c)", "1990", "2000"))
从这些小的数据中可以看到,一些数据带有标签,我想在整个数据库中删除它们。
这是感兴趣的结果
time year temp year2
1 1 2000 20 1970
2 2 2002 30 1980
3 3 2005 43 1990
4 4 2004 60 2000
也许你可以尝试gsub
内lapply
删除标记,例如,
type.convert(list2DF(lapply(data, function(x) gsub("\\D", "", x))), as.is = TRUE)
这使
time year temp year2
1 1 2000 20 1970
2 2 2002 30 1980
3 3 2005 43 1990
4 4 2004 60 2000
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句