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 A070327 #17 Feb 23 2025 09:25:18 %S A070327 256,387420489,4096,59604644775390625,60466176,79792266297612001, %T A070327 8589934592,984770902183611232881,100,1191817653772720942460132761, %U A070327 1283918464548864,137858491849,1475789056 %N A070327 Smallest nontrivial power of n starting with n and greater than n. %C A070327 a(n) = n ^ A051248(n). - _Reinhard Zumkeller_, Sep 29 2011 %H A070327 Reinhard Zumkeller, <a href="/A070327/b070327.txt">Table of n, a(n) for n = 2..32</a> %F A070327 f[n_] := Block[{k = 2, s = ToString[n]}, While[ StringPosition[ ToString[n^k], s, 1] != {{1, Integer_}}, k++ ]; n^k]; Table[ f[n], {n, 2, 10}] %o A070327 (Python) %o A070327 from itertools import count %o A070327 def a(n): %o A070327 s = str(n) %o A070327 return next(n**e for e in count(2) if str(n**e).startswith(s)) %o A070327 print([a(n) for n in range(2, 16)]) # _Michael S. Branicky_, Feb 23 2025 %Y A070327 Cf. A045537, A104782. %K A070327 base,nonn %O A070327 2,1 %A A070327 _Amarnath Murthy_, May 11 2002 %E A070327 Edited by _Robert G. Wilson v_, May 14 2002 %E A070327 The 15th term is too large to include.