login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Numbers m such that A102863(m) = 1.
1

%I #6 Apr 23 2015 08:44:50

%S 1,3,5,7,8,9,10,11,13,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,

%T 31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,

%U 54,55,56,57,58,59,61,62,63,65,66,67,68,69,70,71,72,73,74,75,76,77,78

%N Numbers m such that A102863(m) = 1.

%C Except first term, numbers n such that the sum of the first n primes is composite: Essentially the complement of A013916.

%t Join[{1},Flatten[Position[Accumulate[Prime[Range[80]]],_?CompositeQ]]] (* _Harvey P. Dale_, Apr 23 2015 *)

%Y Cf. A013916, A102863.

%K nonn

%O 1,2

%A _Giovanni Teofilatto_, Apr 03 2008