|
%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_.
|
