login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A083412 Wythoff array read by antidiagonals. 3
1, 4, 2, 6, 7, 3, 9, 10, 11, 5, 12, 15, 16, 18, 8, 14, 20, 24, 26, 29, 13, 17, 23, 32, 39, 42, 47, 21, 19, 28, 37, 52, 63, 68, 76, 34, 22, 31, 45, 60, 84, 102, 110, 123, 55, 25, 36, 50, 73, 97, 136, 165, 178, 199, 89, 27, 41, 58, 81, 118, 157, 220, 267, 288, 322, 144, 30, 44 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

The first term in each row is the least summand in the Zeckendorf representation of every term in the row. - Clark Kimberling, Aug 27 2008

LINKS

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

Eric Weisstein's World of Mathematics, Wythoff Array

MAPLE

W:= proc(n, k) Digits:= 100; (Matrix([n, floor((1+sqrt(5))/2* (n+1))]). Matrix([[0, 1], [1, 1]])^(k+1))[1, 2] end: seq(seq(W(d-k, k), k=0..d), d=0..10); # Alois P. Heinz, Aug 18 2008

MATHEMATICA

W[n_, k_] := Fibonacci[k + 1] Floor[n*GoldenRatio] + (n - 1) Fibonacci[k]; t = Table[ W[n - k + 1, k], {n, 12}, {k, n}] // Flatten

CROSSREFS

A035513 transposed. See that entry for further details.

Sequence in context: A173197 A256568 A138947 * A086399 A105365 A077157

Adjacent sequences:  A083409 A083410 A083411 * A083413 A083414 A083415

KEYWORD

nonn,tabl

AUTHOR

N. J. A. Sloane, Jun 09 2003

EXTENSIONS

More terms from Alois P. Heinz, Aug 18 2008

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 19 13:38 EDT 2018. Contains 316361 sequences. (Running on oeis4.)