A062342 - OEIS

%I #26 Sep 08 2022 08:45:03

%S 17,53,71,79,97,107,233,251,277,349,367,431,439,457,503,521,547,619,

%T 673,691,701,709,727,853,907,1061,1069,1087,1151,1223,1249,1429,1447,

%U 1483,1511,1601,1609,1627,1663,1753,1861,1933,1951,2141,2213,2239,2293

%N Primes whose sum of digits is a multiple of 8.

%F Intersection of A000040 (primes) and A273188 (numbers with sum of digits divisible by 8). - _M. F. Hasler_, Mar 10 2022

%e 709 is a prime with sum of digits = 16, hence belongs to the sequence.

%t Select[Prime[Range[500]],Divisible[Total[IntegerDigits[#]],8]&] (* _Harvey P. Dale_, Jun 23 2011 *)

%o (Magma) [ p: p in PrimesUpTo(10000) | &+Intseq(p) mod 8 eq 0 ]; // _Vincenzo Librandi_, Apr 02 2011

%o (PARI) is(n)= sumdigits(n)%8==0 && isprime(n) \\ _Charles R Greathouse IV_, Mar 09 2022

%Y Contains A062343 (primes with sum of digits s = 8), A106757 (s = 16), A106768 (s = 32), A106773 (s = 40), A106784 (s = 56) and A107618 (s = 64) as a subsequence.

%Y Subsequence of A062338 (primes with sum of digits divisible by 4) and of A273188 (numbers with sum of digits divisible by 8).

%K nonn,base,easy

%O 1,1

%A _Amarnath Murthy_, Jun 21 2001

%E More terms from Larry Reeves (larryr(AT)acm.org), Jul 06 2001