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

 Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 59th year, we have over 358,000 sequences, and we’ve crossed 10,300 citations (which often say “discovered thanks to the OEIS”). Other ways to Give
 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A255679 Least number k such that pi(k*n)^2 = pi(i*n)^2 + pi(j*n)^2 for some 0 < i < j < k. 3
 4, 6, 4, 12, 6, 17, 17, 6, 11, 6, 13, 14, 4, 10, 31, 35, 10, 8, 20, 20, 70, 20, 34, 23, 47, 17, 44, 25, 5, 46, 4, 26, 53, 13, 29, 33, 35, 45, 65, 10, 18, 64, 117, 21, 77, 19, 71, 101, 44, 80, 28, 93, 36, 183, 100, 98, 55, 4, 53, 81, 31, 120, 58, 40, 53, 56, 34, 49, 181, 218 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS Conjecture: a(n) exists for any n > 0. In other words, for each n = 1,2,3,... the sequence pi(k*n) (k = 1,2,3,...) contains a Pythagorean triple. REFERENCES Zhi-Wei Sun, Problems on combinatorial properties of primes, in: M. Kaneko, S. Kanemitsu and J. Liu (eds.), Number Theory: Plowing and Starring through High Wave Forms, Proc. 7th China-Japan Seminar (Fukuoka, Oct. 28 - Nov. 1, 2013), Ser. Number Theory Appl., Vol. 11, World Sci., Singapore, 2015, pp. 169-187. LINKS Zhi-Wei Sun, Table of n, a(n) for n = 1..240 Zhi-Wei Sun, Problems on combinatorial properties of primes, arXiv:1402.6641 [math.NT], 2014. EXAMPLE a(1) = 4 since pi(4*1)^2 = 2^2 = pi(1*1)^2 + pi(3*1)^2. a(21) = 70 since pi(70*21)^2 = pi(1470)^2 = 232^2 = 160^2 + 168^2 = pi(45*21)^2 + pi(48*21)^2. MATHEMATICA Do[k=0; Label[bb]; k=k+1; Do[If[PrimePi[k*n]^2==PrimePi[i*n]^2+PrimePi[j*n]^2, Goto[aa], Goto[cc]]; Label[cc]; Continue, {j, 1, k-1}, {i, 1, j-1}]; Goto[bb]; Label[aa]; Print[n, " ", k]; Continue, {n, 1, 70}] PROG (PARI) is_ok(n, k)={ r=0; for(i=1, k-1, for(j=i+1, k-1, if(primepi(k*n)^2 == primepi(i*n)^2 + primepi(j*n)^2, r=1; break(2)) )); return(r); } a(n)={ k=0; while(!is_ok(n, k), k++); return(k); } main(size)={ v=vector(size); i=1; m=1; while(i<=size, v[i]=a(i); i++); return(v); } /* Anders Hellström, Jul 11 2015 */ CROSSREFS Cf. A000290, A000720, A255677. Sequence in context: A143521 A278363 A123969 * A019188 A019244 A019189 Adjacent sequences: A255676 A255677 A255678 * A255680 A255681 A255682 KEYWORD nonn AUTHOR Zhi-Wei Sun, Jul 11 2015 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 December 6 19:33 EST 2022. Contains 358648 sequences. (Running on oeis4.)