A184732 a(n) = floor(n*r+h), where r=(1+sqrt(5))/2, h=-1/4; complement of A184733.

1, 2, 4, 6, 7, 9, 11, 12, 14, 15, 17, 19, 20, 22, 24, 25, 27, 28, 30, 32, 33, 35, 36, 38, 40, 41, 43, 45, 46, 48, 49, 51, 53, 54, 56, 57, 59, 61, 62, 64, 66, 67, 69, 70, 72, 74, 75, 77, 79, 80, 82, 83, 85, 87, 88, 90, 91, 93, 95, 96, 98, 100, 101, 103, 104, 106, 108, 109, 111, 113, 114, 116, 117, 119, 121, 122, 124, 125, 127, 129, 130, 132, 134, 135, 137, 138, 140, 142, 143, 145, 146, 148, 150, 151, 153, 155, 156, 158, 159, 161, 163, 164, 166, 168, 169, 171, 172, 174, 176, 177, 179, 180, 182, 184, 185, 187, 189, 190, 192, 193

Offset

1,2

Links

Table of n, a(n) for n=1..120.

Jon Asier Bárcena-Petisco, Luis Martínez, María Merino, Juan Manuel Montoya, and Antonio Vera-López, Fibonacci-like partitions and their associated piecewise-defined permutations, arXiv:2503.19696 [math.CO], 2025. See p. 4.

Formula

a(n) = floor(n*r+h), where r=(1+sqrt(5))/2, h=-1/4.

Mathematica

r=(1+sqrt(5))/2, h=-1/4; s=r/(r-1);
Table[Floor[n*r+h], {n, 1, 120}]  (* A184732 *)
Table[Floor[n*s+h-h*s], {n, 1, 120}]  (*A184733 *)

Crossrefs

Cf. A184733, A184658.

Sequence in context: A320474 A051533 A186151 * A039009 A032793 A195127

Adjacent sequences: A184729 A184730 A184731 * A184733 A184734 A184735

Keyword

nonn

Author

Clark Kimberling, Jan 20 2011

Status

approved