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 A067448 #11 Apr 04 2025 22:31:40
%S A067448 7,729,729,707281,7776,729,78125,78310985281,794280046581,
%T A067448 79792266297612001,743008370688,7355827511386641,793714773254144,
%U A067448 78364164096,734461618571137961752599,79766443076872509863361
%N A067448 Smallest n-th power whose decimal expansion starts with 7.
%C A067448 Terms from _Robert G. Wilson v_.
%H A067448 Robert Israel, <a href="/A067448/b067448.txt">Table of n, a(n) for n = 1..597</a>
%p A067448 f:= proc(n) local x, y;
%p A067448 for x from 2 do
%p A067448 y:= x^n;
%p A067448 if floor(y/10^ilog10(y)) = 7 then return x^n fi
%p A067448 od
%p A067448 end proc:
%p A067448 map(f, [$1..50]); # _Robert Israel_, Apr 02 2025
%t A067448 a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 7, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* _Robert G. Wilson v_ *)
%Y A067448 Cf. A067442, A067443, A067444, A067445, A067446, A067447.
%K A067448 base,easy,nonn
%O A067448 1,1
%A A067448 _Amarnath Murthy_, Feb 05 2002