%I A153005
%S A153005 7,31,127,211,487,571,643,811,1033,1249,1663,1999,2131,2179,2281,2347,
%T A153005 2467,3391,4801,5059,6361,7759,8191,8209,8713,8779,8929,9187,9343,9679,
%U A153005 9931,10687,13903,14947,19009,19267,19423,25057,26731,28879,33289,35521
%N A153005 Primes in toothpick sequence A153003.
%p A153005 read("transforms3") ; a139250 := BFILETOLIST("b139250.txt") ; A139250 
               := proc(n) global a139250; op(n+1,a139250) ; end: A153003 := proc(n) 
               if n =0 then 0; else 1+3/4*(A139250(n+1)-3) ; fi; end: for n from 
               0 to 400 do p := A153003(n) ; if isprime(p) then printf("%d,",p) 
               ; fi; od: [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 
               13 2009]
%Y A153005 Cf. A139250, A139253, A152998, A152999, A153000, A153002, A153003, A153006, 
               A153009.
%Y A153005 Sequence in context: A002184 A002588 A036280 this_sequence A056909 A002147 
               A083420
%Y A153005 Adjacent sequences: A153002 A153003 A153004 this_sequence A153006 A153007 
               A153008
%K A153005 nonn
%O A153005 1,1
%A A153005 Omar E. Pol (info(AT)polprimos.com), Jan 02 2009
%E A153005 More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 13 2009