[文本处理] 应该如何写这个批处理统计一个文本中的数字出现次数

Rank: 1

帖子: 12
积分: 14
技术: 0
捐助: 0
注册时间: 2012-8-14

3楼

发表于 2012-9-20 11:11 | 只看该作者

就是这堆数字中，5 2 5 4 6 1 2 5 0 8 7 9 5 4 6 2 0 8 9 7 6 0 4 2 5 1 。。。。。。。。。
紧挨着0后面出现的数字
紧挨着0后面没有1出现过，所以1是0次，8在0后面出现过2次，4出现过1次
要处理的文本比较大，大概几百k到1m那样吧，不知道能处理吗？

lky216

一级士官

Rank: 2

帖子: 135
积分: 149
技术: 3
捐助: 0
注册时间: 2012-5-18

4楼

发表于 2012-9-20 12:06 | 只看该作者

多大也能处理，那就是要看时间多久了。期待大婶回复。

冷玉公子

三级士官

Rank: 3 Rank: 3

帖子: 168
积分: 248
技术: 11
捐助: 0
注册时间: 2011-4-19

5楼

发表于 2012-9-20 15:41 | 只看该作者

哈哈个人觉得这个方法很靠谱

@Echo Off&SetLocal EnableDelayedExpansion
For %%A In (1 2 3 4 5 6 7 8 9) Do Set _%%A=0
For %%A In (5 2 5 4 6 1 2 5 0 8 7 9 5 4 6 2 0 8 9 7 6 0 4 2 5 1 0 4 2 5 1 0 5 2 5 1) Do (
	If "!Is!" == "1" Set /A "_%%A+=1" & Set "Is="
	If %%A Equ 0 Set "Is=1"
)
Set /P Echo=0后面出现的数字：< Nul
For /F "tokens=1,2 delims=_=" %%A In ('Set _') Do (
	Set /P Echo=%%A为%%B次，< Nul
)
Pause>Nul
复制代码

上面的命令执行结果为：

0后面出现的数字：1为0次，2为0次，3为0次，4为2次，5为1次，6为0次，7为0次，8为2次，9为0次，
复制代码

Rank: 1

帖子: 12
积分: 14
技术: 0
捐助: 0
注册时间: 2012-8-14

6楼

发表于 2012-9-20 17:47 | 只看该作者

回复 5# 冷玉公子

你好，谢谢你的回复，不过我要处理的不仅仅是那一点数据，而且一个1.txt文本，里面的内容比那一行数字大多了，For %%A In (5 2 5 4 6 1 2 5 0 8 7 9 5 4 6 2 0 8 9 7 6 0 4 2 5 1 0 4 2 5 1 0 5 2 5 1) Do (

这一行应该改一下吧，期待你的回复~！！

apang

上将

Rank: 8 Rank: 8

帖子: 2085
积分: 14204
技术: 665
捐助: 0
注册时间: 2011-11-27

7楼

发表于 2012-9-20 23:44 | 只看该作者

效率不高、没有排序。。。

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
  set "str=$%%a$"
  for /l %%b in (0 1 9) do (
    for /l %%c in (0 1 9) do (
      for %%d in ("!str:%%b %%c=" "!") do set/a .%%b%%c+=1
      set/a .%%b%%c-=1
    )
  )
)
(for /l %%a in (0 1 9) do (
  for /l %%b in (0 1 9) do set "v=!v!,%%b为!.%%a%%b!次"
  echo,%%a后面数字: !v:~1!
  set "v="
))>b.txt
复制代码

forfiles

少将

Rank: 8 Rank: 8

帖子: 571
积分: 5364
技术: 29
捐助: 0
注册时间: 2012-6-7

8楼

发表于 2012-9-20 23:54 | 只看该作者

回复 6# ketop

数据总量大概有多少？
能否上传部分真实数据方便测试？

Rank: 1

帖子: 12
积分: 14
技术: 0
捐助: 0
注册时间: 2012-8-14

9楼

发表于 2012-9-21 00:01 | 只看该作者

怎么都没有人解决呢？

forfiles

少将

Rank: 8 Rank: 8

帖子: 571
积分: 5364
技术: 29
捐助: 0
注册时间: 2012-6-7

10楼

发表于 2012-9-21 00:17 | 只看该作者

回复 9# ketop

抽个时间回复一下7楼和8楼吧

terse

中将

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

11楼

发表于 2012-9-21 01:35 | 只看该作者

本帖最后由 terse 于 2012-9-21 02:47 编辑

也没排序

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (1.txt) do (
    set "i="
    for %%j in (%%i) do (
        set /a "_!i!_%%j+=1"
        set i=%%j
    )
)
for /l %%i in (0 1 9) do (
   for /l %%j in (0 1 9) do if defined _%%i_%%j (set "var=!var! %%j-!_%%i_%%j!次") else set "var=!var! %%j-0次"
   echo;%%i后面:!var!&set var=
)
pause
复制代码

Rank: 1

帖子: 12
积分: 14
技术: 0
捐助: 0
注册时间: 2012-8-14

12楼

发表于 2012-9-21 02:02 | 只看该作者

回复 11# terse

为什么我测试了不成功啊？

Rank: 1

帖子: 12
积分: 14
技术: 0
捐助: 0
注册时间: 2012-8-14

13楼

发表于 2012-9-21 02:05 | 只看该作者

回复 7# apang

我测试了，不行，不知道是不是文本内容太大的缘故。

terse

中将

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

14楼

发表于 2012-9-21 02:46 | 只看该作者

回复 12# ketop

把你的文本发上来文本大应该是一个因素
另上面代码漏写一处已经改
其实发上来看到 7楼一个思路

全天占线

Rank: 1

帖子: 4
积分: 13
技术: 1
捐助: 0
注册时间: 2011-10-7

15楼

发表于 2012-9-21 03:20 | 只看该作者

gawk "{for(i=2;i<NF;i++){$($(i-1)$i)++};for(i=0;i<=9;i++){print i,$(0i)}}" 1.txt|sort /+2
复制代码