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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A356313 a(n) = 1 if {the least k >= n such that n and A276086(k) are coprime} is one of the primorial numbers (A002110), otherwise 0. 4
 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0 LINKS Antti Karttunen, Table of n, a(n) for n = 0..65537 PROG (PARI) \\ Needs also code from A356302. A356309(n) = (n+A356302(n)); isA002110(n) = if(n<=1, n, my(f=factor(n), o=omega(n)); (bigomega(n)==o)&&(primepi(f[o, 1])==o)); A356313(n) = isA002110(A356309(n)); CROSSREFS Characteristic function of A356314. Cf. A002110, A276086, A356302, A356309. Sequence in context: A200263 A051067 A288858 * A309218 A189718 A054638 Adjacent sequences: A356310 A356311 A356312 * A356314 A356315 A356316 KEYWORD nonn AUTHOR Antti Karttunen, Nov 04 2022 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 March 29 22:15 EDT 2023. Contains 361599 sequences. (Running on oeis4.)