The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A108193 Numbers n such that n shares at least one digit with both the sum of its digits and the product of its digits. 1
 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 19, 20, 30, 40, 50, 60, 70, 80, 90, 91, 100, 109, 118, 119, 127, 128, 129, 136, 137, 146, 155, 157, 159, 163, 164, 166, 168, 172, 173, 175, 181, 182, 186, 190, 191, 192, 195, 199, 200, 208, 217, 218, 219, 228 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Has A050278 as subsequence. LINKS Robert Israel, Table of n, a(n) for n = 1..10000 EXAMPLE 238 shares the digit 3 with the sum of its digits (13) and shares the digit 8 with the product of its digits (48). MAPLE filter:= proc(n) local L, S, Ss, Sp; L:= convert(n, base, 10); S:= convert(L, set); Ss:= convert(convert(convert(L, `+`), base, 10), set); if S intersect Ss = {} then return false fi; Sp:= convert(convert(convert(L, `*`), base, 10), set); S intersect Sp <> {} end proc: select(filter, [\$1..500]); # Robert Israel, Mar 06 2020 MATHEMATICA Select[Range[0, 250], Length[Intersection[IntegerDigits[ # ], IntegerDigits[ Plus @@ IntegerDigits[ # ]]]] > 0 && Length[Intersection[IntegerDigits[ # ], IntegerDigits[Times @@ IntegerDigits[ # ]]]] > 0 &] CROSSREFS Cf. A050278. Sequence in context: A280657 A117241 A108191 * A089583 A264979 A319726 Adjacent sequences: A108190 A108191 A108192 * A108194 A108195 A108196 KEYWORD base,easy,nonn AUTHOR Eric Angelini, Jun 15 2005 EXTENSIONS Edited and corrected by Stefan Steinerberger, Jun 30 2007 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 May 21 02:29 EDT 2024. Contains 372720 sequences. (Running on oeis4.)