|
Search: id:A023173
|
|
| |
|
| 1, 2, 11, 19, 22, 29, 31, 38, 41, 58, 59, 61, 62, 71, 79, 82, 89, 101, 109, 118, 122, 131, 139, 142, 149, 151, 158, 178, 179, 181, 191, 199, 202, 211, 218, 229, 239, 241, 251, 262, 269, 271, 278, 281, 298, 302, 311, 323, 331, 349, 358, 359, 362, 379, 382, 389, 398, 401
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Sequence contains 1, A064739(k) for all k>=0, 2*A064739(k) for k>1 - Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 06 2002
|
|
MATHEMATICA
|
lst={}; Do[If[Mod[Fibonacci[n], n]==1, AppendTo[lst, n]], {n, 1, 7!}]; Take[Union[lst], 5! ] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 03 2009]
|
|
CROSSREFS
|
Cf. A045468, A003631, A064739.
Sequence in context: A074926 A066144 A102343 this_sequence A018443 A163058 A079062
Adjacent sequences: A023170 A023171 A023172 this_sequence A023174 A023175 A023176
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
David W. Wilson (davidwwilson(AT)comcast.net)
|
|
|
Search completed in 0.002 seconds
|
