A065571 Numbers whose decimal digits can be permuted to give a multiple of 11.

0, 11, 22, 33, 44, 55, 66, 77, 88, 99, 101, 110, 112, 121, 123, 132, 134, 139, 143, 145, 148, 154, 156, 157, 165, 166, 167, 175, 176, 178, 184, 187, 189, 193, 198, 202, 209, 211, 213, 220, 224, 231, 235, 242, 246, 249, 253, 257, 258, 264, 267, 268, 275, 276

Offset: 0

Author

Reinhard Zumkeller, Dec 02 2001

Keywords

• nonn
• base

Comments

a(k) = A064544(k) for k <= 263, a(263) = 1111. But the digits of the next biquam 1113 cannot be arranged to a multiple of 11. So we have a subset of those biquams, whose separating sets differ at most by 1 in size.

Programs

Mathematica

Select[Range[0,300],AnyTrue[FromDigits/@Permutations[ IntegerDigits[ #]], Divisible[ #,11]&]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 15 2016 *)