[已解决]批处理怎样对字符串进行可重复组合？

yangfengoo

对给定个数字符进行可重复组合
例：set zf=abcdefghijklmnopqrstuvwxyz
如果输入5（不固定） 则从zf 中取5个进行组合：
有：aaaaa；aaaab，aaaac，……zzzzz。
但如aaaac，acaaa,aacaa,caaaa……
     abcde，cdabc,dacbe……

均属重复只要任意一个即可。
说明：1.遍历比较实现应该很简单，但效率太低。希望有高效的方法。
          2.这题如一般排列组合有差别
         3.如果字符不好处理，set zf=0123456789亦可（这个是原题要求，也是我要的），这里要求字符是为了通用性。
--------------------------------------------
感谢powerbat 提供的思路

@echo off
setlocal enableDelayedExpansion
set arr=0123456789
::len为arr的长度
set len=10
set /p num=需要组合的字数：
set /a num-=1,len-=1
for /l %%a in (0 1 %num%) do (
    if 0==%%a (set start=0) else (set /a start=%%a-1&set start=%%!start!)
    set "do=!do! for /l %%%%a in (!start!,1,%len%) do"
    set "exp=!exp!^!arr:~%%%%a,1^!"
)
%do% echo %exp%
pause
endlocal
复制代码

CrLf

一种思路(未深入分析):把字符的个数先看作一个和, 先对这个和作 加法式 的分解形式枚举, 再作进一步处理.
例: 5=5, 4+1, 3+2, 3+1+1, 2+3(重复), 2+2+1, 2+1+2(重复), 2+1+1+1, 1+4(重复), 1+3+1(重复), 1+2+2(重复 ...
neorobin 发表于 2011-5-1 19:18

我的思路和兄台类似，不过我是想把a、b、c这样设置：
set .1=a
set .2=b
set .3=c
然后检查for /l中每个循环的set /a test1=%%a"%%"1,test2=%%a"%%"2,test3=%%a"%%"4，但是只是一个模糊的思路，昨天写了半天竟然发现代码离题了。

neorobin

一种思路(未深入分析):把字符的个数先看作一个和, 先对这个和作 加法式 的分解形式枚举, 再作进一步处理.
例: 5=5, 4+1, 3+2, 3+1+1, 2+3(重复), 2+2+1, 2+1+2(重复), 2+1+1+1, 1+4(重复), 1+3+1(重复), 1+2+2(重复), 1+2+1+1(重复), 1+1+1+1+1
根本上是数论(有没有?), 离散数学类的范畴.

powerbat

字符数和组合字数其实都很好改，只是为了简洁而没有作进一步处理。核心是算法问题。
这个是比较基本的枚举，容易想到，但效率可能不怎么样（本人没研究过算法）

yangfengoo

8# batman


很明显上面的排列不符合我的要求，和我的问题不同。你是否理解了我的要求？

batman

楼主是否看看这两个贴子：
根据输入进行排列（有字符重复）
http://www.bathome.net/thread-1701-1-4.html
也是排列
http://www.bathome.net/viewthrea ... hlight=%C5%C5%C1%D0

yangfengoo

6# powerbat


思路不错，不过arr的长度被固定了

powerbat

说漏了，还有组合字数最多10个

powerbat

如果字符数多且组合字数多，不知道呈什么级数增长（我数学不太好）。最多处理15个字符：

@echo off
setlocal enableDelayedExpansion
set arr=bathome
set num=5
set /p num=需要组合的字数：
set var=%arr%fedcba9876543210
set /a len=0x%var:~15,1%
set /a numx=num-1, lenx=len-1
for /l %%a in (0 1 %numx%) do (
    if 0==%%a (set start=0) else (set /a start=%%a-1&set start=%%!start!)
    set "do=!do! for /l %%%%a in (!start!,1,%lenx%) do "
    set "exp=!exp!^!arr:~%%%%a,1^!"
)
%do% echo %exp%
pause
endlocal
复制代码

mxxcgzxxx

做个简单的，试试

@echo off&setlocal enabledelayedexpansion
set /p a=请输入组合元素：
set "str=%a%"
set /a max=8190,min=0
for /l %%a in (1,1,14) do (
     set /a "num=(max+min)/2"
     for /f "delims=" %%b in ("!num!") do if "!str:~%%b!" equ "" (set /a max=num) else set /a min=num
)
if "!str:~%num%!" neq "" set /a num+=1
:1
set /p b=您需要组合的字数：
set d=0
set "m="
:2
set /a c=!random!%%%num%
set m=%m%!a:~%c%,1!
set /a d+=1
if %d%==%b% goto :3
goto :2
:3
echo %m%
pause
goto :1
复制代码

yangfengoo

2# batman

这不是在集思广益吗？难道一定要遍历才行？这个问题本来就和一般的组合不同，如果全部遍历一遍有太多重复的数据

batman

1# yangfengoo
请问楼主不用遍历如何实现组合？