A164289 -id:A164289 - cp's OEIS frontend

A164290 Sequence of twin prime p where the middle term p+1 has 6 prime factors (here p+2 is the associated twin prime, not listed).

239, 599, 809, 1319, 1487, 2087, 2339, 2969, 3299, 4157, 4271, 4787, 5021, 5099, 5231, 5639, 5849, 6359, 6659, 7307, 7349, 9431, 9767, 10007, 10139, 10331, 10709, 10889, 11069, 11171, 11351, 11549, 11717, 11831, 11969, 12539, 13007, 13337

Offset: 1

Carlos Alves, Aug 12 2009

nonn

This sequence is similar to A060213, A102168, A164289 respectively with 3, 4 and 5 prime factors in the middle number.

These sequences are of the form (p,p+1,p+2) with (p,p+2) twin primes and Omega(p+1)=m with m>=3 (m=1 or m=2 is impossible). Here m=6.

			(239, 240, 241): Omega(240)=Omega(2*2*2*2*3*5)=6 and 239, 241 are twin primes.

Vincenzo Librandi, Table of n, a(n) for n = 1..2000

Cf. A060213, A102168, A164289, A164291.

Omega = If[ # == 1, 0, Apply[Plus, Transpose[FactorInteger[ # ]][[2]]]] &; Wmil = Map[Omega, Range[1, 30000]]; Asequence = Flatten@Position[Partition[Wmil, 3, 1], {1, 6, 1}]
Transpose[Select[Partition[Prime[Range[1600]],2,1],#[[2]]-#[[1]]==2 && PrimeOmega[ #[[1]]+1]==6&]][[1]] (* Harvey P. Dale, May 15 2012 *)

A164291 a(n) = p is the first twin prime (p, p+2) for which p+1 has n prime factors (n>=2, multiplicity counted).

Original entry on oeis.org

3, 11, 59, 71, 239, 191, 2111, 1151, 14591, 26111, 15359, 139967, 138239, 675839, 2101247, 737279, 4866047, 786431, 22118399, 36175871, 194641919, 63700991, 138412031, 169869311, 1321205759, 11123294207, 16357785599, 4076863487, 25165823999, 10871635967

Offset: 2

Carlos Alves, Aug 12 2009

nonn

a(3)-a(6) are the first elements of A060213, A102168, A164289, A164290 respectively with n=3,4,5,6 (prime factors in the middle number).

This gives the first p with (p,p+2) twin primes and Omega(p+1)=n with n>=2 (n=1 is impossible).

			a(7)=191 because in (191, 192, 193) we have Omega(192)=Omega(2*2*2*2*2*2*3)=7 and 191, 193 are twin primes.
The sequence oscillates and here we see that a(7)<a(6)=239.

Donovan Johnson, Table of n, a(n) for n = 2..200

Cf. A060213, A102168, A164289, A164290.

Omega = If[ # == 1, 0, Apply[Plus, Transpose[FactorInteger[ # ]][[2]]]] &; Wmil = Map[Omega, Range[1, 10000000]]; Aseq=(Flatten@Position[Partition[Wmil, 3, 1], {1, #, 1}])[[1]] & /@ Range[3,19]

Definition and comments corrected, a(2) and a(20)-a(29) from Donovan Johnson, Aug 20 2009

cp's OEIS Frontend

A164290 Sequence of twin prime p where the middle term p+1 has 6 prime factors (here p+2 is the associated twin prime, not listed).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica