|
Search: id:A111116
|
|
|
| A111116 |
|
Numbers n such that digits of n are not present in n^4. |
|
+0
4
|
|
| 2, 3, 4, 7, 8, 9, 24, 27, 28, 32, 33, 42, 52, 53, 58, 59, 67, 77, 88, 89, 93, 202, 203, 258, 284, 303, 324, 329, 377, 383, 422, 669, 818, 832, 843, 878, 882, 887, 949, 2027, 2042, 2673, 3144, 3222, 3253, 3302, 3308, 3737, 3773, 3953, 3979, 3983, 4779, 5353, 5669
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The number of k-digit numbers for which this occurs is: 6,15,18,32,21,14,20,...
|
|
FORMULA
|
Intersection( the digits of A000027, the digits of A000583) is null.
|
|
MATHEMATICA
|
Select[Range[6000], Intersection[IntegerDigits[ # ], IntegerDigits[ #^4]] == {} &] (*Chandler*)
fQ[n_] := Intersection[ Union[ IntegerDigits[n]], Union[ IntegerDigits[n^4]]] == {}; Select[ Range[ 5887], fQ[ # ] &] (* Robert G. Wilson v *)
|
|
CROSSREFS
|
Cf. A029783, A029785.
For the corresponding n^4, see A113316.
Sequence in context: A112736 A059930 A125965 this_sequence A113318 A056033 A047547
Adjacent sequences: A111113 A111114 A111115 this_sequence A111117 A111118 A111119
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Lekraj Beedassy (blekraj(AT)yahoo.com), Oct 15 2005
|
|
EXTENSIONS
|
Corrected and extended by Robert G. Wilson v (rgwv(at)rgwv.com) and Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 17 2005
|
|
|
Search completed in 0.002 seconds
|
