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 A118695 #8 Feb 06 2021 08:53:27 %S A118695 4,6,9,10,21,38,39,46,55,57,74,82,91,93,95,111,118,129,133,145,146, %T A118695 183,185,201,217,218,219,226,235,237,253,254,259,262,289,291,298,309, %U A118695 326,327,334,361,362,365,381,398,415,417,451,453,469,471,478,489,505,511,514,542,543 %N A118695 Semiprimes which are divisible by their digital root. %H A118695 Amiram Eldar, <a href="/A118695/b118695.txt">Table of n, a(n) for n = 1..10000</a> %e A118695 95 is a semiprime and it is divisible by its digital root 5. %t A118695 Select[Range[550], PrimeOmega[#] == 2 && Divisible[#, Mod[# - 1, 9] + 1] &] (* _Amiram Eldar_, Feb 06 2021 *) %Y A118695 Intersection of A001358 and A064807. %Y A118695 Cf. A010888. %K A118695 base,nonn %O A118695 1,1 %A A118695 Luc Stevens (lms022(AT)yahoo.com), May 20 2006 %E A118695 Data corrected by _Amiram Eldar_, Feb 06 2021