This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A089397 Largest n-digit member of A089395. 2
 6, 82, 982, 9748, 96052, 992548 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS MAPLE with(combinat): ds:=proc(s) local j: RETURN(add(s[j]*10^(j-1), j=1..nops(s))):end: for d from 1 to 6 do sch:=[seq([1, op(i), d+1], i=[[], seq([j], j=2..d)])]: for n from 10^d-1 by -1 to 10^(d-1) do sn:=convert(n, base, 10): fl:=0: for s in sch do m:=mul(j, j=[seq(ds(sn[s[i]..s[i+1]-1]), i=1..nops(s)-1)])+1: if not isprime(m) then fl:=1: break fi od: if fl=0 then printf("%d, ", n):break fi od od: # C. Ronaldo CROSSREFS Cf. A089392, A089393, A089394, A089395, A089396. Sequence in context: A032491 A135624 A222197 * A089701 A251584 A068253 Adjacent sequences:  A089394 A089395 A089396 * A089398 A089399 A089400 KEYWORD base,nonn,changed 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 | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.