1,1

a(4)=1151, for example, is the first of a sequence of primes that continues with 1361, 2141, 2411, 2801, 3251, 3881, 3923, ...with the property 1151+4=3*5*7*11, 1361+4=3*5*7*13, 2141+5=3*5*11*13, 2801+4=3*5*11*17, 3251+4=3*5*7*31, 3881+4=3*5*7*37, 3923+4=3*7*11*17, ...

Table[k := 1; While[Not[Length[FactorInteger[Prime[k] + n]] == n], k++ ]; Prime[k], {n, 1, 7}] -Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Apr 03 2006

Sequence in context: A106999 A054566 A038144 this_sequence A136780 A128743 A097349

Adjacent sequences: A097974 A097975 A097976 this_sequence A097978 A097979 A097980

hard,nonn

Lekraj Beedassy (blekraj(AT)yahoo.com), Sep 07 2004

2 more terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Apr 03 2006