OFFSET
1,2
COMMENTS
Note: 210 = 2*3*5*7, the product of the first four primes.
gcd(n,2*3) is A089128; gcd(n,2*3*5) not currently in the OEIS. - R. J. Mathar, Feb 07 2011
FORMULA
From Amiram Eldar, Sep 16 2023: (Start)
a(n) = gcd(n, 210).
Multiplicative with a(p^e) = p if p <= 7, and 1 otherwise.
Dirichlet g.f.: zeta(s) * (1 + 1/2^s) * (1 + 2/3^s) * (1 + 4/5^s) * (1 + 6/7^s).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 117/14. (End)
MAPLE
seq(gcd(n, 210), n = 1 .. 100); # Emeric Deutsch, Oct 31 2009
MATHEMATICA
a[n_] := GCD[n, 210]; Array[a, 100] (* Amiram Eldar, Sep 16 2023 *)
PROG
(PARI) a(n) = gcd(n, 210); \\ Amiram Eldar, Sep 16 2023
CROSSREFS
KEYWORD
nonn,easy,mult
AUTHOR
Mick Purcell (mickpurcell(AT)gmail.com), Sep 26 2009
EXTENSIONS
Extended by Emeric Deutsch, Oct 31 2009
STATUS
approved