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 A111315 #8 Mar 04 2018 03:15:03 %S A111315 3,4,222,232,279,568,634,844,1307,1704,2016,2050,2164,2325,2701,3130, %T A111315 3225,3322,3524,4673,6007,6692,7141,7221,7954,8689,11051,11898,13959, %U A111315 14166,16192,17078,17220,17521,18071,22324,22414,24757,28290,28979 %N A111315 Positions where A109890(n) = Sum_{i = 1..n-1} A109890(i). %C A111315 These are the positions where A109735(n) = 2*A109735(n-1), or equally, where A111241(n) = 1. %o A111315 (PARI) s = 3; S = Set([1, 2]); i = 3; while (1, d = divisors(s); j = 1; while (setsearch(S, d[j]), j++); n = d[j]; if (n == s, print(i)); s += n; S = setunion(S, Set(n)); i++); \\ _David Wasserman_, Jan 09 2009 %Y A111315 Cf. A109890, A109735, A111316, A111241. %K A111315 nonn %O A111315 1,1 %A A111315 _N. J. A. Sloane_, Nov 04 2005 %E A111315 More terms from _David Wasserman_, Jan 09 2009