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 A184336 #28 Jan 25 2023 18:30:28
%S A184336 1,3,4,5,6,7,9,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,27,28,
%T A184336 29,30,31,32,33,34,35,36,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,
%U A184336 53,54,55,56,57,58,59,60,61,62,63,64,66,67,68,69,70,71
%N A184336 a(n) = n + floor((3*n)^(1/3) - 2/3).
%C A184336 Complement: 2, 8, 19, 37, 65, 104, 157, 224, 310, 414, 540, 689, 863, ..., .
%H A184336 Harvey P. Dale, <a href="/A184336/b184336.txt">Table of n, a(n) for n = 1..1000</a>
%p A184336 A184336:=n->n+floor(-(2/3) + (3*n)^(1/3)); seq(A184336(k), k=1..100); # _Wesley Ivan Hurt_, Nov 08 2013
%t A184336 f[n_] := n + Floor[-2/3 + (3 n)^(1/3)]; Array[f, 66]
%t A184336 Table[n+Floor[Surd[3n,3]-2/3],{n,70}] (* _Harvey P. Dale_, Jan 25 2023 *)
%Y A184336 Cf. A007401.
%K A184336 easy,nonn
%O A184336 1,2
%A A184336 _Robert G. Wilson v_, Feb 13 2011