|
|
A058250
|
|
GCD of n-th primorial number and its totient.
|
|
2
|
|
|
1, 2, 2, 6, 30, 30, 30, 30, 330, 2310, 2310, 2310, 2310, 2310, 53130, 690690, 20030010, 20030010, 20030010, 20030010, 20030010, 20030010, 821230410, 821230410, 821230410, 821230410, 13960916970, 739928599410, 739928599410
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
Table of n, a(n) for n=0..28.
|
|
FORMULA
|
a(n) = GCD[A002110(n), A000010(A002110(n)] = GCD[A002110(n), A005867(n)].
|
|
EXAMPLE
|
a(6)=GCD(30030,5760)=30
|
|
MAPLE
|
[seq(igcd(product(ithprime(k), k=1..m), product(ithprime(k)-1, k=1..m)), m=1..50)];
|
|
MATHEMATICA
|
GCD[#, EulerPhi[#]]&/@Rest[FoldList[Times, 1, Prime[Range[30]]]] (* Harvey P. Dale, Dec 19 2012 *)
|
|
CROSSREFS
|
A002110, A000010, A005867.
Sequence in context: A179320 A004304 A108800 * A179929 A067644 A184312
Adjacent sequences: A058247 A058248 A058249 * A058251 A058252 A058253
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos Elemer, Dec 05 2000
|
|
STATUS
|
approved
|
|
|
|