A035509 - OEIS

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

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A035509

Main diagonal of Inverse Stolarsky array.

1, 7, 25, 101, 321, 1075, 3426, 9958, 30253, 92735, 253731, 739303, 2056915, 5899304, 17108660, 46137324, 130016549, 370248450, 993480845, 2766546762, 7510827752, 20798505510, 58123818148, 155141346542, 426530329383

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

Table of n, a(n) for n=0..24.

C. Kimberling, Interspersions

C. Kimberling, Interspersions and dispersions, Proceedings of the American Mathematical Society 117 (1993) 313-321.

N. J. A. Sloane, Classic Sequences

MAPLE

with(combinat, fibonacci): gold:=(1+sqrt(5))/2: c1:=n->piecewise(n<>1, round((n-1)*gold), 1): c2:=n->c1(n)+floor((2*c1(n)+1)*gold/2)+1: inv_stol:=(n, k)->fibonacci(2*k-3)-1-c1(n)*fibonacci(2*k-4)+c2(n)*fibonacci(2*k-2): seq(inv_stol(n, n), n=1..30); inv_stol2:=(n, k)->(1+c1(n))*fibonacci(2*k-3)+(1+floor((2*c1(n)+1)*gold/2))*fibonacci(2*k-2)-1: seq(inv_stol2(n, n), n=1..30); inv_stol3:=proc(n, k) options remember: if k=1 then RETURN(c1(n)) elif k=2 then RETURN(c2(n)) else RETURN(3*inv_stol3(n, k-1)-inv_stol3(n, k-2)+1) fi: end: : seq(inv_stol3(n, n), n=1..30); (Ronaldo)

CROSSREFS

Cf. A035507.

Sequence in context: A199116 A304421 A138729 * A332942 A247173 A141627

Adjacent sequences: A035506 A035507 A035508 * A035510 A035511 A035512

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane

EXTENSIONS

More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 01 2005

STATUS

approved