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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A333050 a(1) = 1; a(n+1) = Sum_{d|n, gcd(d, n/d) = 1} a(d). 0
1, 1, 2, 3, 4, 5, 9, 10, 11, 12, 18, 19, 25, 26, 37, 44, 45, 46, 59, 60, 68, 80, 100, 101, 114, 115, 142, 143, 156, 157, 219, 220, 221, 242, 289, 303, 318, 319, 380, 408, 423, 424, 536, 537, 559, 575, 677, 678, 725, 726, 842, 890, 919, 920, 1064, 1087, 1107, 1169, 1327, 1328 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
LINKS
MATHEMATICA
a[1] = 1; a[n_] := a[n] = Sum[If[GCD[(n - 1)/d, d] == 1, a[d], 0], {d, Divisors[n - 1]}]; Table[a[n], {n, 1, 60}]
CROSSREFS
Sequence in context: A047362 A032969 A095906 * A328119 A118732 A118872
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 06 2020
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 05:28 EDT 2024. Contains 371264 sequences. (Running on oeis4.)