login
A121027
Multiples of 7 containing a 7 in their decimal representation.
34
7, 70, 77, 147, 175, 217, 273, 287, 357, 371, 378, 427, 476, 497, 567, 574, 637, 672, 679, 700, 707, 714, 721, 728, 735, 742, 749, 756, 763, 770, 777, 784, 791, 798, 847, 875, 917, 973, 987, 1057, 1071, 1078, 1127, 1176, 1197, 1267, 1274, 1337, 1372, 1379
OFFSET
1,1
FORMULA
a(n) ~ 7n. - Charles R Greathouse IV, Feb 12 2017
MATHEMATICA
Select[7*Range[500], MemberQ[IntegerDigits[#], 7] &] (* Paolo Xausa, Feb 25 2024 *)
PROG
(PARI) is(n)=n%7==0 && setsearch(Set(digits(n)), 7) \\ Charles R Greathouse IV, Feb 12 2017
KEYWORD
nonn,base,easy
AUTHOR
Reinhard Zumkeller, Jul 21 2006
EXTENSIONS
Typo in comment fixed by Reinhard Zumkeller, May 01 2011
STATUS
approved