The OEIS is supported by the many generous donors to the OEIS Foundation.

 Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 60th year, we have over 367,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”). Other ways to Give
 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A089705 Smallest n-digit prime in which the unit place digit is 1 and the k-th most significant digit is prime (2,3,5,7) if k is prime else is composite (4,6,8,9,0). 2
 31, 251, 4231, 20231, 420221, 2020231, 42020351, 402020251, 4002020251, 20002020721, 420002020271, 2020002020251, 42020002020551, 402020002020521, 4002020002020221, 20002020002020531, 420002020002020231 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,1 COMMENTS Conjecture: All the composite positions are occupied by a zero except the most significant digit, which in most cases perhaps is 4. Most of the prime positions for p > 5 are occupied by 2. LINKS Table of n, a(n) for n=2..18. EXAMPLE a(6) = 420221. MAPLE with(combinat, cartprod): ds:=proc(s) local j, l: l:=nops(s): RETURN(add(s[j]*10^(l-j), j=1..l)):end: p:=[2, 3, 5, 7]:c:=[0, 4, 6, 8, 9]: cf:=[4, 6, 8, 9]: ctpr:=proc(n, s) local m, T, a: a:=s: m:=1: T:=cartprod([seq(piecewise(isprime(n-i+2), p, i=2, cf, c), i=2..n), [1]]): while not T[finished] do m:=ds(T[nextvalue]()): if isprime(m) and not member(m, a) then a:=[op(a), m]: RETURN(a) fi od: end: a:=[]: for n from 2 to 20 do a:=ctpr(n, a) od: op(a); # C. Ronaldo CROSSREFS Cf. A089704, A089706. Sequence in context: A027846 A042872 A142623 * A180471 A125368 A126526 Adjacent sequences: A089702 A089703 A089704 * A089706 A089707 A089708 KEYWORD base,nonn AUTHOR Amarnath Murthy, Nov 10 2003 EXTENSIONS More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Dec 25 2004 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 9 13:48 EST 2023. Contains 367691 sequences. (Running on oeis4.)