login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A079415 a(n) = floor(prime(n)/n) * ceiling(prime(n)/n) / 2. 1
2, 1, 1, 1, 3, 3, 3, 3, 3, 3, 3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 15, 10, 10, 10, 15, 15, 15, 15, 15, 15, 15 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

MATHEMATICA

fc[n_]:=Module[{c=Prime[n]/n}, (Floor[c]Ceiling[c])/2]; Array[fc, 80] (* Harvey P. Dale, May 20 2015 *)

PROG

(PARI) vector(80, n, floor(prime(n)/n)*ceil(prime(n)/n)/2) \\ G. C. Greubel, Jan 19 2019

(MAGMA) [Floor(NthPrime(n)/n)*Ceiling(NthPrime(n)/n)/2: n in [1..80]]; // G. C. Greubel, Jan 19 2019

(Sage) [floor(nth_prime(n)/n)*ceil(nth_prime(n)/n)/2 for n in (1..80)] # G. C. Greubel, Jan 19 2019

CROSSREFS

Cf. A038605, A079416, A000040.

Sequence in context: A047100 A124772 A227543 * A126347 A309240 A057001

Adjacent sequences:  A079412 A079413 A079414 * A079416 A079417 A079418

KEYWORD

nonn

AUTHOR

Reinhard Zumkeller, Jan 07 2003

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 April 11 03:50 EDT 2021. Contains 342886 sequences. (Running on oeis4.)