Replace Pioneer来统计5位数字其中4位数字组合次数

Replace Pioneer来统计5位数字其中4位数字组合次数
Replace Pioneer来统计5位数字其中4位数字组合次数

Replace Pioneer来统计5位数字其中4位数字组合次数
经了解,提问者举例如下：
04 08 12 14 15
04 05 06 08 09
02 05 06 11 13
02 04 06 13 14
05 06 07 12 14
01 02 04 07 14
01 02 07 14 15
01 02 08 13 14
01 02 12 13 14
01 04 08 12 14
这些5个数字数组,要统计出其中各种4个数字的组合出现的次数
这需要用Replace Pioneer写一些代码,步骤如下：
1. ctrl-o打开文件
2. ctrl-h打开replace窗口
* replace unit选择Line
* 点击Advanced页,在run following at the beginning of replace输入clear_values_all()
* 在run following for each matched unit输入
if ($match[1]=~/\d/) {
set_value($match[1].$match[2].$match[3].$match[4],get_value($match[1].$match[2].$match[3].$match[4])+1);
set_value($match[1].$match[2].$match[3].$match[5],get_value($match[1].$match[2].$match[3].$match[5])+1);
set_value($match[1].$match[2].$match[4].$match[5],get_value($match[1].$match[2].$match[4].$match[5])+1);
set_value($match[1].$match[3].$match[4].$match[5],get_value($match[1].$match[3].$match[4].$match[5])+1);
set_value($match[2].$match[3].$match[4].$match[5],get_value($match[2].$match[3].$match[4].$match[5])+1);
}
* 在insert end text输入get_values_all()
3. 点击replace,完成.
4. ctrl-s存盘.