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 A281148 #45 May 27 2025 15:01:05 %S A281148 2,3,8,9,13,14,22,33,44,52,72,77,87,92,222,322,622,7737,7878,30302, %T A281148 44449,72777,844844,44744744 %N A281148 Numbers k such that k and k^6 have no digits in common. %C A281148 0, 1, 5, 6 cannot be the last digit of any term. [0 added to list by _Jon E. Schoenfield_, Jan 29 2017] %C A281148 The only terms with no repeated digits are 2, 3, 8, 9, 13, 14, 52, 72, 87, 92. %C A281148 If it exists, a(25) > 10^17. - _David Radcliffe_, May 26 2025 %e A281148 92 is a term because 92^6 = 606355001344 has no digit 2 or 9. %t A281148 fQ[n_] := Intersection[IntegerDigits[n], IntegerDigits[n^6]] == {}; Select[ Range@45000000, Mod[#, 5] > 1 && fQ@# &] (* _Robert G. Wilson v_, Jan 29 2017 *) %o A281148 (PARI) isok(n) = #setintersect(Set(digits(n)), Set(digits(n^6))) == 0; %Y A281148 Cf. A001014, A281678. %K A281148 nonn,base,more %O A281148 1,1 %A A281148 _Robert Israel_ and _Altug Alkan_, Jan 27 2017