login

Revision History for A134789

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Rounded ratio prime Fibonacci[Prime[k]]/Prime[k].
(history; published version)
#2 by Russ Cox at Sat Mar 31 10:22:05 EDT 2012
AUTHOR

_Artur Jasinski (grafix(AT)csl.pl), _, Nov 12 2007

Discussion
Sat Mar 31
10:22
OEIS Server: https://oeis.org/edit/global/339
#1 by N. J. A. Sloane at Sun Dec 09 03:00:00 EST 2007
NAME

Rounded ratio prime Fibonacci[Prime[k]]/Prime[k].

DATA

1, 1, 2, 8, 18, 94, 1246, 17732, 10081266, 63217342, 1195118711985006, 8140003186959622868813528, 139669360584622467747806014, 1324290912910022899017738237233285189213652972190967113265372469016533360

OFFSET

1,3

MATHEMATICA

k = {}; Do[If[PrimeQ[Fibonacci[Prime[n]]], AppendTo[k, Round[Fibonacci[Prime[n]]/Prime[n]]]], {n, 1, 100}]; k

CROSSREFS
KEYWORD

nonn,new

AUTHOR

Artur Jasinski (grafix(AT)csl.pl), Nov 12 2007

STATUS

approved