|
|
A110575
|
|
Numbers k that divide A110574(k); or k such that A110574(k) is a Niven number.
|
|
1
|
|
|
1, 3, 7, 9, 13, 23, 171, 399, 819, 8673, 17263
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = 7 because 1101001100101/7 = 157285871443.
|
|
MATHEMATICA
|
seq[max_] := Module[{o = Select[Range[2*max], OddQ[DigitCount[#, 2][[1]]] &], sum = 0, s = {}}, Do[sum += 10^(o[[k]] - 1); If[Divisible[IntegerReverse[sum], k], AppendTo[s, k]], {k, 1, Length[o]}]; s]; seq[1000] (* Amiram Eldar, Mar 01 2024 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|