login
Next prime after n-th Fibonacci number.
4

%I #8 Nov 21 2013 12:46:03

%S 2,2,2,3,5,7,11,17,23,37,59,97,149,239,379,613,991,1601,2591,4201,

%T 6779,10949,17713,28661,46381,75029,121403,196429,317827,514243,

%U 832063,1346273,2178313,3524603,5702897,9227479

%N Next prime after n-th Fibonacci number.

%p [ seq( nextprime(fibonacci(i)),i=0..40) ];

%t NextPrime/@Fibonacci[Range[0,40]] (* _Harvey P. Dale_, Feb 23 2011 *)

%K nonn

%O 0,1

%A _N. J. A. Sloane_.