R数据文本挖掘相关问题

现有如下格式文本，需要取出每个序号所对应的机台号（即数字+#的格式字符）和相对应的时间，怎样在R里解决，具体数据详见附件excel表，时间紧急，拜托各位大神帮忙，谢谢~ 文本挖掘掘样本.xlsx (21.97 KB)

2018-12-25 10:29:34 上传

序号	其他情况
1	今日轮保1#、12#、17#机组。 24#换烟生产爱尚1小时。 27#换烟生产天香细支1.5小时。 2#更换卷胶泵20分钟。 15#辅联链板断1小时。 5#修包挤商标纸30分钟。 10#技术组整班修跑条。 7#技术组整班修小包透明转塔机构。
2	12#试胶1小时，修yf17电器30分。
3	今日轮保2#、3#、13#机组。 27#换450L齿形带30分钟。 6#修包装机电器1.5小时。
4	6#接班修包装机铝纸电器2小时。 4#修电器30分。 13#白班修卷烟机水松纸翘边7小时。 12#修卷烟机水松纸压辊3小时。 4#修电器30分。

可以使用stringr包中的str_extract_all函数

那具体怎样写提取处“数字+#"格式机器的表达式呢？还有就是提取出所对应的时间数据？

1. library(stringr)
   
2. str_extract_all(textdata, "[0-9]+#")

复制代码

如果我想把中间的文字提取出来并进行事项总结，是否要用文本挖掘的数据包呢？R哪些包有这个功能？应用起来复杂不？