|
|
A156674
|
|
Numbers k such that k^2 - 2 == 0 (mod 49).
|
|
1
|
|
|
10, 39, 59, 88, 108, 137, 157, 186, 206, 235, 255, 284, 304, 333, 353, 382, 402, 431, 451, 480, 500, 529, 549, 578, 598, 627, 647, 676, 696, 725, 745, 774, 794, 823, 843, 872, 892, 921, 941, 970, 990, 1019, 1039, 1068, 1088, 1117, 1137, 1166, 1186, 1215
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = a(n-1) + a(n-2) - a(n-3) = 49*n/2 - 49/4 + 9*(-1)^n/4.
G.f.: x*(2x+5)*(5x+2)/((1+x)*(1-x)^2). (End)
|
|
EXAMPLE
|
10^2 - 2 == 0 (mod 49);
39^2 - 2 == 0 (mod 49);
59^2 - 2 == 0 (mod 49);
88^2 - 2 == 0 (mod 49).
|
|
MATHEMATICA
|
With[{c = 7^2}, Select[Range[1500], Divisible[#^2 - 2, c]&]] (* Vincenzo Librandi, Apr 06 2013 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|