OFFSET
1,1
COMMENTS
There are 225943534 such numbers up to 10^9, the last one in this range being 999999997.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
N:=10000: # to get all terms <= N
T:= [seq(t*(t+1)/2, t=0..floor((sqrt(1+8*N)-1)/2))]:
C:= [seq(t^3, t=0..floor(N^(1/3)))]:
F:= [seq(combinat:-fibonacci(t), t=1..floor(log[(sqrt(5)+1)/2](N*sqrt(5))))]:
CF:= select(`<=`, {seq(seq(c+f, c=C), f=F)}, N):
sort(convert({$1..N} minus {seq(seq(t+cf, t=T), cf=CF)}, list)); # Robert Israel, Mar 08 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Resta, Jan 15 2006
EXTENSIONS
Name clarified by Altug Alkan, May 02 2016
STATUS
approved