A327261 Numbers > 1 not of the form 2n*k - A319929(n,k) where n and k > 1.
2, 3, 4, 5, 6, 7, 9, 11, 12, 14, 15, 17, 19, 21, 22, 25, 27, 28, 29, 31, 35, 37, 38, 39, 44, 45, 46, 47, 49, 51, 55, 57, 61, 62, 65, 67, 69, 71, 75, 76, 79, 81, 86, 87, 89, 91, 92, 94, 97, 99, 101, 105, 107, 109, 115, 117, 118, 119, 121
Offset: 1
Keywords
Links
- David Lovler, Table of n, a(n) for n = 1..2858
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 lista(nn) = {my(list = List()); for (n=2, nn, for (k=2, nn\n, listput(list, T(n, k)); ); ); setminus([2..nn], Set(list)); } \\ David Lovler, Apr 30 2021
Extensions
Name amended David Lovler, Jan 22 2022
Comments