A352697 a(n) = A037237(n-1) - A281434(n).

0, 0, 1, 0, 2, 0, 2, 1, 2, 0, 6, 0, 3, 0, 6, 0, 4, 0, 6, 0, 5, 1, 7, 2, 6, 2, 7, 1, 8, 0, 8, 0, 8, 0, 11, 0, 9, 1, 10, 0, 11, 0, 11, 0, 11, 0, 14, 3, 12, 0, 13, 0, 13, 0, 15, 0, 15, 0, 15, 0, 16, 0, 18, 0, 16, 0, 17, 0, 17, 0, 19, 0, 18, 2, 19, 0, 19, 0, 20, 2

Offset

1,5

Comments

It appears that this sequence has an infinite number of zeros, i.e., A281434(n) agrees with A037237(n-1) at an infinite number of indices; also, it seems that a(n) = O(n).

Links

Table of n, a(n) for n=1..80.

Mathematica

With[{m = 20}, Table[(4 n + 3 n^2 + 2 n^3)/3, {n, m}] - Length /@ Rest[NestList[Expand[D[#, x]] &, x^x^x, m]]]

Crossrefs

Cf. A037237, A281434.

Sequence in context: A319164 A070288 A329643 * A165414 A330868 A178687

Adjacent sequences: A352694 A352695 A352696 * A352698 A352699 A352700

Keyword

nonn

Author

Vladimir Reshetnikov, Mar 29 2022

Status

approved