A161973 Primes in A136251 in order of appearance.

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, 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, 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

Offset: 1

Author

Juri-Stepan Gerasimov, Jun 23 2009

Keywords

• nonn
• base

Examples

			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.
		

Crossrefs

Cf. A000040, A136251.

Programs

Maple

read("transforms") ; A007605 := proc(n) digsum(ithprime(n)) ; end:
A136251 := proc(n) ithprime(n) mod A007605(n) ; end:
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

Extensions

Edited, corrected and extended by R. J. Mathar, Aug 02 2009