proposed
approved
proposed
approved
editing
proposed
a(n) = k^2 - j^2, where (k^2,j^2) is the least pair of distinct squares for which n divides their difference.
proposed
editing
editing
proposed
a(n) = k^2-j^2, where (k^2,j^2) is the least pair of distinct squares for which n divides their difference.
Antti Karttunen, <a href="/A204998/b204998.txt">Table of n, a(n) for n = 1..23005</a>
(PARI) A204998(n) = { my(d); for(k=2, oo, for(j=1, k-1, if(!((d=(k^2)-(j^2))%n), return(d)))); }; \\ Antti Karttunen, Sep 28 2018
(PARI) A204998(n) = { my(d); for(k=sqrtint(1+n), oo, for(j=1, k-1, if(!((d=(k^2)-(j^2))%n), return(d), if(d<n, break)))); }; \\ Antti Karttunen, Sep 28 2018
3, 8, 3, 8, 5, 12, 7, 8, 9, 20, 11, 12, 13, 28, 15, 16, 17, 72, 19, 20, 21, 44, 23, 24, 75, 52, 27, 28, 29, 60, 31, 32, 33, 68, 35, 72, 37, 76, 39, 40, 41, 84, 43, 44, 45, 92, 47, 48, 147, 200, 51, 52, 53, 108, 55, 56, 57, 116, 59, 60, 61, 124, 63, 64, 65, 132, 67, 68, 69, 140, 71, 72, 73, 148, 75, 76, 77, 156, 79, 80, 81, 164
(PARI) A204998(n) = { my(d); for(k=2, oo, for(j=1, k-1, if(!((d=(k^2)-(j^2))%n), return(d)))); }; \\ Antti Karttunen, Sep 28 2018
More terms from Antti Karttunen, Sep 28 2018
approved
editing
_Clark Kimberling (ck6(AT)evansville.edu), _, Jan 21 2012