The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A353729 Numbers with property that if any digit is deleted then the result is divisible by that digit. 3
 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 22, 33, 44, 55, 66, 77, 88, 99, 111, 122, 124, 126, 142, 155, 162, 168, 186, 222, 244, 248, 284, 324, 333, 342, 366, 444, 488, 555, 648, 666, 684, 728, 742, 777, 888, 999, 1111, 1113, 1122, 1124, 1128, 1131, 1142, 1146, 1155 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Subsequence of A052382. - Chai Wah Wu, May 14 2022 LINKS Paolo Xausa, Table of n, a(n) for n = 1..5000 EXAMPLE 728 is a term, since 7 divides 28, 2 divides 78 and 8 divides 72. MATHEMATICA A353729Q[n_] := Block[{d = IntegerDigits[n], i=0}, FreeQ[d, 0] && (While[++i <= Length[d] && Divisible[FromDigits[Drop[d, {i}]], d[[i]]]]; i > Length[d])]; Select[Range[2000], A353729Q] (* Paolo Xausa, Feb 27 2024 *) PROG (Python) from itertools import count, islice def A353729_gen(startvalue=1): # generator of terms >= startvalue for n in count(max(startvalue, 1)): s = str(n) if not ('0' in s or any(int('0'+s[:i]+s[i+1:]) % int(s[i]) for i in range(len(s)))): yield n A353729_list = list(islice(A353729_gen(), 30)) # Chai Wah Wu, May 14 2022 CROSSREFS Cf. A052382. Sequence in context: A193408 A368944 A346217 * A227001 A248954 A082937 Adjacent sequences: A353726 A353727 A353728 * A353730 A353731 A353732 KEYWORD nonn,base AUTHOR N. J. A. Sloane, May 14 2022, following a suggestion from Anant Pratap Singh. STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 13 21:02 EDT 2024. Contains 375144 sequences. (Running on oeis4.)