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.

A350619 Record high values in A350877.

This page as a plain text file.
%I A350619 #13 Jan 23 2022 10:49:59
%S A350619 1,3,6,8,12,16,18,28,30,44,58,70,78,86,96,116,130,148,160,182,204,220,
%T A350619 260,312,340,380,406,474,514,538,552,556,616,656,686,786,842,878,900,
%U A350619 918,958,982,1000,1092,1190,1272,1290,1378,1428,1432,1540,1612,1776,1880,1946,2126,2226,2284,2290
%N A350619 Record high values in A350877.
%H A350619 Michael De Vlieger, <a href="/A350619/b350619.txt">Table of n, a(n) for n = 1..10000</a> (first 408 terms from N. J. A. Sloane)
%t A350619 r = 0; j = 1; q = 2; {j}~Join~Reap[Do[If[EvenQ[j], Set[k, j/2], Set[k, j + q]; Set[q, NextPrime[q]]]; If[k > r, Sow[k]; r = k]; j = k, {i, 2, 645}]][[-1, -1]] (* _Michael De Vlieger_, Jan 23 2022 *)
%Y A350619 Cf. A350877, A350615, A350616, A350617, A350618.
%K A350619 nonn
%O A350619 1,2
%A A350619 _N. J. A. Sloane_, Jan 23 2022