login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Today, Nov 11 2014, is the 4th anniversary of the launch of the new OEIS web site. 70,000 sequences have been added in these four years, all edited by volunteers. Please make a donation (tax deductible in the US) to help keep the OEIS running.

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

Table of n, a(n) for n=1..6.

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 A068253 A188806

Adjacent sequences:  A089394 A089395 A089396 * A089398 A089399 A089400

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 | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified November 22 22:27 EST 2014. Contains 249835 sequences.