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.

A361512 Indices of novel terms in A361511.

This page as a plain text file.
%I A361512 #9 Apr 08 2023 11:43:51
%S A361512 1,3,5,7,9,12,14,18,21,25,28,32,39,42,47,53,59,67,71,77,80,88,94,100,
%T A361512 106,115,120,128,134,142,147,154,161,170,178,187,196,205,217,226,236,
%U A361512 246,256,266,280,287,302,313,327,334,348,359,374,383,394,406,416,431
%N A361512 Indices of novel terms in A361511.
%H A361512 Michael De Vlieger, <a href="/A361512/b361512.txt">Table of n, a(n) for n = 1..17905</a> (all terms m <= 2^24)
%t A361512 nn = 432; c[_] = False; f[n_] := DivisorSigma[0, n]; a[1] = m = 1; Reap[Do[(If[c[#], a[n] = # + f[a[m]] ; m++, a[n] = f[#] ; Sow[n - 1]]; c[#] = True) &[a[n - 1]], {n, 2, nn}] ][[-1, -1]] (* _Michael De Vlieger_, Apr 08 2023 *)
%Y A361512 Cf. A361511.
%K A361512 nonn
%O A361512 1,2
%A A361512 _N. J. A. Sloane_, Apr 08 2023