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.

A194264 Sum of divisors of all elements of the n-th set of consecutive integers that are also nonprimes.

This page as a plain text file.
%I A194264 #25 Nov 14 2014 10:26:34
%S A194264 1,7,12,46,28,79,39,110,229,72,304,206,96,234,444,482,168,555,366,195,
%T A194264 642,433,764,1158,544,216,564,280,616,2639,683,1210,288,2211,372,1406,
%U A194264 1389,834,1555,1490,546,2788,508,1029,468,3913,3948,1249,560,1266,2006
%N A194264 Sum of divisors of all elements of the n-th set of consecutive integers that are also nonprimes.
%H A194264 Alois P. Heinz, <a href="/A194264/b194264.txt">Table of n, a(n) for n = 1..10000</a>
%e A194264 46 is in the sequence because the fourth set of consecutive natural numbers that are also nonprimes is {8, 9, 10}, the sum of divisors of 8 is 1+2+4+8=15, the sum of divisors of 9 is 1+3+9=13, the sum of divisors of 10 is 1+2+5+10=18, so a(4) = 15+13+18 = 46.
%p A194264 with(numtheory):
%p A194264 a:= n-> `if`(n=1, 1, add(sigma(i), i=ithprime(n)+1..ithprime(n+1)-1)):
%p A194264 seq(a(n), n=1..80);  # _Alois P. Heinz_, Oct 18 2011
%t A194264 Table[Plus@@Flatten[Divisors[Range[Prime[n] - (-1)^Prime[n], Prime[n + 1] + (-1)^Prime[n + 1]]]], {n, 2, 50}] (* _Alonso del Arte_, Oct 18 2011 *)
%Y A194264 Cf. A000203, A018252, A054265, A055670.
%K A194264 nonn,easy
%O A194264 1,2
%A A194264 _Omar E. Pol_, Sep 03 2011