cp's OEIS Frontend

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.

A067450 Smallest n-th power starting with 9.

This page as a plain text file.
%I A067450 #11 Apr 04 2025 22:31:54
%S A067450 9,9,9261,923521,9765625,9474296896,94931877133,9682651996416,
%T A067450 922190162669056,9765625,952809757913927,95428956661682176,
%U A067450 96889010407,9012061295995008299689,931322574615478515625
%N A067450 Smallest n-th power starting with 9.
%C A067450 Terms from _Robert G. Wilson v_.
%H A067450 Robert Israel, <a href="/A067450/b067450.txt">Table of n, a(n) for n = 1..533</a>
%p A067450 f:= proc(n) local x, y;
%p A067450   for x from 2 do
%p A067450     y:= x^n;
%p A067450     if floor(y/10^ilog10(y)) = 9 then return x^n fi
%p A067450   od
%p A067450 end proc:
%p A067450 map(f, [$1..50]); # _Robert Israel_, Apr 02 2025
%t A067450 a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 9, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* _Robert G. Wilson v_ *)
%Y A067450 Cf. A067442, A067443, A067444, A067445, A067446, A067447, A067448, A067449.
%K A067450 base,easy,nonn
%O A067450 1,1
%A A067450 _Amarnath Murthy_, Feb 05 2002