login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A109396
Admirable Harshad numbers such that the subtracted divisor is also a Harshad number.
1
12, 20, 24, 30, 40, 42, 54, 70, 102, 114, 120, 222, 270, 402, 1002, 2022, 2202, 10002, 10014, 10792, 11202, 12102, 21102, 31002, 32128, 45356, 103002, 110202, 111102, 128768, 740870, 1000002, 1000014, 1001202, 1002102, 1021002, 1111002, 1200102
OFFSET
1,1
LINKS
EXAMPLE
12 is in the sequence since it is a Harshad number (1 + 2 = 3 is a divisor of 12), an admirable number: 1 - 2 + 3 + 4 + 6 = 12, and the subtracted divisor, 2, is also a Harshad number.
MATHEMATICA
hQ[n_] := Divisible[n, Plus @@ IntegerDigits@n]; aQ[n_] := hQ[n] && (d = DivisorSigma[1, n] - 2*n) > 0 && EvenQ[d] && d/2 < n && hQ[d/2] && Divisible[n, d/2]; Select[Range[50000], aQ] (* Amiram Eldar, Oct 27 2019 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jason Earls, Aug 26 2005
STATUS
approved

  NODES
Community 1
Intern 1
os 2
text 2
web 1