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”).
%I #65 Jan 11 2016 03:23:04
%S 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,24,26,28,30,
%T 31,33,36,39,40,41,42,44,48,50,51,55,60,61,62,63,66,70,71,77,80,81,82,
%U 84,88,90,91,93,99,100,101,102,103,104,105,106,107,108,109,110,111,112
%N Numbers m whose decimal representation includes at least one digit that divides every digit of m.
%C Every number that has a digit '1' (cf. A011531) is in this sequence. Sequence A034838 (every digit divides n) is not a subsequence (e.g., 324 is not in the present sequence). - _M. F. Hasler_, Jan 10 2016
%H Chai Wah Wu, <a href="/A263314/b263314.txt">Table of n, a(n) for n = 1..10000</a>
%o (Python)
%o A263314_list = []
%o for i in range(10**4):
%o s = str(i)
%o for d in s:
%o j = int(d)
%o if j :
%o for e in s:
%o if int(e) % j:
%o break
%o else:
%o A263314_list.append(i)
%o break
%o # _Chai Wah Wu_, Oct 21 2015
%o (PARI) is(n)={n && (n=select(t->t,Set(digits(n))))%n[1]==0} \\ The divisor is necessarily the smallest nonzero digit. A vector having no nonzero component is considered equal to 0. - _M. F. Hasler_, Jan 10 2016
%K nonn,base
%O 1,2
%A _Giovanni Teofilatto_, Oct 14 2015