OFFSET
1,4
COMMENTS
a(19) is the last 0 in this sequence
EXAMPLE
a(4) = 4 because 6, the fourth highly composite number, is a multiple of 1 and 2 but not of 4. a(5) = 0 because 12 is a multiple of all of 1, 2, 4, 6, and 12.
MATHEMATICA
(* let hc contain consecutive highly composite numbers starting with 1 *) Table[i = 1; While[i < n && Mod[hc[[n]], hc[[i]]] == 0, i++]; If[i == n, 0, hc[[i]]], {n, Length[hc]}] (* T. D. Noe, Sep 30 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. Lowell, Sep 30 2011
STATUS
approved