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 A184658 #4 Mar 30 2012 18:57:16
%S A184658 1,2,4,6,7,9,10,12,14,15,17,19,20,22,23,25,27,28,30,32,33,35,36,38,40,
%T A184658 41,43,44,46,48,49,51,53,54,56,57,59,61,62,64,66,67,69,70,72,74,75,77,
%U A184658 78,80,82,83,85,87,88,90,91,93,95,96,98,99,101,103,104,106,108,109,111,112,114,116,117,119,121,122,124,125,127,129,130,132,133,135,137,138,140,142,143,145,146,148,150,151,153,154,156,158,159,161,163,164,166,167,169,171,172,174,176,177,179,180,182,184,185,187,188,190,192,193
%N A184658 floor(nr+h), where r=(1+sqrt(5))/2, h=-1/3; complement of A184659.
%F A184658 a(n)=floor(nr+h), where r=(1+sqrt(5))/2, h=-1/3.
%t A184658 r=(1+5^(1/2))/2; h=-1/3; s=r/(r-1);
%t A184658 Table[Floor[n*r+h],{n,1,120}] (* A184658 *)
%t A184658 Table[Floor[n*s+h-h*s],{n,1,120}] (* A184659 *)
%Y A184658 Cf. A184659, A000201 (lower Wythoff sequence).
%K A184658 nonn
%O A184658 1,2
%A A184658 _Clark Kimberling_, Jan 19 2011