A107258 Numbers not representable as Fibonacci(i) + triangular(j), i,j>=0.

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.

Links

Table of n, a(n) for n=1..55.

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

Adjacent sequences: A107255 A107256 A107257 * A107259 A107260 A107261

Keyword

nonn

Author

Ralf Stephan, May 15 2005

Status

approved