The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A338889 a(n) = L(L(L(n))) mod L(L(n)), where L = Lucas numbers = A000032. 4
 1, 0, 3, 1, 1, 1, 0, 1, 1, 29, 7, 1, 19679776435706023589554718882448088434898811874077010905231927243854, 1, 7 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS a(21) = 2992285359..7163788371 has 5090 decimal digits. LINKS Alois P. Heinz, Table of n, a(n) for n = 0..20 FORMULA a(n) = A262361(n) mod A005371(n). MAPLE b:= proc(n) local r, M, p; r, M, p:=       <<1|0>, <0|1>>, <<0|1>, <1|1>>, n;       do if irem(p, 2, 'p')=1 then r:=         `if`(nargs=1, r.M, r.M mod args[2]) fi;          if p=0 then break fi; M:=         `if`(nargs=1, M.M, M.M mod args[2])       od; (r.<<2, 1>>)[1\$2]     end: a:= n-> (h-> b(h\$2) mod h)(b(b(n))): seq(a(n), n=0..15); CROSSREFS Cf. A000032, A005371, A262361, A274996, A338638, A338736. Sequence in context: A179742 A285000 A321444 * A104608 A241499 A236774 Adjacent sequences:  A338886 A338887 A338888 * A338890 A338891 A338892 KEYWORD nonn AUTHOR Alois P. Heinz, Nov 14 2020 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 January 16 04:59 EST 2022. Contains 350374 sequences. (Running on oeis4.)