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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A353491 a(1) = 1, and for n > 1, a(n) = 1 if the largest proper divisor of n is of the form 4k+1, otherwise 0. 3
 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1 LINKS Antti Karttunen, Table of n, a(n) for n = 1..65537 Index entries for characteristic functions FORMULA a(n) = 1 iff A353490(n) = 1, otherwise 0. PROG (PARI) A032742(n) = if(1==n, n, n/vecmin(factor(n)[, 1])); A353491(n) = (1==(A032742(n)%4)); CROSSREFS Cf. A032742, A353490, A353492. Sequence in context: A050073 A266843 A373486 * A120474 A266789 A098370 Adjacent sequences: A353488 A353489 A353490 * A353492 A353493 A353494 KEYWORD nonn AUTHOR Antti Karttunen, Apr 22 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 September 7 09:14 EDT 2024. Contains 375730 sequences. (Running on oeis4.)