The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A373338 Characteristic function of A333242: a(n) = 1 if n is a term of A333242. 2
 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS This sequence is the result of applying the N-sieve to generate the prime number subsequence A333242 where 1 indicates a prime number chosen to be included in sequence A333242 and 0 indicates the prime numbers and composites not in A333242. LINKS Antti Karttunen, Table of n, a(n) for n = 1..100000 Michael P. May, Properties of Higher-Order Prime Number Sequences, Missouri J. Math. Sci. (2020) Vol. 32, No. 2, 158-170; and arXiv version, arXiv:2108.04662 [math.NT], 2021. Index entries for characteristic functions Index entries for sequences related to prime indices in the factorization of n FORMULA a(n) = A078442(n) mod 2 MATHEMATICA Select[Prime@ Range@ 75, EvenQ@ Length@ NestWhileList[ PrimePi, #, PrimeQ] &] PROG (PARI) A078442(n) = my(k=0); while(isprime(n), k++; n=primepi(n)); k; a(n) = A078442(n) % 2; \\ Michel Marcus, Jun 15 2024 CROSSREFS Cf. A333242, A262275, A348677, A078442. Sequence in context: A091446 A341256 A270742 * A164349 A094186 A267371 Adjacent sequences: A373335 A373336 A373337 * A373339 A373340 A373341 KEYWORD nonn AUTHOR Michael P. May, Jun 01 2024 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 11 05:00 EDT 2024. Contains 375059 sequences. (Running on oeis4.)