A118695 Semiprimes which are divisible by their digital root.

4, 6, 9, 10, 21, 38, 39, 46, 55, 57, 74, 82, 91, 93, 95, 111, 118, 129, 133, 145, 146, 183, 185, 201, 217, 218, 219, 226, 235, 237, 253, 254, 259, 262, 289, 291, 298, 309, 326, 327, 334, 361, 362, 365, 381, 398, 415, 417, 451, 453, 469, 471, 478, 489, 505, 511, 514, 542, 543

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

95 is a semiprime and it is divisible by its digital root 5.

Mathematica

Select[Range[550], PrimeOmega[#] == 2 && Divisible[#, Mod[# - 1, 9] + 1] &] (* Amiram Eldar, Feb 06 2021 *)

Crossrefs

Intersection of A001358 and A064807.

Cf. A010888.

Sequence in context: A071964 A135257 A118697 * A235108 A215478 A118693

Adjacent sequences: A118692 A118693 A118694 * A118696 A118697 A118698

Keyword

base,nonn

Author

Luc Stevens (lms022(AT)yahoo.com), May 20 2006

Extensions

Data corrected by Amiram Eldar, Feb 06 2021

Status

approved