A095173 Image of 1,2,3,4,... under the map Q defined in A095172.

1, 3, 5, 8, 12, 17, 23, 29, 37, 47, 57, 68, 81, 96, 112, 129, 148, 170, 194, 218, 245, 275, 306, 340, 376, 415, 458, 502, 549, 601, 656, 714, 776, 841, 910, 983, 1058, 1139, 1226, 1315, 1410, 1511, 1616, 1727, 1842, 1963, 2092, 2225, 2363, 2509, 2661, 2818, 2983

Offset

1,2

Links

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

Prog

(PARI) {d=53; A=vector(d, j, j); m=1; while(d>A[m], B=A; for(k=1, d, if(k>A[m], B[k]=A[k]+A[k-A[m]])); A=B; m++); for(j=1, d, print1(A[j], ", "))} /* Klaus Brockhaus, Jun 21 2004 */

Crossrefs

Cf. A095172.

Sequence in context: A282513 A241567 A131674 * A002579 A023544 A133263

Adjacent sequences: A095170 A095171 A095172 * A095174 A095175 A095176

Keyword

nonn,nice,easy

Author

N. J. A. Sloane, based on correspondence from Leroy Quet, Jun 11 2004

Extensions

More terms from Klaus Brockhaus, Jun 21 2004

Status

approved