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.
%I A350617 #17 Jan 23 2022 10:45:22 %S A350617 1,3,3,1,1,3,1,9,7,15,11,21,29,35,39,43,3,31,23,45,29,51,65,37,63,5, %T A350617 53,39,73,91,51,89,55,3,71,55,103,65,57,7,45,7,47,119,39,59,129,85,77, %U A350617 19,31,33,17,129,95,11,137,203,237,257,269,69,181,61,93,203,65,99,109,57,203,139,249,77,225,151,267,41,219,155 %N A350617 Odd-valued terms in A350877. %H A350617 Michael De Vlieger, <a href="/A350617/b350617.txt">Table of n, a(n) for n = 1..10000</a> (first 338 terms from N. J. A. Sloane) %t A350617 j = 1; q = 2; {j}~Join~Reap[Do[If[EvenQ[j], Set[k, j/2], Set[k, j + q]; Set[q, NextPrime[q]]]; If[OddQ[k], Sow[k]]; j = k, {i, 2, 240}]][[-1, -1]] (* _Michael De Vlieger_, Jan 23 2022 *) %Y A350617 Cf. A350877, A350615, A350616, A350618, A350619. %K A350617 nonn %O A350617 1,2 %A A350617 _N. J. A. Sloane_, Jan 23 2022