|
Search: id:A076998
|
|
|
| A076998 |
|
Difference between cube-free and square-free components of n. |
|
+0
2
|
|
| 0, 0, 0, 2, 0, 0, 0, 2, 6, 0, 0, 6, 0, 0, 0, 2, 0, 12, 0, 10, 0, 0, 0, 6, 20, 0, 6, 14, 0, 0, 0, 2, 0, 0, 0, 30, 0, 0, 0, 10, 0, 0, 0, 22, 30, 0, 0, 6, 42, 40, 0, 26, 0, 12, 0, 14, 0, 0, 0, 30, 0, 0, 42, 2, 0, 0, 0, 34, 0, 0, 0, 30, 0, 0, 60, 38, 0, 0, 0, 10, 6, 0, 0, 42, 0, 0, 0, 22, 0, 60, 0, 46
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
EXAMPLE
|
a(4)=2 as cube-free(4)=4 and squarefree(4)=2. 4-2=2
|
|
PROGRAM
|
(PARI) rad(n)=local(p, i); p=factor(n)[, 1]; prod(i=1, length(p), p[i]) rad2(n)=local(p, pn, i); p=factor(n)[, 1]; pn=factor(n)[, 2]; prod(i=1, length(p), p[i]^min(2, pn[i])) for (k=1, 100, print1(rad2(k)-rad(k)", "))
|
|
CROSSREFS
|
Adjacent sequences: A076995 A076996 A076997 this_sequence A076999 A077000 A077001
Sequence in context: A063958 A126164 A059286 this_sequence A083927 A134402 A132440
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jon Perry (perry(AT)globalnet.co.uk), Nov 28 2002
|
|
|
Search completed in 0.002 seconds
|
