login
A161657
a(n) = the smallest multiple of {the sum of the distinct prime divisors of n} that is >= n.
2
2, 3, 4, 5, 10, 7, 8, 9, 14, 11, 15, 13, 18, 16, 16, 17, 20, 19, 21, 30, 26, 23, 25, 25, 30, 27, 36, 29, 30, 31, 32, 42, 38, 36, 40, 37, 42, 48, 42, 41, 48, 43, 52, 48, 50, 47, 50, 49, 56, 60, 60, 53, 55, 64, 63, 66, 62, 59, 60, 61, 66, 70, 64, 72, 80, 67, 76, 78, 70, 71, 75, 73
OFFSET
2,1
COMMENTS
a(n) = n iff n belongs to A089352. - Ivan Neretin, May 25 2016
LINKS
MATHEMATICA
Table[Ceiling[#1/#2]*#2 &[n, Plus @@ FactorInteger[n][[All, 1]]], {n, 2, 73}] (* Ivan Neretin, May 25 2016 *)
CROSSREFS
Sequence in context: A072620 A072619 A348249 * A338749 A370893 A072701
KEYWORD
nonn
AUTHOR
Leroy Quet, Jun 15 2009
EXTENSIONS
More terms from Sean A. Irvine, Sep 29 2009
STATUS
approved