login
A065571
Numbers whose decimal digits can be permuted to give a multiple of 11.
0
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,2
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.
MATHEMATICA
Select[Range[0, 300], AnyTrue[FromDigits/@Permutations[ IntegerDigits[ #]], Divisible[ #, 11]&]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 15 2016 *)
CROSSREFS
Sequence in context: A067042 A078273 A345391 * A064544 A083967 A343444
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Dec 02 2001
STATUS
approved