login
This site is supported by donations to The OEIS Foundation.

 

Logo

The October issue of the Notices of the Amer. Math. Soc. has an article about the OEIS.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A045978 Palindromic primes that are "near miss circular primes" (all cyclic shifts except one are primes). 3
101, 181, 191, 313, 727, 757, 787, 797, 13931, 71317, 73237, 77977, 7791977 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

Table of n, a(n) for n=0..12.

P. De Geest, Circular primes

MATHEMATICA

NearCyclPrmsUpTo10powerK[k_]:= Union@Flatten[Table[ParallelMap[If[IntegerDigits[#]== Reverse@IntegerDigits[#] && (Count[FromDigits/@

  NestList[RotateLeft, IntegerDigits[#], IntegerLength[#]-1], _?PrimeQ] ==IntegerLength[#]-1), #, Nothing]&, Select[FromDigits/@ Tuples[{1, 2, 3, 5, 7, 8, 9, 0}, n], PrimeQ]], {n, 3, k}], 1]; NearCyclPrmsUpTo10powerK[7] (* Mikk Heidemaa, Apr 26 2017 *)

CROSSREFS

Sequence in context: A140037 A107209 A076613 * A238671 A269575 A177032

Adjacent sequences:  A045975 A045976 A045977 * A045979 A045980 A045981

KEYWORD

fini,nonn,base

AUTHOR

Carlos Rivera

EXTENSIONS

Corrected by Jud McCranie, Jan 04 2001

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 23 02:13 EDT 2018. Contains 315271 sequences. (Running on oeis4.)