|
Search: id:A136121
|
|
| |
|
| 3, 6, -12, -37, 103369, 1298, 3173, 119, 568338, -2377, 4271976, 3671, 2966929, 4679, 3755, 411547076, -7548356, -742070, 131900, 108983, 13988275, 198923609, 54008, 2194971, 689148781190, 1587713977705, 6700494215, 2691971279, 1226979802842339, -297697344982
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
The integer log of a fraction p/q is A001414(p) - A001414(q).
|
|
MATHEMATICA
|
sopfr = Function[x, Plus @@ Map[Times @@ # &, FactorInteger[x]]]; Table[sopfr[FromContinuedFraction[ContinuedFraction[Pi, k]]], {k, 1, 50}]
|
|
CROSSREFS
|
Cf. A001414, A002485, A002486.
Adjacent sequences: A136118 A136119 A136120 this_sequence A136122 A136123 A136124
Sequence in context: A102972 A075209 A075207 this_sequence A023369 A129380 A085866
|
|
KEYWORD
|
easy,sign
|
|
AUTHOR
|
Carlos Alves (cjsalves(AT)gmail.com), Dec 16 2007
|
|
|
Search completed in 0.002 seconds
|
