[go: up one dir, main page]

login
A107258
Numbers not representable as Fibonacci(i) + triangular(j), i,j>=0.
1
25, 32, 43, 51, 52, 54, 59, 64, 72, 73, 75, 77, 82, 84, 85, 88, 97, 98, 101, 102, 103, 109, 111, 114, 115, 116, 119, 124, 127, 129, 130, 131, 132, 135, 140, 142, 143, 148, 151, 152, 162, 163, 164, 168, 169, 177, 178, 181, 182, 183, 185, 186, 188, 196, 197
OFFSET
1,1
COMMENTS
A107259(a(n)) = 0.
MATHEMATICA
With[{nn=200}, Select[Complement[Range[nn], Union[Flatten[Outer[Plus, Join[{0}, Fibonacci[Range[12]]], Accumulate[Range[19]]]]]], #<nn&]] (* Harvey P. Dale, Jul 15 2012 *)
CROSSREFS
Sequence in context: A118669 A092100 A172007 * A258876 A263029 A225418
KEYWORD
nonn
AUTHOR
Ralf Stephan, May 15 2005
STATUS
approved