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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A203072 First row of A203071. 2
1, 8, 4, 14, 6, 10, 22, 27, 15, 35, 40, 88, 28, 26, 44, 60, 57, 58, 64, 120, 62, 72, 34, 56, 80, 63, 98, 46, 102, 178, 52, 100, 66, 156, 86, 82, 110, 76, 114, 94, 140, 96, 154, 130, 160, 112, 108, 138, 78, 150, 118, 146, 132, 126, 162, 176, 164, 188, 202, 200, 180 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Lars Blomberg, Table of n, a(n) for n = 1..1000

PROG

(PARI) extend_first_row( a=[], u=[] )={ u || for( i=1, #a, u=setunion(u, Set(a[i]));

forstep( j=i-1, 1, -1, u=setunion(u, Set(a[j]+=a[j+1]))));

for( t=1, 9e9, isprime(t) && next; setsearch(u, t) && next; my(tt=t);

forstep( j=#a, 1, -1, setsearch(u, tt += a[j]) && next(2); isprime(tt) && next(2)); return(t)) }

a=[]; for(i=1, 100, print(a=concat(a, extend_first_row(a))))

CROSSREFS

Sequence in context: A082073 A244209 A156279 * A131873 A220130 A276071

Adjacent sequences:  A203069 A203070 A203071 * A203073 A203074 A203075

KEYWORD

nonn

AUTHOR

M. F. Hasler, Dec 28 2011

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.

License Agreements, Terms of Use, Privacy Policy .

Last modified October 18 16:22 EDT 2017. Contains 293524 sequences.