|
|
A135709
|
|
Not the sum of three distinct nonzero Fibonacci numbers.
|
|
5
|
|
|
1, 2, 3, 4, 5, 7, 33, 46, 51, 53, 54, 67, 72, 74, 75, 80, 82, 83, 85, 86, 87, 88, 101, 106, 108, 109, 114, 116, 117, 119, 120, 121, 122, 127, 129, 130, 132, 133, 134, 135, 137, 138, 139, 140, 141, 142, 143, 156, 161, 163, 164, 169, 171, 172, 174, 175, 176, 177, 182, 184, 185
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MAPLE
|
option remember;
local a;
if n = 1 then
1;
else
for a from procname(n-1)+1 do
if not isA135558(a) then
return a;
end if;
end do:
end if;
|
|
MATHEMATICA
|
With[{f=15}, Complement[Range[Fibonacci[f]], Total/@Subsets[Fibonacci[ Range[ 2, f]], {3}]]] (* Harvey P. Dale, Sep 08 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|