A214531 List of words over {1,8} with equal numbers of 1's and 8's.
18, 81, 1188, 1818, 1881, 8118, 8181, 8811, 111888, 118188, 118818, 118881, 181188, 181818, 181881, 188118, 188181, 188811, 811188, 811818, 811881, 818118, 818181, 818811, 881118, 881181, 881811, 888111
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
With[{tb=Table[Join[PadRight[{},n,1],PadRight[{},n,8]],{n,3}]},FromDigits/@ Flatten[Permutations/@tb,1]] (* Harvey P. Dale, Jan 17 2014 *)
Comments