OFFSET
0,5
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..9951
MATHEMATICA
Flatten[(Range[(#-2) (#-1)+1]-1&)[Range[7]]] (* Peter J. C. Moses, Jul 11 2013 *)
PROG
(Python)
from sympy import integer_nthroot
def A227179(n): return n-1-(f:=lambda x:x*(x**2+2))((m:=integer_nthroot(k:=3*n, 3)[0])-(k<=f(m)))//3 # Chai Wah Wu, Nov 07 2024
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Antti Karttunen, Jul 03 2013
STATUS
approved