A058352 a(n) Sum_{d|n, 1<=d<n} d*A000084(d).

0, 1, 1, 5, 1, 17, 1, 45, 13, 125, 1, 453, 1, 1265, 133, 4221, 1, 14201, 1, 46405, 1273, 155501, 1, 531789, 121, 1792809, 13801, 6126333, 1, 21032793, 1, 72121853, 155509, 248396797, 1381, 857944149, 1, 2964896881, 1792817, 10269600621, 1, 35628546989, 1

Offset

0,4

References

Z. A. Lomnicki, Two-terminal series-parallel networks, Adv. Appl. Prob., 4 (1972), 109-150.

Links

Table of n, a(n) for n=0..42.

Maple

A058352 := proc(n) local d, t1; t1 := 0; for d from 1 to n-1 do if n mod d = 0 then t1 := t1+d*A000084(d); fi; od; t1; end;

Crossrefs

Cf. A000084, A006349, A006350, A058351, A058353, A000669.

Sequence in context: A093826 A144699 A066787 * A376020 A121755 A104174

Adjacent sequences: A058349 A058350 A058351 * A058353 A058354 A058355

Keyword

nonn

Author

N. J. A. Sloane, Dec 16 2000

Extensions

More terms from Sean A. Irvine, Aug 04 2022

Status

approved