R 中的数据清理

Data Cleaning in R

我有一个 csv 文件,我只想提取包含 toward 的句子的时间戳以及该句子中的水果名称。我如何在 R 中执行此操作(或者如果有更快的方法,那是什么?)

1438293900729698553,robot is in motion toward [strawberry]
1438293900730571638,Found a plan for avocado in 1.36400008202 seconds
1438293900731434815,current probability is greater than EXECUTION_THRESHOLD
1438293900731554567,ready to execute am original plan of len = 33
1438293900731586463,len of sub plan 1 = 24
1438293900731633713,len of sub plan 2 = 9
1438293900732910799,put in an execution request; now updating the dict
1438293900732949576,current_prediciton_item = avocado
1438293900733070339,current_item_probability = 0.880086981207
1438293901677787230,current probability is greater than PLANNING_THRESHOLD
1438293901681590725,robot is in motion toward [avocado]
1438293902689233770,we have received verbal request [avocado]
1438293902689314002,we already have a plan for the verbal request
1438293902689377800,debug
1438293902690529516,put in the final motion request
1438293902691076051,Found a plan for avocado in 1.95595788956 seconds
1438293902691084147,current predicted item != motion target; calc a new plan
1438293902691110642,current probability is greater than EXECUTION_THRESHOLD
1438293902691885974,have existing requests
1438293904496769068,robot is in motion toward [avocado]
1438293907737142498,ready to pick up the item

理想情况下,我希望输出是这样的:

1438293900729698553, strawberry
1438293901681590725, avocado
1438293904496769068, avocado

试一试,其中 filename 是您的文件名。

g <- grep("toward", readLines(filename), fixed = TRUE, value = TRUE)
gsub("((?<=,).*\[)|\]", "", g, perl = TRUE)
# [1] "1438293900729698553,strawberry" "1438293901681590725,avocado"   
# [3] "1438293904496769068,avocado"