A139103 Numbers that show the distribution of prime numbers up to the n-th prime using "0" for primes and "1" for nonprime numbers.

10, 100, 10010, 1001010, 10010101110, 1001010111010, 10010101110101110, 1001010111010111010, 10010101110101110101110, 10010101110101110101110111110, 1001010111010111010111011111010, 1001010111010111010111011111010111110, 10010101110101110101110111110101111101110

Offset

1,1

Comments

a(n) has A000040(n) digits, n digits "0" and A000040(n)-n digits "1".

Links

Table of n, a(n) for n=1..13.

Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.

Mathematica

Table[ sum = 0; For[i = 1, i <= Prime[n] , i++, sum = sum*2;
If[! PrimeQ[i], sum++]]; IntegerString[sum, 2], {n, 1, 20}] (* Robert Price, Apr 03 2019 *)

Prog

(PARI) a(n) = fromdigits(vector(prime(n), k, !isprime(k)), 10); \\ Michel Marcus, Apr 04 2019

Crossrefs

Binary representation of A139104.

Subset of A118256.

Cf. A139101, A139102, A139119, A139120, A139122.

Sequence in context: A173481 A135651 A220812 * A067217 A266175 A304237

Adjacent sequences: A139100 A139101 A139102 * A139104 A139105 A139106

Keyword

nonn,base

Author

Omar E. Pol, Apr 08 2008

Extensions

a(12)-a(13) from Robert Price, Apr 03 2019

Status

approved