|
|
A090076
|
|
a(n) = prime(n)*prime(n+2).
|
|
21
|
|
|
10, 21, 55, 91, 187, 247, 391, 551, 713, 1073, 1271, 1591, 1927, 2279, 2773, 3233, 3953, 4331, 4891, 5609, 6059, 7031, 8051, 8989, 9991, 10807, 11227, 12091, 13843, 14803, 17399, 18209, 20413, 20989, 23393, 24613, 26219, 28199, 29893, 31313
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = prime(5)*prime(7) = 11*17 = 187.
|
|
MATHEMATICA
|
Last[#]First[#]&/@Partition[Prime[Range[50]], 3, 1] (* Harvey P. Dale, May 08 2013 *)
|
|
PROG
|
(MuPAD) ithprime(i)*ithprime(i+2) $ i = 1..40 // Zerinvary Lajos, Feb 26 2007
(Sage)
def prime_gaps(n):
primegaps = []
nprimes = primes_first_n(n+1)
for i in range(2, n+1):
primegaps.append(nprimes[i]*nprimes[i-2])
return primegaps
(Haskell)
a090076 n = a090076_list !! (n-1)
a090076_list = zipWith (*) a000040_list $ drop 2 a000040_list
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|