|
|
A091982
|
|
Nonprimes n such that Mod(n,4) == 1 and denominator(Fibonacci((n-1)/4)/n) = 1.
|
|
2
|
|
|
1, 4181, 6721, 13201, 34561, 51841, 64681, 90061, 96049, 97921, 163081, 186961, 197209, 268801, 283361, 302101, 330929, 399001, 489601, 520801, 636641, 655201, 920577, 999941, 1034881, 1072513, 1081649, 1084201, 1106561, 1317121, 1346269, 1392169, 1533601
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10^6, 4], And[! PrimeQ@ #, Denominator[Fibonacci[(# - 1)/4]/#] == 1] &] (* Michael De Vlieger, May 07 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Mar 17 2004
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|