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.
%I A062336 #23 Nov 23 2024 19:37:51 %S A062336 7,43,59,61,149,151,167,223,239,241,257,293,313,331,347,383,419,421, %T A062336 491,509,563,601,617,653,743,761,941,1033,1049,1051,1123,1193,1213, %U A062336 1229,1231,1283,1303,1319,1321,1373,1409,1427,1481,1553,1571,1607,1733 %N A062336 Primes whose sum of digits is a multiple of 7. %H A062336 Harry J. Smith, <a href="/A062336/b062336.txt">Table of n, a(n) for n = 1..1000</a> %e A062336 419 is a prime with sum of digits = 14, hence belongs to the sequence. %t A062336 Select[Prime[Range[300]],Divisible[Total[IntegerDigits[#]],7]&] (* _Harvey P. Dale_, Jun 27 2021 *) %o A062336 (PARI) isok(n) = isprime(n) && sumdigits(n) % 7 == 0 \\ _Harry J. Smith_, Aug 05 2009 %o A062336 (Magma) [ p: p in PrimesUpTo(100000) | &+Intseq(p) mod 7 eq 0 ]; // _Vincenzo Librandi_, Apr 02 2011 %K A062336 nonn,base,easy %O A062336 1,1 %A A062336 _Amarnath Murthy_, Jun 21 2001 %E A062336 More terms from Larry Reeves (larryr(AT)acm.org), Jul 06 2001