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

 

Logo
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 16 04:59 EST 2022. Contains 350374 sequences. (Running on oeis4.)