A134464 (A127648 * A000012 + A000012 * A127773) - A000012.
1, 2, 4, 3, 5, 8, 4, 6, 9, 13, 5, 7, 10, 14, 19, 6, 8, 11, 15, 20, 26, 7, 9, 12, 16, 21, 27, 34, 8, 10, 13, 17, 22, 28, 35, 43, 9, 11, 14, 18, 23, 29, 36, 44, 53, 10, 12, 15, 19, 24, 30, 37, 45, 54, 64
Offset: 1
Examples
First few rows of the triangle: 1; 2, 4; 3, 5, 8; 4, 6, 9, 13; 5, 7, 10, 14, 19; 6, 8, 11, 15, 20, 26; 7, 9, 12, 16, 21, 27, 34; ...
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Flatten[Table[RecurrenceTable[{a[1]==i,a[n]==a[n-1]+n},a,{n,i}],{i,10}]] (* Harvey P. Dale, Nov 12 2013 *)
Comments