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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A168152 a(n) = prime(prime(n)) - prime(n). 3
1, 2, 6, 10, 20, 28, 42, 48, 60, 80, 96, 120, 138, 148, 164, 188, 218, 222, 264, 282, 294, 322, 348, 372, 412, 446, 460, 480, 490, 504, 582, 608, 636, 658, 710, 726, 762, 804, 824, 858, 884, 906, 962, 978, 1004, 1018, 1086, 1186, 1206, 1218, 1238, 1260, 1282 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..1000

FORMULA

a(n) = A006450(n) - A000040(n).

a(n) ~ n (log n)^2. -Charles R Greathouse IV, May 25, 2011

MAPLE

A168152 := proc(n) local p; p := ithprime(n) ; ithprime(p)-p ; end proc: seq(A168152(n), n=1..120) ; # R. J. Mathar, Nov 19 2009

MATHEMATICA

Table[Prime[Prime[n]] - Prime[n], {n, 1, 100}] (* G. C. Greubel, Jul 14 2016 *)

PROG

(MAGMA) [NthPrime(NthPrime(n))-NthPrime(n): n in [1..60]]; // Vincenzo Librandi, Jul 15 2016

CROSSREFS

Cf. A000040, A006450.

Sequence in context: A239542 A007926 A320942 * A211982 A096338 A198381

Adjacent sequences:  A168149 A168150 A168151 * A168153 A168154 A168155

KEYWORD

nonn

AUTHOR

Juri-Stepan Gerasimov, Nov 19 2009

EXTENSIONS

a(10) corrected by R. J. Mathar, Nov 19 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 September 17 11:33 EDT 2019. Contains 327129 sequences. (Running on oeis4.)