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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A082225 First row of array A082224. 5
 1, 2, 10, 6, 22, 20, 42, 46, 78, 80, 114, 120, 168, 172, 210, 216, 290, 274, 342, 338, 412, 408, 492, 528, 608, 624, 706, 710, 790, 800, 922, 926, 1050, 1056, 1174, 1166, 1326, 1324, 1496, 1452, 1632, 1600, 1824, 1830, 1976, 2004, 2176, 2184, 2372, 2364 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Table of n, a(n) for n=1..50. PROG (PARI) lista(nn) = { my(A=matrix(nn, nn)); S=Set(); for(s=2, nn+1, for(i=1, s-1, if(s%2, q=[i, s-i], q=[s-i, i]); p=[sum(j=1, q[2]-1, A[q[1], j]), sum(j=1, q[1]-1, A[j, q[2]])]; n=1; while(setsearch(S, n) || (p[1]&&!isprime(p[1]+n)) || (p[2]&&isprime(p[2]+n)), n++); A[q[1], q[2]]=n; S=setunion(S, Set([n])); if(q[1]==1, print1(n, ", ")); )) } /* This is a modification of the PARI program by Max Alekseyev in A082228. - Petros Hadjicostas, Feb 25 2021 */ CROSSREFS Cf. A082224, A082228, A082229. Sequence in context: A086064 A076374 A142954 * A211365 A346498 A213135 Adjacent sequences: A082222 A082223 A082224 * A082226 A082227 A082228 KEYWORD nonn,easy AUTHOR Amarnath Murthy, Apr 09 2003 EXTENSIONS Edited and extended David Wasserman, Feb 27 2006 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 September 15 08:55 EDT 2024. Contains 375932 sequences. (Running on oeis4.)