login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A089720 Primes == 1 or 11 (mod 70). 1
11, 71, 151, 211, 281, 421, 431, 491, 571, 631, 641, 701, 911, 991, 1051, 1061, 1201, 1471, 1481, 1621, 1831, 1901, 2111, 2251, 2311, 2381, 2521, 2531, 2591, 2671, 2731, 2741, 2801, 3011, 3221, 3301, 3361, 3371, 3511, 3571, 3581, 3851, 3931, 4001, 4201 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Previous name was: Primes p ending in 1 such that floor(p/7) = 0, 1 or 2 (mod 10).

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

select(isprime, [seq(seq(70*i+j, j=[1, 11]), i=0..1000)]); # Robert Israel, Apr 29 2020

MATHEMATICA

okQ[n_]:=Mod[n, 10]==1&&MemberQ[{0, 1, 2}, Mod[Floor[n/7], 10]]; Select[Prime[ Range[600]], okQ] (* Harvey P. Dale, Oct 16 2012 *)

PROG

(PARI) forprime( p=1, 9999, p%10==1 & p\7%10<3 & print1(p", ")) \\ M. F. Hasler, Apr 06 2009

CROSSREFS

Sequence in context: A162568 A255205 A117047 * A333408 A174202 A139850

Adjacent sequences:  A089717 A089718 A089719 * A089721 A089722 A089723

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Jan 06 2004

EXTENSIONS

Edited by M. F. Hasler, Apr 06 2009

New name from Robert Israel, Apr 29 2020

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 24 15:34 EST 2021. Contains 341570 sequences. (Running on oeis4.)