A303092 Balanced primes of order one ending in 1.

211, 1511, 4691, 7841, 9871, 11411, 11731, 12841, 15161, 17431, 17851, 18341, 18731, 20161, 20201, 20521, 20731, 21661, 21911, 22051, 23801, 25391, 25621, 26041, 31051, 34171, 34631, 35851, 35911, 36821, 40111, 40471, 40961, 44041, 44741, 48661, 50441, 51461

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Example

211 = (188 + 211 + 213)/3 = 633/3 and 211 = 21*10 + 1.

Maple

p:=ithprime: a:=n->`if`(add(p(n-k), k=-1..1)=3*p(n) and modp(p(n), 10) = 1, p(n), NULL): seq(a(n), n=3..6000);

Prog

(GAP) P:=Filtered([1..52000], IsPrime);;
a:=Filtered(List(Filtered(List([0..Length(P)-3], k->List([1..3], j->P[j+k])), i->Sum(i)/3=i[2]), m->m[2]), l-> l mod 10=1);

Crossrefs

Intersection of A006562 and A030430.

Cf. A303093, A303094, A303095.

Sequence in context: A179595 A137872 A053072 * A361701 A086978 A108829

Adjacent sequences: A303089 A303090 A303091 * A303093 A303094 A303095

Keyword

nonn,base

Author

Muniru A Asiru, Apr 18 2018

Status

approved