cp's OEIS Frontend

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.

A287336 Numbers k, not ending in 0, such that inserting a 0 between each pair of adjacent digits results in a multiple of k.

This page as a plain text file.
%I A287336 #12 Mar 03 2024 10:15:51
%S A287336 1,2,3,4,5,6,7,8,9,15,18,45,111,126,222,285,333,444,555,666,777,888,
%T A287336 999,1041,1185,1395,1443,1554,1665,1893,1998,2082,2331,2528,2757,2886,
%U A287336 3885,4662,4995,6055,6993,7245,10101,11111,11655,12321,12987,13206,13986
%N A287336 Numbers k, not ending in 0, such that inserting a 0 between each pair of adjacent digits results in a multiple of k.
%C A287336 Sequence is infinite since it contains all the numbers of the form (10^(2*t+1)-1)/9, i.e., repunits with an odd number of digits, like 111, 11111, and so on (A100706).
%H A287336 Giovanni Resta, <a href="/A287336/b287336.txt">Table of n, a(n) for n = 1..600</a>
%e A287336 41499585 is a term because 401040909050805 is a multiple of 41499585.
%t A287336 ins[n_, c_] := Block[{d = IntegerDigits[n]}, FromDigits@ Most@ Flatten@ Transpose[{d, c + 0 Range[Length@d]}]]; Select[Range[10^5], Mod[#, 10] > 0 && Mod[ins[#, 0], #] == 0 &]
%Y A287336 Cf. A285176.
%K A287336 nonn,base
%O A287336 1,2
%A A287336 _Giovanni Resta_, May 23 2017