|
%I #5 Dec 05 2013 19:54:52
%S 0,7,14,21,35,42,56,63,70,77,105,112,126,133,140,147,154,161,175,203,
%T 210,217,224,231,245,252,266,273,301,315,322,336,343,350,357,364,371,
%U 406,413,420,427,434,441,455,462,476,504,511,525,532,546,553,560,567,574
%N Multiples of 7 containing only digits 0,...,7.
%H Enrique Pérez Herrero, <a href="/A061823/b061823.txt">Table of n, a(n) for n = 1..5000</a>
%e 147 =7*21, is a term containing digits less than 8.
%t Select[7*Range[0,2000],Max[IntegerDigits[#]]<=7&] (* _Enrique Pérez Herrero_, May 13 2012 *)
%Y A061818, A061819, A061820, A061821, A061822.
%K nonn,base,easy
%O 1,2
%A _Amarnath Murthy_, May 28 2001
%E Corrected and extended by Larry Reeves (larryr(AT)acm.org), May 30 2001
|
