%I A124401
%S A124401 3,5,8,9,11,15,21,39,50,63,83,95,99,173,350,854,1308,1769,2903,5250,
%T A124401 5345,5639,6195,7239
%N A124401 Indices where 2 occurs in A124151.
%C A124401 Does 2 occur infinitely often in A124151?
%t A124401 f[n_] := Block[{k = 1}, While[ !PrimeQ[ Sum[k^(2j - 1), {j, n}] + 1] 
               && k < 3, k++ ]; k]; lst = {}; Do[ If[f@n == 2, Print[n]; AppendTo[lst, 
               n]], {n, 9250}]; lst - from Robert G. Wilson v (rgwv(at)rgwv.com), 
               Dec 17 2006
%Y A124401 Cf. A006093, A124205-A124209, A124164, A124178, A124181, A124185-A124187, 
               A124189, A124200, A124154, A124163.
%Y A124401 Sequence in context: A108594 A026223 A034784 this_sequence A151747 A088597 
               A080640
%Y A124401 Adjacent sequences: A124398 A124399 A124400 this_sequence A124402 A124403 
               A124404
%K A124401 nonn
%O A124401 1,1
%A A124401 Artur Jasinski (grafix(AT)csl.pl), Dec 14 2006
%E A124401 More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Dec 17 2006