OFFSET
1,2
COMMENTS
The corresponding record values are 1, 3, 5, 9, 17, 21, 33, 39, 45, 65, 75, ... (see the link for more values).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Amiram Eldar, Table of n, a(n), A103340(a(n)) for n = 1..10000
EXAMPLE
The first 8 terms of A103340 are 1, 3, 2, 5, 3, 1, 4 and 9. The record values, 1, 3, 5 and 9, occur at 1, 2, 4 and 8, the first 4 terms of this sequence.
MATHEMATICA
f[p_, e_] := 2/(1 + p^(-e)); d[n_] := Denominator[Times @@ f @@@ FactorInteger[n]]; dm = 0; s = {}; Do[dn = d[n]; If[dn > dm, dm = dn; AppendTo[s, n]], {n, 1, 1000}]; s
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Oct 28 2021
STATUS
approved