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.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
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
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
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 21 02:29 EDT 2024. Contains 372720 sequences. (Running on oeis4.)