This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A111116 #21 Oct 12 2019 11:50:54 %S A111116 2,3,4,7,8,9,24,27,28,32,33,42,52,53,58,59,67,77,88,89,93,202,203,258, %T A111116 284,303,324,329,377,383,422,669,818,832,843,878,882,887,949,2027, %U A111116 2042,2673,3144,3222,3253,3302,3308,3737,3773,3953,3979,3983,4779,5353,5669 %N A111116 Numbers n such that digits of n are not present in n^4. %C A111116 The number of k-digit numbers for which this occurs is: 6,15,18,32,21,14,20,... %H A111116 Giovanni Resta, <a href="/A111116/b111116.txt">Table of n, a(n) for n = 1..179</a> (terms < 10^19, first 136 terms from Chai Wah Wu) %t A111116 Select[Range[6000], Intersection[IntegerDigits[ # ], IntegerDigits[ #^4]] == {} &] (* _Ray Chandler_, Oct 17 2005 *) %t A111116 fQ[n_] := Intersection[ Union[ IntegerDigits[n]], Union[ IntegerDigits[n^4]]] == {}; Select[ Range[ 5887], fQ[ # ] &] (* _Robert G. Wilson v_ *) %o A111116 (Python) %o A111116 A111116_list = [n for n in range(1,10**6) if set(str(n)) & set(str(n**4)) == set()] %o A111116 # _Chai Wah Wu_, Jan 05 2015 %Y A111116 Cf. A029783, A029785. %Y A111116 For the corresponding n^4, see A113316. %K A111116 base,nonn %O A111116 1,1 %A A111116 _Lekraj Beedassy_, Oct 15 2005 %E A111116 Corrected and extended by _Robert G. Wilson v_ and _Ray Chandler_, Oct 17 2005