A341151 a(n) is the sum of the n-th row of the A341150 triangle.

1, 1, 2, 2, 3, 3, 4, 2, 6, 5, 4, 4, 6, 5, 8, 6, 6, 6, 8, 4, 11, 8, 6, 8, 12, 6, 10, 8, 8, 10, 10, 6, 14, 13, 10, 12, 13, 8, 12, 10, 10, 11, 12, 10, 21, 10, 10, 6, 19, 11, 20, 18, 6, 21, 18, 8, 19, 14, 10, 12, 18, 12, 16, 14, 19, 22, 18, 10, 20, 18, 16, 14, 16

Offset

0,3

Links

Table of n, a(n) for n=0..72.

Niccolò Castronuovo, On the number of fixed points of the map gamma, arXiv:2102.02739 [math.NT], 2021.

Prog

(PARI) incr(m, nn, vincr) = if ((vincr[1]<nn) && (vincr[2]<nn), m[vincr[1]+1, vincr[2]+1]++); m;
tabl(nn) = {my(m = matrix(nn, nn), istep=0, vstep, nvstep); for (istep=0, nn, if (istep==0, vstep = [[0, 0]], vstep = nvstep); nvstep = List(); for (i=1, #vstep, my(step=vstep[i]); m = incr(m, nn, step); if (istep, listput(nvstep, [step[1]+step[2], step[2]])); listput(nvstep, [3*step[1]+1-2*step[2], 2*step[1]+1-step[2]]); ); ); m; } \\ A341150
lista(nn) = my(m=tabl(nn)); vector(nn, i, vecsum(vector(i, k, m[i, k])));

Crossrefs

Cf. A341150.

Sequence in context: A057955 A305788 A116473 * A006546 A031268 A237817

Adjacent sequences: A341148 A341149 A341150 * A341152 A341153 A341154

Keyword

nonn

Author

Michel Marcus, Feb 06 2021

Status

approved