editing

approved

Cf. A087056, A087059, A120858, A120859, A120860, A120862, A120863, A336109 (first column), A002315 (first row), A001542 (2nd row), A253811 (3rd row).

approved

editing

reviewed

approved

proposed

reviewed

editing

proposed

(PARI) f(n) = 3*n + 2*floorsqrtint(n2*sqrt(n^2)) + ) + 2;

proposed

editing

editing

proposed

Cf. A087056, A087059, A120858, A120859, A120860, A120862, A120863., A336109 (first column).

proposed

editing

Petros Hadjicostas: Michel, I created A336109 as the first column of array D since the first column is extremely important here. I used your program and cited you properly.

editing

proposed

(PARI) f(n) = 3*n + 2*floor(n*sqrt(2)) + 2

unused(listus) = {my(v=vecsort(Vec(listus))); for (i=1, vecmax(v), if (!vecsearch(v, i), return (i)); ); };

D(nb) = {my(m = matrix(nb, nb), t); my(listus = List); for (g=1, nb, if (g==1, t = 1, t = unused(listus)); m[g, 1]=t; listput(listus, t); t = f(t); m[g, 2]=t; listput(listus, t); for (h=3, nb, t = 6*m[g, h-1] - m[g, h-2]; m[g, h] = t; listput(listus, t); ); ); m; }; \\ Michel Marcus, Jul 08 2020

proposed

editing