This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A065545 #14 Apr 11 2021 01:35:11
%S A065545 3,7,17,37,79,163,331,673,1361,2729,5471,10949,21911,43853,87719,
%T A065545 175447,350899,701819,1403641,2807303,5614657,11229331,22458671,
%U A065545 44917381,89834777,179669557,359339171,718678369,1437356741,2874713497
%N A065545 a(n) is smallest prime > 2*a(n-1), a(1) = 3.
%C A065545 There is no common term with A055496? - _Zak Seidov_, Feb 04 2016
%C A065545 Correct, there is no common term with A055496. - _Flávio V. Fernandes_, Apr 10 2021
%H A065545 Zak Seidov, <a href="/A065545/b065545.txt">Table of n, a(n) for n = 1..102</a>
%t A065545 NextPrim[n_Integer] := Block[ {k = n + 1}, While[ !PrimeQ[k], k++ ]; Return[k]]; a[1] = 3; a[n_] := NextPrim[ 2*a[n - 1]]; Table[ a[n], {n, 1, 20} ]
%t A065545 NestList[NextPrime[2*#] &, 3, 29] (* _Zak Seidov_, Feb 04 2016 *)
%o A065545 (PARI) lista(nn) = {print1(a = 3, ", "); for (n=1, nn, a = nextprime(2*a+1); print1(a, ", "););} \\ _Michel Marcus_, Feb 04 2016
%Y A065545 Cf. A055496.
%K A065545 nonn
%O A065545 1,1
%A A065545 _Robert G. Wilson v_, Nov 28 2001