This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A283733 #17 Dec 04 2024 08:47:21 %S A283733 1,3,7,12,19,28,38,50,63,78,95,113,133,155,178,203,229,257,287,318, %T A283733 351,385,421,459,498,539,582,626,672,719,768,819,871,925,981,1038, %U A283733 1097,1157,1219,1283,1348,1415,1483,1553,1625,1698,1773,1850,1928,2008,2089 %N A283733 a(n) = a(n-1) + 1 + floor(n*golden ratio), with a(0) = 1. %C A283733 This is column 1 of the rank array, A283734, of the golden ratio. %H A283733 Clark Kimberling, <a href="/A283733/b283733.txt">Table of n, a(n) for n = 0..10000</a> %F A283733 a(n) = A054347(n) + n + 1. - _Alan Michael Gómez Calderón_, Dec 03 2024 %t A283733 a[0] = 1; a[n_] := a[n] = a[n - 1] + 1 + Floor[n*GoldenRatio]; Table[a[n], {n, 0, 100}] %o A283733 (PARI) g = (1 + sqrt(5))/2; %o A283733 a(n) = if(n<1, 1, a(n - 1) + 1 + floor(n*g)); %o A283733 for(n=0, 100, print1(a(n),", ")) \\ _Indranil Ghosh_, Mar 17 2017 %Y A283733 Cf. A000201, A001622, A026351 (first differences), A054347, A283734. %K A283733 nonn,easy %O A283733 0,2 %A A283733 _Clark Kimberling_, Mar 16 2017