A167278 - OEIS

%I #9 Sep 07 2024 15:37:29

%S 3,29,41,53,59,71,83,89,97,101,127,131,137,163,167,173,179,223,227,

%T 239,257,263,269,281,307,311,331,337,347,359,367,373,379,383,389,397,

%U 401,409,419,443,449,457,461,479,487,491,499,503,509,521,547,557,563,569

%N Smallest prime>n-th single (or isolated or non-twin) prime.

%H Harvey P. Dale, <a href="/A167278/b167278.txt">Table of n, a(n) for n = 1..1000</a>

%t NextPrime[Select[Prime[Range[150]],NoneTrue[#+{2,-2},PrimeQ]&]] (* _Harvey P. Dale_, Sep 07 2024 *)

%Y Cf. A000040, A007510.

%K nonn

%O 1,1

%A _Juri-Stepan Gerasimov_, Nov 01 2009

%E Corrected (229 replaced by 227) by _R. J. Mathar_, May 21 2010