A056032 Trimorphic but not bimorphic nor automorphic.

4, 9, 24, 49, 51, 75, 99, 125, 249, 251, 375, 499, 501, 624, 749, 751, 875, 999, 1249, 3751, 4375, 4999, 5001, 5625, 6249, 8751, 9375, 9999, 18751, 31249, 40625, 49999, 50001, 59375, 68751, 81249, 90624, 99999, 109375, 218751, 281249, 390625, 499999

Offset

1,1

Links

Table of n, a(n) for n=1..43.

Mathematica

Do[x=Floor[N[Log[10, n], 25]]+1; If[Mod[n^3, 10^x] == n, If[Mod[n^2, 10^x]!= n, Print[n]]], {n, 5*10^5}]

Crossrefs

Cf. A003226 and A033819.

Sequence in context: A255876 A158141 A056575 * A304908 A127979 A112262

Adjacent sequences: A056029 A056030 A056031 * A056033 A056034 A056035

Keyword

easy,nonn

Author

Robert G. Wilson v, Jul 24 2000

Extensions

Missing a(41) inserted by Sean A. Irvine, Apr 12 2022

Status

approved