cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A357608 Numbers k such that k and k+1 are both in A357605.

Original entry on oeis.org

76544, 104895, 126224, 165375, 170624, 174824, 201824, 245024, 257984, 271215, 273104, 316575, 338624, 387855, 447615, 469664, 477224, 540224, 618975, 633555, 641024, 659295, 705375, 752895, 770175, 842624, 843975, 862784, 870975, 893024, 913275, 957824, 1047375
Offset: 1

Views

Author

Amiram Eldar, Oct 06 2022

Keywords

Comments

Numbers k such that A162296(k) > 2*k and A162296(k+1) > 2*(k+1).

Examples

			76544 is a term since 76544 and 76545 are both in A357605: A162296(76544) = 170688 > 2*76544 and A162296(76545) = 157248 > 2*76545.
		

Crossrefs

Cf. A162296.
Subsequence of A013929, A096399 and A357605.

Programs

  • Mathematica
    q[n_] := Module[{f = FactorInteger[n], p, e}, p = f[[;; , 1]]; e = f[[;; , 2]]; Times @@ ((p^(e + 1) - 1)/(p - 1)) - Times @@ (p + 1) > 2*n]; Select[Range[2, 10^6], q[#] && q[#+1] &]