A133254 Sums of a triangular number A000217 > 0 and a square A000290 > 0.
2, 4, 5, 7, 10, 11, 12, 14, 15, 16, 17, 19, 22, 24, 25, 26, 28, 29, 30, 31, 32, 35, 37, 39, 40, 42, 44, 45, 46, 49, 50, 51, 52, 53, 54, 55, 56, 57, 59, 61, 64, 65, 67, 70, 71, 72, 74, 75, 77, 79, 80, 81, 82, 84, 85, 87, 91, 92, 94, 95, 96, 100, 101, 102, 103
Offset: 1
Examples
a(1) = 2 = 1 + 1 = A000217(1) + A000290(1). a(2) = 4 = 1 + 3 = A000217(2) + A000290(1). a(3) = 5 = 1 + 4 = A000217(1) + A000290(2). a(4) = 7 = 3 + 4 = A000217(2) + A000290(2) = 6 + 1 = A000217(2) + A000290(1). a(5) = 10 = 1 + 9 = A000217(1) + A000290(3) = 6 + 4 = A000217(3) + A000290(2).
Programs
-
Mathematica
With[{nn=70},Take[Union[Flatten[Outer[Plus,Accumulate[Range[nn]],Range[nn]^2]]],nn]] (* Harvey P. Dale, Feb 27 2013 *)
Formula
Extensions
Corrected by Harvey P. Dale, Feb 27 2013