OFFSET
1,4
COMMENTS
A reinversion type sequence using the distribution sequence of the primes as the inverse function and A004001 as the pattern function.
Frequency count shows this sequence doesn't cover the integer domain.
MATHEMATICA
crid[n_Integer?Positive] := crid[n] =PrimePi[PrimePi[n-1]] + crid[n - crid[n-1]] crid[1] = crid[2] = 1 digits=256 a=Table[crid[n], {n, 1, digits}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Oct 11 2003
STATUS
approved