A116553 a(2*n+1) = 5*a(n), a(2*n+2) = 6*a(n) + a(n-1).
1, 5, 6, 25, 31, 30, 41, 125, 156, 155, 211, 150, 211, 205, 276, 625, 791, 780, 1061, 775, 1086, 1055, 1421, 750, 1111, 1055, 1416, 1025, 1441, 1380, 1861, 3125, 4026, 3955, 5371, 3900, 5471, 5305, 7146, 3875, 5711, 5430, 7291, 5275, 7416, 7105, 9581, 3750
Offset: 0
Links
- G. C. Greubel, Table of n, a(n) for n = 0..2500
Programs
-
Mathematica
b[0] := 0; b[1] := 1; b[n_?EvenQ] := b[n] = 5*b[n/2]; b[n_?OddQ] := b[n] = 6*b[(n - 1)/2] + b[(n - 3)/2]; Table[b[n], {n, 1, 70}]
Formula
Extensions
New name using formula, Joerg Arndt, Dec 17 2022