cp's OEIS Frontend

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.

A077129 Smallest number which is relatively prime to all the numbers between successive odd primes.

This page as a plain text file.
%I A077129 #10 Apr 06 2023 10:39:01
%S A077129 3,5,7,5,11,5,13,11,7,13,7,5,7,11,13,7,17,11,5,17,7,13,11,13,5,11,5,
%T A077129 13,37,7,13,5,17,7,23,11,7,11,13,7,29,5,11,5,31,19,11,5,13,11,7,17,13,
%U A077129 11,13,7,19,11,5,23,29,13,5,11,31,11,29,5,17,11,17,11,19,7,13,19,11
%N A077129 Smallest number which is relatively prime to all the numbers between successive odd primes.
%C A077129 Naturally every member is a prime.
%H A077129 Harvey P. Dale, <a href="/A077129/b077129.txt">Table of n, a(n) for n = 0..1000</a>
%e A077129 a(5)= 11,is the smallest number coprime to all the numbers from 13 to 17 i.e. 14,15 and 16.
%t A077129 sncp[n_]:=Module[{cr=Range[Prime[n]+1,Prime[n+1]-1],k=3},While[Total[Boole[CoprimeQ[ cr,k]]]!= Length[cr],k=NextPrime[k]];k]; Array[sncp,80,2] (* _Harvey P. Dale_, Apr 06 2023 *)
%o A077129 (PARI) for(n=2,100, for(i=2,10^9,f=0:for(k=prime(n)+1,nextprime(prime(n)+1)-1,if(gcd(i,k)>1,f=1:break)): if(!f,print1(i","):break)))
%K A077129 nonn
%O A077129 0,1
%A A077129 _Amarnath Murthy_, Oct 29 2002
%E A077129 More terms from _Ralf Stephan_, Mar 27 2003