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 A080810 #10 Aug 07 2015 03:14:44 %S A080810 7,576,17576,1475789056,1420778345789277056227207, %T A080810 149247077443060991182553045537892735703095362592472033442634721 %N A080810 a(1) = 7, a(n)= smallest n-th power obtained by inserting digits anywhere in a(n-1). %e A080810 24^2=576. 26^3=17576. 196^4=1475789056. 67687^5=1420778345789277056227207. %p A080810 buffedStr := proc(n,candid) local f ; if length(n) = 0 then RETURN(true) ; fi ; f := SearchText(substring(n,1),candid) ; if f = 0 then RETURN(false) ; else if buffedStr(substring(n,2..-1),substring(candid,f+1..-1)) = true then RETURN(true) ; else RETURN(false) ; fi ; fi ; end: A080810 := proc(preva,n) local i,tst ; i := 1 ; while true do tst := i^n ; if buffedStr(convert(preva,string),convert(tst,string)) = true then RETURN(tst) ; fi ; i := i+1 ; od: end: an :=7 ; for n from 2 to 15 do an := A080810(an,n) ; end ; # _R. J. Mathar_, Sep 20 2006 %Y A080810 Cf. A080804, A080805, A080806, A080807, A080808, A080809, A080811, A080812. %K A080810 base,more,nonn %O A080810 1,1 %A A080810 _Amarnath Murthy_, Mar 22 2003 %E A080810 Corrected and extended by _R. J. Mathar_, Sep 20 2006 %E A080810 One more term. _Sean A. Irvine_, Sep 01 2009