A142350 Nonprimes of the form n/4*(c(n)-r(n)), where c(n)=n-th composite and r(n)=n-th nonprime.

1, 4, 8, 6, 8, 14, 10, 18, 20, 21, 15, 24, 25, 27, 28, 30, 21, 32, 22, 34, 24, 25, 26, 42, 44, 45, 46, 48, 49, 50, 34, 52, 54, 55, 56, 38, 58, 40, 42, 64, 65, 66, 68, 46, 48, 75, 51, 77, 52, 80, 81, 82, 84, 86, 87, 88, 90, 91, 92, 93, 63, 95, 96, 98, 66, 100, 102, 104, 70, 72

Offset

1,2

Links

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

Example

If n=12, then 12/4*(c(12)-r(12))=3/(21-18)=1=a(1).
If n=48, then 48/4*(c(48)-r(48))=12/(68-65)=4=a(2).
If n=64, then 64/4*(c(64)-r(64))=16/(76-74)=8=a(3).
If n=72, then 72/4*(c(72)-r(72))=18/(98-95)=6=a(4).
If n=96, then 96/4*(c(96)-r(96))=24/(117-115)=12=a(5), etc.

Maple

A141468 := proc(n) option remember ; if n = 1 then 0; else for a from procname(n-1)+1 do if not isprime(a) then RETURN(a) ; fi; od: fi; end: A002808 := proc(n) option remember ; A141468(n+2) ; end: for n from 1 to 3000 do p := n/(A002808(n)-A141468(n))/4 ; if type(p, 'integer') then if not isprime(p) then printf("%d, ", p) ; fi; fi; od: # R. J. Mathar, Jan 23 2009

Crossrefs

Cf. A002808, A141468.

Sequence in context: A197290 A200368 A322087 * A011515 A005531 A328278

Adjacent sequences: A142347 A142348 A142349 * A142351 A142352 A142353

Keyword

nonn

Author

Juri-Stepan Gerasimov, Sep 21 2008

Extensions

Corrected and extended by R. J. Mathar, Jan 23 2009

Status

approved