A098048 Numbers k such that A098037(k) sets a new record. A098037 is the number of prime divisors (counting multiplicity) of the sums of two consecutive primes.

1, 2, 5, 16, 18, 43, 162, 190, 532, 564, 3314, 3908, 10499, 30789, 53828, 62946, 278737, 364195, 629686, 3768344, 7827416, 9496221, 23159959, 68035462, 92566977, 370110663, 648634305, 4032924162, 7748432257, 17324573653, 19879357650, 34988238805

Offset

1,2

Links

Table of n, a(n) for n=1..32.

Mathematica

s = PrimeOmega[Total[#]] & /@ Partition[Prime[Range[10^5]], 2, 1]; Map[FirstPosition[s, #][[1]] &, Union@FoldList[Max, s]] (* Amiram Eldar, Feb 07 2020 *)

Crossrefs

Cf. A001043, A001222, A098037.

Sequence in context: A286381 A286382 A127580 * A257348 A101847 A251600

Adjacent sequences: A098045 A098046 A098047 * A098049 A098050 A098051

Keyword

nonn,more

Author

Jason Earls, Sep 11 2004

Extensions

a(17)-a(29) from Donovan Johnson, Sep 27 2008

a(30)-a(32) from Amiram Eldar, Feb 07 2020

Status

approved