A285225 - OEIS

A285225

Primes with integer arithmetic mean of digits = 4 in base 10.

17, 53, 71, 1069, 1087, 1249, 1429, 1447, 1483, 1609, 1627, 1663, 1753, 1861, 1933, 1951, 2239, 2293, 2347, 2383, 2437, 2473, 2617, 2671, 2707, 2833, 2851, 3049, 3067, 3229, 3319, 3373, 3391, 3463, 3517, 3571, 3607, 3643, 3733, 3823, 3931, 4057, 4093, 4129

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Jaroslav Krizek, Table of n, a(n) for n = 1..1000

MATHEMATICA

Select[Prime[Range[600]], Mean[IntegerDigits[#]]==4&] (* Harvey P. Dale, Jun 11 2024 *)

PROG

(Magma) [n: n in [1..100000] | IsPrime(n) and &+Intseq(n) mod #Intseq(n) eq 0 and &+Intseq(n) / #Intseq(n) eq 4]

CROSSREFS

Primes in A061387. Subsequence of A069709.

Sequences of primes such that a(n) = k for k = 1, 2, 4, 5, 7 and 8: A069710 (k = 1), A285096 (k = 2), this sequence (k = 4), A285226 (k = 5), A285227 (k = 7), A285228 (k = 8).

Sequence in context: A062343 A176254 A287311 * A044119 A044500 A142105

Adjacent sequences: A285222 A285223 A285224 * A285226 A285227 A285228

KEYWORD

nonn,base

AUTHOR

Jaroslav Krizek, Apr 16 2017

STATUS

approved