|
Search: id:A134789
|
|
|
| A134789 |
|
Rounded ratio prime Fibonacci[Prime[k]]/Prime[k]. |
|
+0
5
|
|
| 1, 1, 2, 8, 18, 94, 1246, 17732, 10081266, 63217342, 1195118711985006, 8140003186959622868813528, 139669360584622467747806014, 1324290912910022899017738237233285189213652972190967113265372469016533360
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
MATHEMATICA
|
k = {}; Do[If[PrimeQ[Fibonacci[Prime[n]]], AppendTo[k, Round[Fibonacci[Prime[n]]/Prime[n]]]], {n, 1, 100}]; k
|
|
CROSSREFS
|
Cf. A050937, A090819, A134787, A134788.
Sequence in context: A074128 A061226 A134827 this_sequence A058217 A072675 A033711
Adjacent sequences: A134786 A134787 A134788 this_sequence A134790 A134791 A134792
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Nov 12 2007
|
|
|
Search completed in 0.002 seconds
|
