|
| |
|
|
A065968
|
|
n * Sum_{primes p dividing n} (1 - 1/p).
|
|
1
| |
|
|
0, 1, 2, 2, 4, 7, 6, 4, 6, 13, 10, 14, 12, 19, 22, 8, 16, 21, 18, 26, 32, 31, 22, 28, 20, 37, 18, 38, 28, 59, 30, 16, 52, 49, 58, 42, 36, 55, 62, 52, 40, 85, 42, 62, 66, 67, 46, 56, 42, 65, 82, 74, 52, 63, 94, 76, 92, 85, 58, 118, 60, 91, 96, 32, 112
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
PROG
| (PARI) { for (n=1, 1000, s=0; p=2; while (p<=n, if(n%p == 0, s+=1 - 1/p); p=nextprime(p + 1)); write("b065968.txt", n, " ", n*s) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 05 2009]
|
|
|
CROSSREFS
| Sequence in context: A203975 A184761 A162251 * A105669 A019657 A134791
Adjacent sequences: A065965 A065966 A065967 * A065969 A065970 A065971
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Dec 09 2001
|
| |
|
|
