|
| |
|
|
A063845
|
|
sigma(usigma(n)), where usigma(n) is the sum of unitary divisors of n (A034448) and sigma(n) is the sum of the divisors (A000203).
|
|
1
| |
|
|
1, 4, 7, 6, 12, 28, 15, 13, 18, 39, 28, 42, 24, 60, 60, 18, 39, 72, 42, 72, 63, 91, 60, 91, 42, 96, 56, 90, 72, 195, 63, 48, 124, 120, 124, 93, 60, 168, 120, 120, 96, 252, 84, 168, 168, 195, 124, 126, 93, 168, 195, 144, 120, 224, 195, 195, 186
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
PROG
| (PARI) usigma(n) = sumdiv(n, d, if(gcd(d, n/d)==1, d)) { for (n=1, 1000, write("b063845.txt", n, " ", sigma(usigma(n))) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Sep 01 2009]
|
|
|
CROSSREFS
| Sequence in context: A069286 A079354 A122460 * A188730 A019714 A021681
Adjacent sequences: A063842 A063843 A063844 * A063846 A063847 A063848
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Oct 30 2001
|
| |
|
|
