login
A102551
a(n) = [prime(n)/(prime(n+1)-prime(n))], where [x] means the integer part of x.
2
2, 1, 2, 1, 5, 3, 8, 4, 3, 14, 5, 9, 20, 10, 7, 8, 29, 10, 16, 35, 12, 19, 13, 11, 24, 50, 25, 53, 27, 8, 31, 21, 68, 13, 74, 25, 26, 40, 27, 28, 89, 18, 95, 48, 98, 16, 17, 55, 113, 57, 38, 119, 24, 41, 42, 43, 134, 45, 69, 140, 28, 20, 76, 155, 78, 22, 55, 33, 173, 87, 58, 44, 61
OFFSET
1,1
LINKS
EXAMPLE
a(5)=5 because 11/(13-11)=11/2 and floor(11/2)=5.
MAPLE
a:=n->floor(ithprime(n)/(ithprime(n+1)-ithprime(n))): seq(a(n), n=1..80); # Emeric Deutsch, Feb 26 2005
MATHEMATICA
Table[Floor[Prime[n]/(Prime[n + 1] - Prime[n])], {n, 73}] (* Michael De Vlieger, Oct 17 2016 *)
CROSSREFS
Cf. A001223.
Sequence in context: A109087 A102048 A318360 * A217437 A152823 A324605
KEYWORD
nonn
AUTHOR
Yasutoshi Kohmoto, Feb 25 2005
EXTENSIONS
More terms from Emeric Deutsch, Feb 26 2005
STATUS
approved