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 A236046 #11 Jan 25 2022 12:27:33 %S A236046 2,2,2,11,2,3,3,11,3,3,2,11,2,11,2,11,11,3,2,14,2,2,7,11,2,3,3,11,11, %T A236046 12,14,11,2,2,2,11,11,2,3,14,2,13,12,11,2,11,12,11,3,14,11,11,2,3,11, %U A236046 11,12,11,11,14,12,11,2,11,12,11,11,13,11,13,13,18 %N A236046 Smallest number m > 1 such that m^n does not contain m as a substring. %H A236046 Reinhard Zumkeller, <a href="/A236046/b236046.txt">Table of n, a(n) for n = 2..5000</a> %o A236046 (Haskell) %o A236046 import Data.List (isInfixOf) %o A236046 a236046 n = head [x | x <- [2..], not $ show x `isInfixOf` (show $ x ^ n)] %o A236046 (PARI) a(n) = my(k=2); while(#strsplit(Str(k^n), Str(k))!=1, k++); k; \\ _Michel Marcus_, Jan 25 2022 %Y A236046 Cf. A034293, A235052. %K A236046 nonn,base %O A236046 2,1 %A A236046 _Reinhard Zumkeller_, Jan 18 2014