A023088 Numbers k such that k and 4*k are anagrams.

0, 1782, 2178, 16782, 17604, 17802, 17820, 17832, 17982, 18027, 19728, 19782, 20178, 21678, 21780, 21783, 21798, 21978, 23958, 102564, 103845, 104769, 104895, 105264, 106254, 114528, 125406, 125604, 126054, 128052, 128205, 140256, 140526, 142857

Offset

1,2

Comments

All terms are divisible by 3. - Eric M. Schmidt, Jul 12 2014

Links

David W. Wilson, Table of n, a(n) for n = 1..10001

Mathematica

si[n_] := Sort@ IntegerDigits@ n; Flatten@{0, Table[Select[Range[10^d + 2, 3 10^d - 1, 3], si[#] == si[4 #] &], {d, 0, 6}]} (* Giovanni Resta, Mar 20 2017, corrected by Philippe Guglielmetti, Jul 16 2018 *)
Select[Range[0, 150000, 3], Sort[IntegerDigits[#]]==Sort[ IntegerDigits[ 4#]]&] (* Harvey P. Dale, Dec 23 2017 *)

Crossrefs

Cf. A023086, A023087, A023089, A023090, A023091, A023092, A023093.

Sequence in context: A187524 A253057 A204637 * A251086 A255157 A175693

Adjacent sequences: A023085 A023086 A023087 * A023089 A023090 A023091

Keyword

nonn,base

Author

David W. Wilson

Status

approved