A073582 Numbers k such that S(k) = k/2, where S(k) is the Kempner function A002034.

6, 8, 10, 14, 22, 26, 34, 38, 46, 58, 62, 74, 82, 86, 94, 106, 118, 122, 134, 142, 146, 158, 166, 178, 194, 202, 206, 214, 218, 226, 254, 262, 274, 278, 298, 302, 314, 326, 334, 346, 358, 362, 382, 386, 394, 398, 422, 446, 454, 458, 466, 478, 482, 502, 514

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

Cf. A033676, A033677, A000203.

Sequence in context: A315853 A065858 A243537 * A363837 A048886 A349477

Adjacent sequences: A073579 A073580 A073581 * A073583 A073584 A073585

Keyword

easy,nonn

Author

Jason Earls, Aug 28 2002

Status

approved