| 2, 2, 2, 2, 3, 2, 2, 2, 3, 3, 3, 2, 3, 3, 3, 2, 2, 3, 3, 2, 2, 3, 3, 4, 2, 3, 2, 2, 3, 4, 2, 2, 3, 3, 3, 2, 2, 3, 4, 3, 2, 3, 3, 2, 3, 2
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
FORMULA
|
a(n)=A001065[A068418(n)]-A051953[A068418(n)]
|
|
EXAMPLE
|
n=39:m=A068418(39)=130141440, sigma[m]-m=405550080, m-Phi[m]=101387520,quotient=4=a(39)
|
|
CROSSREFS
|
Cf. A068418, A001065, A000203, A051953, A068414, A069714, A069737.
Sequence in context: A062843 A136164 A033947 this_sequence A074592 A089993 A047931
Adjacent sequences: A069716 A069717 A069718 this_sequence A069720 A069721 A069722
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Apr 05 2002
|
|
