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.

A298075 Primes p whose last digit is the same as that of both its predecessor prime and its successor prime.

This page as a plain text file.
%I A298075 #11 Feb 09 2018 11:08:36
%S A298075 1637,3109,4327,4861,6491,6803,8563,11047,11887,13441,13669,14197,
%T A298075 17519,17827,18859,18869,20369,20431,22511,22531,22973,22993,24943,
%U A298075 25219,26459,26479,27397,27551,28319,29453,29473,31091,32213,32401,34939,35201,35291,36353,36373
%N A298075 Primes p whose last digit is the same as that of both its predecessor prime and its successor prime.
%C A298075 69623 is the least prime in this sequence that is equidistant from its predecessor prime (69593) and its successor prime (69653).
%e A298075 1637 is in the sequence because it is prime with last digit 7, and both its predecessor prime (1627) and successor prime (1657) also end in 7.
%e A298075 3109 is in the sequence because each of the three consecutive primes 3089, 3109, and 3119 ends in 9.
%e A298075 3119 is not in the sequence: although it is prime and both it and its predecessor prime (3109) end with the digit 9, the next prime (3121) does not.
%t A298075 Select[Partition[Prime[Range[10000]], 3, 1], Mod[#[[1]], 10] == Mod[#[[2]], 10] == Mod[#[[3]], 10] &][[All, 2]]
%Y A298075 Subsequence of A290450.
%K A298075 nonn,base
%O A298075 1,1
%A A298075 _K. D. Bajpai_, Jan 11 2018