A376334 Integer part of the product of three consecutive primes divided by their sum.
3, 7, 16, 32, 59, 85, 125, 178, 249, 342, 431, 539, 632, 749, 924, 1102, 1289, 1458, 1645, 1836, 2036, 2324, 2663, 3038, 3352, 3579, 3765, 4005, 4482, 5067, 5770, 6129, 6676, 7123, 7729, 8204, 8775, 9362, 9964, 10515, 11230, 11809, 12499, 12845, 13627, 14792
Offset: 1
Keywords
Examples
a(5) = Floor[(prime(5)*prime(6)*prime(7))/(prime(5)+prime(6)+prime(7))]==59.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A160830.
Programs
-
Mathematica
Floor[Times@@#/Total[#]&/@Partition[Prime[Range[100]],3,1]]