A106770 - OEIS

%I #9 Sep 08 2022 08:45:18

%S 8999,18899,19889,19979,19997,28979,29789,29879,35999,36899,37799,

%T 37889,37997,38699,39779,39869,39887,45989,46889,46997,47699,47969,

%U 48779,48869,49499,49697,49787,49877,55799,55889,55997,56897,57689,57977

%N Primes with digit sum = 35.

%H Vincenzo Librandi, <a href="/A106770/b106770.txt">Table of n, a(n) for n = 1..4500</a>

%t Select[Prime[Range[60000]], Total[IntegerDigits[#]]==35 &] (* _Vincenzo Librandi_, Jul 08 2014 *)

%o (Magma) [p: p in PrimesUpTo(60000) | &+Intseq(p) eq 35]; // _Vincenzo Librandi_, Jul 08 2014

%o (PARI) select(x->sumdigits(x)==35, primes(6000)) \\ _Michel Marcus_, Jul 08 2014

%Y Cf. similar sequences listed in A244918.

%K nonn,base

%O 1,1

%A _Zak Seidov_, May 16 2005