Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A035509
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A035509 Main diagonal of Inverse Stolarsky array. +0
1
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; listen)
OFFSET

0,2

REFERENCES

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

LINKS

C. Kimberling, Interspersions

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: A146933 A155258 A138729 this_sequence A141627 A102900 A155271

Adjacent sequences: A035506 A035507 A035508 this_sequence A035510 A035511 A035512

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com).

EXTENSIONS

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

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 20 16:54 EST 2009. Contains 171081 sequences.


AT&T Labs Research