|
Search: id:A094401
|
|
|
| A094401 |
|
Composite n such that n divides both Fibonacci(n-1) and Fibonacci(n) - 1. |
|
+0
6
|
|
| 2737, 4181, 6721, 13201, 15251, 34561, 51841, 64079, 64681, 67861, 68251, 90061, 96049, 97921, 118441, 146611, 163081, 179697, 186961, 194833, 197209, 219781, 252601, 254321, 257761, 268801, 272611, 283361, 302101, 303101, 327313, 330929
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Select[Range[2, 50000], ! PrimeQ[ # ] && Mod[Fibonacci[ # - 1], # ] == 0 && Mod[Lucas[ # ] - 1, # ] == 0 &]
|
|
CROSSREFS
|
Cf. A005845, A069106, A094394, A094400.
Sequence in context: A145647 A045155 A122473 this_sequence A035774 A107570 A094497
Adjacent sequences: A094398 A094399 A094400 this_sequence A094402 A094403 A094404
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Eric S Rowland (erowland(AT)math.rutgers.edu), May 01 2004
|
|
EXTENSIONS
|
More terms from Ryan Propper (rpropper(AT)stanford.edu), Sep 24 2005
|
|
|
Search completed in 0.002 seconds
|
