为文本内的数字创建文件夹

Question

我正在尝试为某些错误消息创建关联规则。但是，因为许多错误在文本中都有数字测量，所以他们正在读取64k唯一错误，实际上它有大约200个独特的错误消息。为了使数据更易于管理，我想将数值分类（10到15个分档）。但我不想编辑错误的文本部分只有数字。

示例错误：

1：错误。伏特0.025，系统故障提供22％

2：错误。伏特0.0015，辅助系统故障sup 53％

3：系统监视器。 bal 882台。横是-1.8

希望的输出（ 1：误差伏特1，系统故障SUP 50％

2：错误伏特1，辅助系统故障SUP 50％

3：系统监视器。我想要使​​用gsub，但遇到了一个问题，创建箱子，也有很多gsubs在一个。 y < - gsub（“\ d \。\ d \ d” ，“1”，数据）

关于如何仅为错误消息的数字部分创建分箱而不影响文本的任何想法？我对箱子的数量不是很挑剔。

Answer 1

我在理解这件事上有点麻烦，但这就是我的想法。

使用分配给字符的变量，可以很容易地使用粘贴将错误消息中的数字放在文本中。

提示：如果你使用库（tcltk），你也可以发送错误弹出窗口到屏幕上。

这里的基本思想是...

library(tcltk) 
library(tcltk2) 

errornumber=4 

tkmessageBox(message=(paste("Error:",errornumber, 
sep=' ')),icon="warning") 

这使您可以将任意数量和角色一起在一个警告弹出。

应用到你....

library(tcltk) 
library(tcltk2) 

if(volt>0 & volt<1){ 

error=1 

tkmessageBox(message=(paste("Error:",error, 
sep=' ')),icon="warning") 

} else if (volt>1.1 & volt<5.5){ 

error=5.5 

tkmessageBox(message=(paste("Error:",error, 
sep=' ')),icon="warning") 
} 

希望这有助于在某种程度上，又不能完全确定你所追求的？ 您可以在粘贴部分添加任何数字或字符串。

编辑： 我已经重新错误消息＃1对你来说，你需要由于是基于你的程序和条件，分配正确的变量

library(tcltk) 
library(tcltk2) 

#"Variables" 
voltread=0.025 
percentread=22 

tkmessageBox(message=(paste("error. volt",voltread,"system failure sup" 
,percentread,"percent",sep=' ')),icon="error")