login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A347937 Numbers k such that k and k+1 are both terms of A347935. 1
2282175, 16769024, 18356624, 27252224, 32493824, 35820224, 46577024, 50968575, 51962624, 53992575, 55130624, 61854975, 63101024, 63140175, 69980624, 72525375, 73378304, 74376224, 80791424, 82389824, 98834175, 102650624, 105674624, 107769375, 109001024, 110238975 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

David A. Corneth, Table of n, a(n) for n = 1..2372 (first 103 terms from Amiram Eldar)

EXAMPLE

2282175 is a term since A187795(2282175) = 4801650 > 2*2282175 = 4564350 and A187795(2282176) = 4630080 > 2*2282176 = 4564352.

MATHEMATICA

abQ[n_] := DivisorSigma[1, n] > 2*n; s[n_] := DivisorSum[n, # &, abQ[#] &]; q[n_] := s[n] > 2*n; seq = {}; q1 = q[1]; Do[q2 = q[n]; If[q1 && q2, AppendTo[seq, n-1]]; q1 = q2, {n, 2, 2*10^7}]; seq

PROG

(PARI) isok1(k) = sumdiv(k, d, if (sigma(d)>2*d, d)) > 2*k; \\ A347935

isok(k) = isok1(k) && isok1(k+1); \\ Michel Marcus, Sep 20 2021

CROSSREFS

Subsequence of A005101, A096399 and A347935.

Cf. A187795, A347936, A347939.

Sequence in context: A089446 A204603 A176382 * A339937 A092017 A238079

Adjacent sequences:  A347934 A347935 A347936 * A347938 A347939 A347940

KEYWORD

nonn

AUTHOR

Amiram Eldar, Sep 20 2021

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 3 22:17 EDT 2022. Contains 357237 sequences. (Running on oeis4.)