login

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”).

A062673
Every divisor (except 1) contains the digit 6.
18
61, 67, 163, 167, 263, 269, 367, 461, 463, 467, 563, 569, 601, 607, 613, 617, 619, 631, 641, 643, 647, 653, 659, 661, 673, 677, 683, 691, 761, 769, 863, 967, 1061, 1063, 1069, 1163, 1361, 1367, 1567, 1601, 1607, 1609, 1613, 1619, 1621, 1627, 1637, 1657
OFFSET
1,1
LINKS
EXAMPLE
26569 has divisors 163 and 26569, each of which contains the digit 6.
MATHEMATICA
fQ[n_, dgt_] := Union[ MemberQ[#, dgt] & /@ IntegerDigits@ Rest@ Divisors@ n][[1]]; Select[ Range[2, 1660], fQ[#, 6] &] (* Robert G. Wilson v, Jun 11 2014 *)
PROG
(Magma) [k:k in [2..1700]| forall{d:d in Set(Divisors(k)) diff {1}| 6 in Intseq(d)}]; // Marius A. Burtea, Nov 07 2019
KEYWORD
base,easy,nonn
AUTHOR
Erich Friedman, Jul 04 2001
EXTENSIONS
Offset corrected by Amiram Eldar, Nov 07 2019
STATUS
approved