The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A175423 Sequence of resulting numbers after 4th step of iteration defined in A175419. 6
 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 1, 4, 9, 6, 25, 216, 1, 1, 1, 0, 1, 8, 1, 1, 25, 36, 1, 8, 1, 0, 1, 6, 1, 1, 1, 1, 1, 1, 1, 0, 1, 8, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 8, 1, 1, 1, 1, 1, 1, 1, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS EXAMPLE For n = 33: a(33) = 1 because for the number 33 there are 4 steps of defined iteration: {3^3 = 27}, {7^2 = 49}, {9^4 = 6561}, {((1^6)^5)^6 = 1} and the 4th step of iteration ends with 1. - Jaroslav Krizek, May 09 2010 MAPLE A175420 := proc(n) option remember; local dgs, a, i ; if n = 0 then return 0 ; end if; dgs := convert(n, base, 10) ; if op(1, dgs)= 0 then return 0 ; end if; for i from 1 to nops(dgs) do if op(-i, dgs) = 0 then dgs := [op(-i..nops(dgs), dgs)] ; dgs := subsop(1=1, dgs) ; break ; end if; end do: a := op(1, dgs) ; for i from 2 to nops(dgs) do a := a^ dgs[i] ; end do: a ; end proc: A175421 := proc(n) A175420(A175420(n)) ; end proc: A175422 := proc(n) A175420(A175421(n)) ; end proc: A175423 := proc(n) A175420(A175422(n)) ; end proc: seq(A175423(n), n=0..100) ; # R. J. Mathar, May 12 2010 CROSSREFS Cf. A175419, A175420, A175421, A175422, A175424, A175425, A175426, A175427. Sequence in context: A217657 A175419 A175422 * A175421 A175420 A062078 Adjacent sequences:  A175420 A175421 A175422 * A175424 A175425 A175426 KEYWORD nonn AUTHOR Jaroslav Krizek, May 09 2010 EXTENSIONS More terms from R. J. Mathar, May 12 2010 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 28 06:37 EDT 2021. Contains 346317 sequences. (Running on oeis4.)