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 A165440 #13 Sep 03 2025 00:52:22 %S A165440 3,29,47,79,83,97,137,173,191,227,263,277,281,317,349,353,367,439,443, %T A165440 457,461,547,599,619,641,673,691,709,727,797,821,853,887,907,911,977, %U A165440 1019,1069,1087,1091,1109,1163,1181,1217,1249,1307,1361,1429,1433,1447 %N A165440 Primes p such that 3+2*(sum of digits of p) is not a prime. %H A165440 Bruno Berselli, <a href="/A165440/b165440.txt">Table of n, a(n) for n = 1..1000</a> %e A165440 1087 is in the sequence because 1+0+8+7=16 and 2*16+3=35 is not prime. %t A165440 Select[Prime[Range[250]],!PrimeQ[2*Total[IntegerDigits[#]]+3]&] (* _Harvey P. Dale_, Jul 15 2014 *) %o A165440 (Magma) [ p: p in PrimesUpTo(1500) | not IsPrime(q) where q is 3+2*(&+Intseq(p))]; // _Bruno Berselli_, Jul 15 2011 %Y A165440 Cf. A165439, A007605. %K A165440 nonn,base,changed %O A165440 1,1 %A A165440 _Vincenzo Librandi_, Sep 19 2009 %E A165440 Keyword:base added by _R. J. Mathar_, Sep 21 2009