# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a090520 Showing 1-1 of 1 %I A090520 #5 Dec 05 2013 19:56:38 %S A090520 5,7,43,769,1123,52631,1428571,2127659,14925373,769230769,5882352941, %T A090520 6369426751,588235294117,319488817891,9345794392523,24449877750611, %U A090520 662251655629139,1293661060802069,67114093959731543,244498777506112469 %N A090520 Primes arising in A090519, or 0 if A090519(n)= 0. %C A090520 Conjecture: No term is zero. %o A090520 (PARI) A090520(n)={ local(p,tenn) ; p=2 ; tenn=10^n ; while(tenn/p>=2, if( isprime(floor(tenn/p)), return(floor(tenn/p)) ) ; p=nextprime(p+1) ; ) ; return(0) ; } { for(n=1,40, print1(A090520(n),",") ; ) } - _R. J. Mathar_, Nov 19 2006 %Y A090520 Cf. A090517, A090518, A090519. %K A090520 base,nonn %O A090520 1,1 %A A090520 _Amarnath Murthy_, Dec 07 2003 %E A090520 Corrected and extended by _R. J. Mathar_, Nov 19 2006 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE