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!)
A169740 a(n) = A030068(4n+3). 3
2, 5, 9, 16, 23, 35, 48, 69, 87, 116, 145, 189, 228, 287, 345, 430, 501, 605, 704, 843, 965, 1136, 1299, 1523, 1716, 1981, 2231, 2566, 2863, 3261, 3638, 4137, 4569, 5140, 5675, 6367, 6984, 7781, 8531, 9490, 10339, 11423, 12440, 13721, 14875, 16328, 17697, 19409 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

N. J. A. Sloane, Table of n, a(n) for n = 0..10000

MATHEMATICA

f[1]=1; f[n_?EvenQ]:=f[n]=f[n/2]; f[n_?OddQ]:=f[n]=f[n-1]+f[n-2]; a[n_]:=f[4*n+3]; Table[a[n], {n, 0, 100}] (* Vincenzo Librandi, May 27 2019 *)

PROG

(PARI) {f(n) = if(n==1, 1, if(n%2==0, f(n/2), f(n-1) + f(n-2)))};

vector(50, n, n--; f(4*n+3)) \\ G. C. Greubel, May 29 2019

(Sage)

def f(n):

    if (n==1): return 1

    elif (n%2==0): return f(n/2)

    else: return f(n-1) + f(n-2)

[f(4*n+3) for n in (0..50)] # G. C. Greubel, May 29 2019

CROSSREFS

Cf. A030067, A030068, A169739.

Sequence in context: A160664 A345140 A072829 * A282044 A138226 A175287

Adjacent sequences:  A169737 A169738 A169739 * A169741 A169742 A169743

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, May 02 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 7 13:40 EDT 2022. Contains 355148 sequences. (Running on oeis4.)