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.

A329187 Initial members of admirable triples: numbers k such that (k, k+2, k+4) are all admirable numbers (A111592).

This page as a plain text file.
%I A329187 #12 Jan 05 2020 22:23:10
%S A329187 364,17272,54064,383404,1820812,1945804,2466604,3283024,3503164,
%T A329187 3820684,3907984,4407952,5553712,6095344,6320524,6820492,7845232,
%U A329187 7966252,8591212,9841132,10990864,11841004,12428272,13695052,13903372,15032272,15569932,19007212,19740304
%N A329187 Initial members of admirable triples: numbers k such that (k, k+2, k+4) are all admirable numbers (A111592).
%H A329187 Amiram Eldar, <a href="/A329187/b329187.txt">Table of n, a(n) for n = 1..10000</a>
%e A329187 364 is in the sequence since 364, 366, and 368 are all admirable numbers.
%t A329187 admQ[n_] := (ab = DivisorSigma[1, n] - 2 n) > 0 && EvenQ[ab] && ab/2 < n && Divisible[n, ab/2]; k = 0; s = {}; Do[If[admQ[n], k++; If[k > 2, AppendTo[s, n - 4]], k = 0], {n, 6, 2*10^6, 2}]; s (* for even terms; after _Shyam Sunder Gupta_ at A231088 *)
%Y A329187 Subsequence of A109730, A111592, and A231088.
%K A329187 nonn
%O A329187 1,1
%A A329187 _Amiram Eldar_, Nov 07 2019