OFFSET

1,1

EXAMPLE

Among the numbers from 2 to a(2)=46 the most common value of omega is 2. Indeed, there are 21 numbers for which omega is 1 (primes or prime powers) and 22 for which omega is 2.

MATHEMATICA

a[n_] := Block[{c1=0, c2=0, v, k=1}, While[c2<=c1, v=PrimeNu[++k]; If[v == n-1, c1++]; If[v == n, c2++]]; k]; Array[a, 3]

CROSSREFS

KEYWORD

nonn,more

AUTHOR

Giovanni Resta, May 21 2016

STATUS

approved