cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A345141 a(1) = 1, a(2) = 0; a(n+2) = Sum_{d|n} a(d).

This page as a plain text file.
%I A345141 #4 Jun 09 2021 11:14:48
%S A345141 1,0,1,1,2,2,3,4,4,6,6,9,7,14,8,18,12,24,13,32,14,42,19,49,20,67,23,
%T A345141 75,29,94,30,114,31,138,39,151,45,193,46,207,55,253,56,288,57,338,73,
%U A345141 358,74,443,78,472,92,548,93,603,102,701,117,731,118,887,119,918,142,1056,152,1139,153,1291
%N A345141 a(1) = 1, a(2) = 0; a(n+2) = Sum_{d|n} a(d).
%F A345141 G.f. A(x) satisfies: A(x) = x + x^2 * (A(x) + A(x^2) + A(x^3) + ...).
%t A345141 a[1] = 1; a[2] = 0; a[n_] := a[n] = Sum[a[d], {d, Divisors[n - 2]}]; Table[a[n], {n, 1, 70}]
%t A345141 nmax = 70; A[_] = 0; Do[A[x_] = x + x^2 Sum[A[x^k], {k, 1, nmax}] + O[x]^(nmax + 1) // Normal, nmax + 1]; CoefficientList[A[x], x] // Rest
%Y A345141 Cf. A003238, A007439, A345137, A345138.
%K A345141 nonn
%O A345141 1,5
%A A345141 _Ilya Gutkovskiy_, Jun 09 2021