A345357 Numbers m > 4 such that [m-2..m+2] belong to A327261.
5, 717, 2637, 14157, 89037, 112077, 149517, 156957, 180477, 235917, 255357, 267837, 269997, 293037, 399357, 447837, 533517, 592557, 679677, 703917, 770157, 909837, 929997, 1043997, 1158237, 1257597, 1283037, 1296477, 1333197, 1369197, 1500237, 1971357, 1998717, 2062557, 2099997
Offset: 1
Keywords
Links
- David Lovler, Table of n, a(n) for n = 1..58
Programs
-
PARI
T319929(n, k) = if (n%2, if (k%2, n+k-1, k), if (k%2, n, 0)); T(n, k) = 2*n*k - T319929(n, k); \\ A327259 list(nn) = {my(list = List()); for (n=2, nn, for (k=2, nn\n, listput(list, T(n, k)); ); ); setminus([1..nn], Set(list)); } \\ A327261 lista(nn) = {my(v=Vec(list(nn))); for (m=5, #v-1, my(x=v[m]); if (vecsearch(v, x-2) && vecsearch(v, x-1) && vecsearch(v, x+1) && vecsearch(v, x+2), print1(x, ", ")); ); }
Comments