A184738 -id:A184738 - cp's OEIS frontend

A184739 floor(ns+h-hs), where s=3+sqrt(5), h=1/2; complement of A184738.

3, 8, 13, 18, 24, 29, 34, 39, 45, 50, 55, 60, 65, 71, 76, 81, 86, 92, 97, 102, 107, 113, 118, 123, 128, 134, 139, 144, 149, 154, 160, 165, 170, 175, 181, 186, 191, 196, 202, 207, 212, 217, 223, 228, 233, 238, 243, 249, 254, 259, 264, 270, 275, 280, 285, 291, 296, 301, 306, 312, 317, 322, 327, 332, 338, 343, 348, 353, 359, 364, 369, 374, 380, 385, 390, 395, 401, 406, 411, 416, 422, 427, 432, 437, 442, 448, 453, 458, 463, 469, 474, 479, 484, 490, 495, 500, 505, 511, 516, 521, 526, 531, 537, 542, 547, 552, 558, 563, 568, 573, 579, 584, 589, 594, 600, 605, 610, 615, 620, 626

Offset: 1

Graph
List
Refs
Listen
History
Text
Internal format

Clark Kimberling, Jan 20 2011

nonn

Cf. A184738.

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

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

cp's OEIS Frontend

A184739 floor(ns+h-hs), where s=3+sqrt(5), h=1/2; complement of A184738.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

Formula

cp's OEIS Frontend

A184739 floor(n*s+h-h*s), where s=3+sqrt(5), h=1/2; complement of A184738.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

Formula

A184739 floor(ns+h-hs), where s=3+sqrt(5), h=1/2; complement of A184738.