|
| |
| |
|
|
|
1, 1, 1, 2, 1, 4, 1, 5, 3, 7, 1, 14, 1, 13, 8, 20, 1, 33, 1, 40, 14, 44, 1, 85, 6, 79, 25, 117, 1, 181, 1, 196, 45, 233, 17, 389, 1, 387, 80, 545, 1, 750, 1, 839, 165, 1004, 1, 1516, 12, 1612, 234, 2040, 1, 2766, 48, 3142, 388, 3720, 1, 5295, 1, 5606, 663, 7038, 83, 9194, 1, 10379, 1005
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,4
|
|
|
REFERENCES
|
L. M. Chawla, M. O. Levan and J. E. Maxfield, On a restricted partition function and its tables, J. Natur. Sci. and Math., 12 (1972), 95-101.
|
|
|
LINKS
|
Table of n, a(n) for n=1..69.
|
|
|
FORMULA
|
a(n) = Sum_{ d|n, d<n} A000041(d-1).
|
|
|
MAPLE
|
with(combinat): with(numtheory): a := proc(n) c := 0: l := sort(convert(divisors(n), list)): for i from 1 to nops(l)-1 do c := c+numbpart(l[i]-1) od: RETURN(c): end: for j from 2 to 100 do printf(`%d, `, a(j)) od:
|
|
|
CROSSREFS
|
Cf. A083710, A000041.
Sequence in context: A093890 A006306 A214579 * A018783 A200976 A218970
Adjacent sequences: A083708 A083709 A083710 * A083712 A083713 A083714
|
|
|
KEYWORD
|
nonn,easy
|
|
|
AUTHOR
|
N. J. A. Sloane, Jun 16 2003
|
|
|
EXTENSIONS
|
More terms and Maple code from James A. Sellers, Jun 21 2003
|
|
|
STATUS
|
approved
|
| |
|
|
