The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A082737 Triangle read by rows in which the first row contains a 1 and the n-th row contains n primes not included in the previous rows such that the sum of a row is a perfect square. 4
 1, 2, 7, 3, 5, 17, 11, 13, 19, 101, 23, 29, 31, 37, 241, 41, 43, 47, 53, 59, 157, 61, 67, 71, 73, 79, 83, 191, 89, 97, 103, 107, 109, 113, 127, 1019, 131, 137, 139, 149, 151, 163, 167, 173, 311, 179, 181, 193, 197, 199, 211, 223, 227, 229, 277, 233, 239, 251, 257 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Another rearrangement of primes and 1. LINKS EXAMPLE 1 2 7 3 5 17 11 13 19 101 23 29 31 37 241 ... MAPLE A082737 := proc(nmax) local a, n, r, i, rsum, c, j ; a := [1, 2, 7] ; n := 3 ; i := 1 ; while nops(a)< nmax do r := [] ; for c from 1 to n-1 do while ithprime(i) in a or ithprime(i) in r do i:= i+1 ; od ; r := [op(r), ithprime(i)] ; i:= i+1 ; od ; j := i+1 ; rsum := sum(op(k, r), k=1..nops(r)) ; while not issqr( rsum+ithprime(j)) do j := j+1 ; od ; r := [op(r), ithprime(j)] ; a := [op(a), op(r)] ; n := n+1 ; od ; RETURN(a) ; end: a := A082737(80) : for n from 1 to nops(a) do printf("%d, ", op(n, a)) ; od ; # R. J. Mathar, Nov 12 2006 CROSSREFS Cf. A082738, A082739, A082740. Sequence in context: A326662 A011049 A075639 * A104957 A329333 A083119 Adjacent sequences:  A082734 A082735 A082736 * A082738 A082739 A082740 KEYWORD nonn,tabl AUTHOR Amarnath Murthy, Apr 14 2003 EXTENSIONS More terms from R. J. Mathar, Nov 12 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 3 13:24 EDT 2020. Contains 333197 sequences. (Running on oeis4.)