|
| |
|
|
A035336
|
|
a(n) = 2*floor(n*phi) + n - 1, where phi = (1+sqrt(5))/2.
|
|
20
| |
|
|
2, 7, 10, 15, 20, 23, 28, 31, 36, 41, 44, 49, 54, 57, 62, 65, 70, 75, 78, 83, 86, 91, 96, 99, 104, 109, 112, 117, 120, 125, 130, 133, 138, 143, 146, 151, 154, 159, 164, 167, 172, 175, 180, 185, 188, 193, 198, 201, 206, 209, 214, 219, 222, 227, 230, 235, 240
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Second column of Wythoff array.
These are the numbers in A022342 that are not images of another value of the same sequence. - Michele Dondi (bik.mido(AT)tiscalenet.it), Dec 30, 2001
Also, positions of 2's in A139764, the smallest term in Zeckendorf representation of n. [John W. Layman, Aug 25 2011]
A005713(a(n)) = 0. [Reinhard Zumkeller, Dec 30 2011]
|
|
|
LINKS
| Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
N. J. A. Sloane, Classic Sequences
|
|
|
FORMULA
| a(n)=B(A(n)), n>=1, with A(k):=A000201(k) and B(k):=A001950(k), k>=1 (Wythoff BA-numbers).
a(n)=A(n)+A(A(n)), with A(A(n))=A003622(n) (Wythoff AA-numbers).
a(n) = 2*A003622(n) - (n - 1) = A003623(n) - 1. [From Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Jun 30 2009]
|
|
|
MAPLE
| Digits := 100: t := (1+sqrt(5))/2; [ seq(2*floor((n+1)*t)+n, n=0..80) ];
|
|
|
PROG
| (Haskell)
import Data.List (elemIndices)
a035336 n = a035336_list !! (n-1)
a035336_list = elemIndices 0 a005713_list
-- Reinhard Zumkeller, Dec 30 2011
|
|
|
CROSSREFS
| Equals A022342(A066096(n)).
Cf. A003622, A022342, A066094-A066096.
Cf. A139764.
Sequence in context: A190447 A190375 A066097 * A059316 A105770 A152211
Adjacent sequences: A035333 A035334 A035335 * A035337 A035338 A035339
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com) and J. H. Conway (conway(AT)math.princeton.edu)
|
| |
|
|
