%I #4 May 29 2013 15:42:49
%S 11,106,407,415,457,5049,11473,13477,15356,18428,19427,20669,27973,
%T 39685,40062,45174,58976,60616,66928,93478,105516,108706,113100,
%U 118511,139027,163823,170002,178214,184338,206388,217780,222201
%N n+p(n)+p(p(n)) is a square, where p(n) is the n-th prime.
%e 407+p(407)+p(p(407))=169^2.
%t Select[Range[250000],IntegerQ[Sqrt[#+Prime[#]+Prime[Prime[#]]]]&] (* _Harvey P. Dale_, May 29 2013 *)
%Y Cf. A116010.
%K nonn
%O 1,1
%A _Giovanni Resta_, Feb 13 2006