%I A065541
%S A065541 5,29,149,751,3761,18839,94201,471007,2355037,11775191,58875961,
%T A065541 294379823,1471899119,7359495683,36797478433,183987392167,919936960849,
%U A065541 4599684804259,22998424021409,114992120107093,574960600535527
%N A065541 a(n) is smallest prime > 5*a(n-1), a(1) = 5.
%t A065541 NextPrim[n_Integer] := Block[ {k = n + 1}, While[ !PrimeQ[k], k++ ]; 
               Return[k]]; a[1] = 5; a[n_] := NextPrim[ 5*a[n - 1]]; Table[ a[n], 
               {n, 1, 25} ]
%Y A065541 Sequence in context: A060963 A107002 A027864 this_sequence A060926 A098780 
               A146178
%Y A065541 Adjacent sequences: A065538 A065539 A065540 this_sequence A065542 A065543 
               A065544
%K A065541 nonn
%O A065541 1,1
%A A065541 Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 28 2001