|
Search: id:A085453
|
|
|
| A085453 |
|
Numbers n such that n^2 and n^3 together use only distinct digits. |
|
+0
1
|
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
There are only six such numbers (in base 10). Numbers with distinct digits in A010784. Primes with distinct digits in A029743. The case n and n^2 (exactly 22 numbers) in A059930. The case n and prime[n] (exactly 101 numbers) in A085451.
|
|
EXAMPLE
|
69 is (the last) term because 69^2=4761 and 69^3=328509 together use all 10 distinct digits.
|
|
MATHEMATICA
|
bb = {}; Do[idpn = IntegerDigits[n^3]; idn = IntegerDigits[n^2]; If[Length[idn] + Length[idpn] == Length[Union[idn, idpn]], bb = {bb, n}], {n, 1, 10000}]; Flatten[bb]
|
|
CROSSREFS
|
Cf. A010784 A029743 A059930 A085451
Sequence in context: A103026 A098506 A163168 this_sequence A030439 A119386 A162219
Adjacent sequences: A085450 A085451 A085452 this_sequence A085454 A085455 A085456
|
|
KEYWORD
|
fini,nonn,base
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), Jul 01 2003
|
|
|
Search completed in 0.002 seconds
|
