|
%I #8 Jun 14 2017 05:52:46
%S 5,11,37,61,107,181,467,563,821,947,2341,2939,3833,4073,5479,6043,
%T 9161,9281,11399,12323,14249,15263,16007,22027,25117,26249,32189,
%U 37987,39581,42139,42853,43093,50291,54449,62653,64063,64919,70181,73189,82219
%N Primes in A152535.
%p A001223 := proc(n) ithprime(n+1)-ithprime(n) ; end: A141042 := proc(n) option remember ; n*A001223(n) ; end: A152535 := proc(n) add(A141042(i),i=1..n) ; end: for n from 1 to 300 do a35 := A152535(n) ; if isprime(a35) then printf("%d,",a35) ; fi; od: # _R. J. Mathar_, Feb 06 2009
%Y Cf. A000040, A000720, A141042, A152535.
%K nonn
%O 1,1
%A _Omar E. Pol_, Dec 07 2008
%E More terms from _R. J. Mathar_, Feb 06 2009
|
