login
Primes in A136251 in order of appearance.
0

%I #9 Mar 04 2019 10:36:44

%S 3,7,3,7,3,5,3,5,2,7,3,3,3,3,7,5,3,13,11,3,7,3,3,5,5,13,7,5,2,11,13,2,

%T 5,17,13,7,3,7,3,7,19,7,5,3,3,13,3,7,7,3,11,3,19,11,17,3,3,5,5,5,7,5,

%U 17,5,17,7,11,19,5,17,13,19,13,11,7,3,7,2,11,3,3,3,7,13,5,3,13,2,3,7,3,11,7

%N Primes in A136251 in order of appearance.

%e The A136251(k) which are prime occur at k = 9, 10, 11, 12, 15, 16, 17, 18, ... and the subsequence of A136251 at these positions defines the sequence.

%p read("transforms") ; A007605 := proc(n) digsum(ithprime(n)) ; end:

%p A136251 := proc(n) ithprime(n) mod A007605(n) ; end:

%p for n from 1 to 300 do p := A136251(n); if isprime(p) then printf("%d,",p) ; fi; od: # _R. J. Mathar_, Aug 02 2009

%Y Cf. A000040, A136251.

%K nonn,base

%O 1,1

%A _Juri-Stepan Gerasimov_, Jun 23 2009

%E Edited, corrected and extended by _R. J. Mathar_, Aug 02 2009