OFFSET
1,1
COMMENTS
Unique sequence such that A033677(a(m))-A033676(a(m)) approaches a(m)/2. - Joseph Biberstine, Dec 25 2004
Numbers k such that A000203(k) = 3 + k/2 + k. - Melvin Peralta, Aug 15 2016
Is this sequence "Twice the odd primes and 8"? - Joerg Arndt, Sep 13 2016
LINKS
Michel Marcus, Table of n, a(n) for n = 1..669
Wikipedia, Kempner function
MATHEMATICA
Select[Range@ 514, Function[n, m = 1; While[! Divisible[m!, n], m++]; m == n/2]] (* or *)
Select[Range@ 514, DivisorSigma[1, #] == 3 + #/2 + # &] (* Michael De Vlieger, Aug 15 2016 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Aug 28 2002
STATUS
approved