Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #17 May 12 2023 19:19:48
%S 2,11,67,521,4099,32771,262147,2097169,16777259,134217757,1073741827,
%T 8589934609,68719476767,549755813911,4398046511119,35184372088891,
%U 281474976710677,2251799813685269,18014398509482143,144115188075855881
%N Smallest prime >= 8^n.
%t NextPrime[ n_Integer ] := (k = n + 1; While[ !PrimeQ[ k ], k++ ]; k); Table[ NextPrime[ 8^n ], {n, 0, 20} ]
%t NextPrime/@(8^Range[0,20]) (* _Harvey P. Dale_, May 06 2013 *)
%o (PARI) g(n,b) = for(x=0,n,print1(nextprime(b^x)",")) \\ _Cino Hilliard_, Mar 03 2005
%Y Cf. A001018.
%K nonn
%O 0,1
%A _Robert G. Wilson v_, Aug 14 2001
%E Edited by _N. J. A. Sloane_ at the suggestion of _Andrew S. Plewe_, May 16 2007