OFFSET
1,1
COMMENTS
a(n) is the start of a run of exactly n consecutive numbers in A014156.
EXAMPLE
a(3) = 24 because 24, 25 and 26 are not the sum of a nonnegative cube and a triangular number, but 23 = 2^3 + 5*6/2 and 27 = 3^3 + 0*1/2 are.
MAPLE
N:= 10^7: # for terms before the first term > N
nC:= floor(surd(N, 3)): C:= {seq(i^3, i=0..nC)}:
nT:= floor((sqrt(1+8*N)-1)/2): T:= {seq(i*(i+1)/2, i=0..nT)}:
A:= sort(convert(select(`<=`, {seq(seq(c+t, c=C), t=T)}, N), list)):
dA:= A[2..-1]-A[1..-2]:
m:= min({$1..max(dA)+1} minus convert(dA, set)):
V:= Vector(m-2);
for i from 2 to m-1 do
if member(i, dA, 'k') then V[i-1]:= A[k]+1 fi
od;
convert(V, list);
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Israel, Apr 17 2026
STATUS
approved
