%I #16 Jan 04 2022 18:51:15
%S 5813,113490317018363119032971215073,
%T 73088059522214431050203554901182589644787183497642906842719134702400093278081449423917,
%U 75779161866773113924763137210006612261325953941882930001747020959951983924214061919432247806074196061
%N Primes which are the concatenation of three consecutive Fibonacci numbers.
%H Mohammad K. Azarian, <a href="https://www.fq.math.ca/Problems/Advanced_Problems_NOV2009.pdf">Counting Sums of Nonnegative Integers, Problem H-678</a>, Fibonacci Quarterly, Vol. 46/47, No. 4, November 2008/2009, p. 374; <a href="https://www.fq.math.ca/Problems/November2010advanced.pdf">Solution</a>, published in Vol. 48, No. 4, November 2010, pp. 376-377.
%e The first term is 5813 which is a prime and is the concatenation of 5,8 and 13 which are three consecutive Fibonacci numbers.
%t Select[FromDigits[Flatten[IntegerDigits/@#]]&/@Partition[ Fibonacci[ Range[250]],3,1], PrimeQ] (* _Harvey P. Dale_, Jul 04 2012 *)
%Y Cf. A000045.
%K base,nonn
%O 1,1
%A _Shyam Sunder Gupta_, Apr 17 2005
|