OFFSET
1,1
COMMENTS
a(6) = 891 because 891*6 = 5346, 891*4 = 3564 and 5346 is an anagram of 3564.
MATHEMATICA
f[n_] := Block[ {k = 1}, While[ Sort@ IntegerDigits[4 k] != Sort@ IntegerDigits[k*n], k++ ]; k]; Array[f, 40] (* Robert G. Wilson v, Aug 15 2010 *)
CROSSREFS
KEYWORD
base,nonn,fini,full
AUTHOR
Claudio Meller, Aug 09 2010
EXTENSIONS
More terms from Robert G. Wilson v, Aug 15 2010
STATUS
approved