%I#18 2022年9月8日08:45:03
%S 7,17,37,47,67,71,73,79,97107127137167173179197227257,
%电话:27127730731733734733673379397457467479487497547557,
%电话:5715775876076176673677679701709719727733739749751
%N每个除数(1除外)都包含数字7。
%H Amiram Eldar,n的表,n的a(n)=1..10000</a>
%e799有除数17、47和799,它们都包含数字7。
%t fQ[n_,dgt_]:=并集[MemberQ[#,dgt]&/@IntegerDigits@Rest@Divisors@n][1];选择[范围[2,760],fQ[#,7]&](*_Robert G.Wilson v_,2014年6月11日*)
%o(岩浆)[2..800]|forall{d:d in Set(Divisors(k))diff{1}|7 in Intseq(d)}];//_Marius A.Burtea,2019年11月7日
%Y参见A062653、A062664、A06266、A06268、A0626.69、A062670、A06267、A0626.71、A0621672、A06263、A062644、A062 676、A062 67、A062 68、A062 688、A062 699、A062 62680。
%K nonn,基础,简单
%O 1,1号机组
%A _弗里德曼,2001年7月4日
|