|
Search: id:A101262
|
|
|
| A101262 |
|
Records in the sequence A024573 defined by [1/{n*e}], {x} := x - [x]. |
|
+0
1
|
|
| 1, 2, 6, 35, 76, 90, 110, 142, 198, 328, 952, 9067, 18996, 20991, 23456, 26575, 30652, 36205, 44217, 56781, 79321, 131533, 384870, 5202154, 10762714
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
lst = {}; a = 0; Do[ b = Floor[1/(n E - Floor[n E])]; If[b > a, AppendTo[ lst, b]; a = b; Print[{n, b}]], {n, 10^7}]; lst (from Robert G. Wilson v Jan 24 2005)
|
|
CROSSREFS
|
Cf. A024573.
Sequence in context: A076863 A118186 A075272 this_sequence A135965 A018983 A081003
Adjacent sequences: A101259 A101260 A101261 this_sequence A101263 A101264 A101265
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Carlos Alves (cjsalves(AT)gmail.com), Jan 23 2005
|
|
EXTENSIONS
|
a(20)-a(26) from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 24 2005
|
|
|
Search completed in 0.002 seconds
|
