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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A154862 Nonprimes of the form prime(prime(n)) - 2*n. 0
1, 1, 9, 21, 45, 51, 65, 105, 133, 153, 209, 243, 247, 325, 357, 385, 413, 459, 495, 531, 675, 707, 729, 789, 805, 845, 891, 913, 951, 981, 1003, 1067, 1083, 1111, 1125, 1203, 1313, 1335, 1347, 1369, 1395, 1417, 1557, 1625, 1703, 1725, 1935, 1967, 2133, 2211 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

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

MAPLE

for n from 1 to 100 do p := ithprime(ithprime(n))-2*n ; if not isprime(p) then printf("%d, ", p) ; fi; od: # R. J. Mathar, Jan 18 2009

MATHEMATICA

Select[Table[Prime[Prime[n]] - 2 n, {n, 80}], ! PrimeQ[#] &] (* Vincenzo Librandi, Jan 08 2019 *)

PROG

(MAGMA) [a: n in [1..100] | not IsPrime(a) where a is NthPrime(NthPrime(n)) -2*n]; // Vincenzo Librandi, Jan 08 2019

CROSSREFS

Cf. A006450, A141468.

Sequence in context: A053476 A110680 A163205 * A020137 A231570 A020190

Adjacent sequences:  A154859 A154860 A154861 * A154863 A154864 A154865

KEYWORD

nonn

AUTHOR

Juri-Stepan Gerasimov, Jan 16 2009

EXTENSIONS

35 replaced with 45 and 645 replaced with 675 by R. J. Mathar, Jan 18 2009

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 16 14:56 EDT 2019. Contains 324152 sequences. (Running on oeis4.)