login
A218461
Floor( prime(prime(n))/ prime(n) ).
2
1, 1, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7
OFFSET
1,3
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = floor(A006450(n)/A000040(n)).
EXAMPLE
[3/2]=1; [5/3]=1; [11/5]=2
MATHEMATICA
Floor[Prime[#]/#]&/@Prime[Range[90]] (* Harvey P. Dale, Aug 12 2016 *)
PROG
(PARI) a(n)=prime(n=prime(n))\n \\ Charles R Greathouse IV, Oct 31 2012
(PARI) apply(p->prime(p)\p, primes(100)) \\ Charles R Greathouse IV, Oct 31 2012
CROSSREFS
Sequence in context: A331245 A130239 A091092 * A186189 A083375 A088519
KEYWORD
nonn,easy
AUTHOR
Tyler Carrico, Oct 30 2012
STATUS
approved