|
Search: id:A073490
|
|
|
| A073490 |
|
Number of prime gaps in factorization of n. |
|
+0 14
|
|
| 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 2, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0
(list; graph; listen)
|
|
|
OFFSET
|
1,110
|
|
|
COMMENT
|
a(A000040(n))=0; a(A000961(n))=0; a(A006094(n))=0; a(A002110(n))=0; a(A073485(n))=0; a(A073486(n))>0; a(A073487(n)) = 1; a(A073488(n))=2; a(A073489(n))=3;
a(n)=0 iff A073483(n) = 1.
a(A097889(n)) = 0. - Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystems.com), Nov 20 2004
A137723(n) is the smallest number of the first occurring set of exactly n consecutive numbers with at least one prime gap in their factorization: a(A137723(n)+k)>0 for 0<=k<n and a(A137723(n)-1)=a(A137723(n)+n)=0. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Feb 09 2008
|
|
LINKS
|
R. Zumkeller, Table of n, a(n) for n = 1..50000
|
|
FORMULA
|
a(n) = A073484(A007947(n)).
0 <= a(m*n) <= a(m) + a(n) + 1. A137794(n) = 0^a(n). - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Feb 11 2008
|
|
EXAMPLE
|
84=2*2*3*7 with one gap between 3 and 7, therefore a(84) = 1;
110=2*5*11 with two gaps: between 3 and 5 and between 5 and 11, therefore a(110)=2.
|
|
MATHEMATICA
|
gaps[n_Integer/; n>0]:=If[n===1, 0, Complement[Prime[PrimePi[Rest[ # ]]-1], # ]&[First/@FactorInteger[n]]]; Table[Length[gaps[n]], {n, 1, 105}] (Wouter Meeussen (wouter.meeussen(AT)pandora.be), Oct 30 2004)
|
|
CROSSREFS
|
Cf. A073491, A073492, A073493, A073494, A073495.
Cf. A137721, A137722.
Adjacent sequences: A073487 A073488 A073489 this_sequence A073491 A073492 A073493
Sequence in context: A138253 A085737 A005090 this_sequence A135341 A033665 A104234
|
|
KEYWORD
|
nonn,nice
|
|
AUTHOR
|
Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystems.com), Aug 03 2002
|
|
EXTENSIONS
|
More terms from Frank Adams-Watters (FrankTAW(AT)Netscape.net), May 19 2006
|
|
|
Search completed in 0.003 seconds
|