cp's OEIS Frontend

A048550 a(n+1) is the next smallest prime beginning with a(n), initial prime is 3.

%I A048550 #12 Dec 15 2023 14:38:08
%S A048550 3,31,311,3119,31193,3119309,31193093,311930933,31193093317,
%T A048550 311930933179,3119309331797,311930933179703,31193093317970371,
%U A048550 3119309331797037107,311930933179703710759,31193093317970371075907
%N A048550 a(n+1) is the next smallest prime beginning with a(n), initial prime is 3.
%H A048550 Robert Israel, <a href="/A048550/b048550.txt">Table of n, a(n) for n = 0..328</a>
%p A048550 f:= proc(n) local d,a;
%p A048550   for d from 1 do
%p A048550     for a from 10^d*n+1 by 2 to 10^d*(n+1) do
%p A048550       if isprime(a) then return a fi
%p A048550   od od
%p A048550 end proc:
%p A048550 R:= 3: x:= 3:
%p A048550 for i from 2 to 30 do
%p A048550   x:= f(x);
%p A048550   R:= R, x;
%p A048550 od:
%p A048550 R; # _Robert Israel_, Dec 13 2023
%Y A048550 Cf. A048549, A048551, A048552, A048553, A048554, A048555, A048556.
%K A048550 nonn,base
%O A048550 0,1
%A A048550 _Patrick De Geest_, May 15 1999