|
| |
|
|
A134789
|
|
Rounded ratio prime Fibonacci[Prime[k]]/Prime[k].
|
|
4
| |
|
|
1, 1, 2, 8, 18, 94, 1246, 17732, 10081266, 63217342, 1195118711985006, 8140003186959622868813528, 139669360584622467747806014, 1324290912910022899017738237233285189213652972190967113265372469016533360
(list; graph; refs; listen; history; internal format)
|
|
|
|
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 * A058217 A183183 A072675
Adjacent sequences: A134786 A134787 A134788 * A134790 A134791 A134792
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Nov 12 2007
|
| |
|
|
