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.
%I A243819 #24 Aug 15 2024 17:20:50 %S A243819 10201,10403,10609,10807,11009,11021,31007,40501,41303,41309,42907, %T A243819 43709,50803,51409,51809,60701,61307,61903,64307,65509,70801,71609, %U A243819 72203,73027,75007,76409,81709,91607,97049,101909,102313,102919,103121,103927,104131,104333,104339,104939,104957,105163,105949 %N A243819 Composite numbers n such that every divisor of n greater than one contains the digit 0. %H A243819 Amiram Eldar, <a href="/A243819/b243819.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..2500 from Barbara W. Waddell and Robert G. Wilson v) %e A243819 The divisors of 10201 are {1, 101, and 10201}. Except for 1 each has a 0 in its decimal expansion. %t A243819 fQ[n_, dgt_] := Union[ MemberQ[#, dgt] & /@ IntegerDigits@ Rest@ Divisors@ n][[1]]; Select[ Range[2, 106000], !PrimeQ[#] && fQ[#, 0] &] %t A243819 cd0Q[n_]:=CompositeQ[n]&&AllTrue[Rest[Divisors[n]],DigitCount[#,10,0]>0&]; Select[Range[ 106000],cd0Q] (* _Harvey P. Dale_, Aug 15 2024 *) %Y A243819 Cf. A062649, A062664, A062668, A062670, A062672, A062674, A062676, A062678, A062680. %K A243819 nonn,base,easy %O A243819 1,1 %A A243819 Barbara W. Waddell and _Robert G. Wilson v_, Jun 11 2014 %E A243819 Definition slightly modified by _Harvey P. Dale_, Aug 15 2024