Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A095173
Image of 1,2,3,4,... under the map Q defined in A095172.
1
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
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
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