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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A289279 Number of odd composite numbers in ]2*(n-1)^2, 2*n^2[. 0
0, 0, 2, 3, 5, 6, 8, 9, 11, 10, 14, 15, 18, 18, 19, 21, 24, 23, 27, 28, 28, 32, 31, 34, 35, 38, 39, 39, 41, 44, 46, 47, 48, 49, 50, 57, 51, 56, 59, 63, 59, 65, 61, 67, 67, 69, 73, 72, 73, 77, 78, 82, 80, 80, 85, 84, 87, 90, 90, 94, 98, 90, 97, 102, 100 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Table of n, a(n) for n=1..65.

FORMULA

a(n) = 2n - 1 - A285786(n). - Ralf Steiner, Jul 30 2017

MATHEMATICA

Table[Count[Select[Range[2(n-1)^2, 2 n^2], !PrimeQ[#]&&OddQ[#]&&(#>1) &], _Integer], {n, 1, 100}]

Table[2 n - 1 - (PrimePi[2 n^2] - PrimePi[2 (n - 1)^2]), {n, 1, 100}] (* Ralf Steiner, Jul 30 2017 *)

PROG

(PARI) a(n) = sum(k=2*(n-1)^2, 2*n^2, (k%2) && (k!=1) && !isprime(k)); \\ Michel Marcus, Jul 01 2017

CROSSREFS

Cf. A285786, A006880.

Sequence in context: A214980 A098161 A026194 * A102420 A036606 A051837

Adjacent sequences:  A289276 A289277 A289278 * A289280 A289281 A289282

KEYWORD

nonn

AUTHOR

Ralf Steiner, Jul 01 2017

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 17 10:43 EDT 2017. Contains 293469 sequences.