



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=i1, 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



