Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
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!)

Revision History for A241141

(Underlined text is an addition; strikethrough text is a deletion.)

Showing all changes.
A241141 Numbers n such that n and 5n share at least one digit.
(history; published version)
#10 by N. J. A. Sloane at Fri Apr 25 11:21:07 EDT 2014
STATUS

proposed

approved

#9 by Michel Marcus at Thu Apr 17 01:44:56 EDT 2014
STATUS

editing

proposed

Discussion
Thu Apr 17 18:05 
Robert G. Wilson v: I started to submit that sequence but decided not to.
#8 by Michel Marcus at Thu Apr 17 01:41:34 EDT 2014
PROG

(PARI) isok(n) = #setintersect(Set(digits(n)), Set(digits(5*n))); \\ Michel Marcus, Apr 17 2014

STATUS

proposed

editing

Discussion
Thu Apr 17 01:44 
Michel Marcus: Your comment made me look at those that are not == 0 mod5: : 19, 21, 24, 31, 39, 42, 48, 49,, ...
#7 by Robert G. Wilson v at Wed Apr 16 12:25:35 EDT 2014
STATUS

editing

proposed

#6 by Robert G. Wilson v at Wed Apr 16 12:22:59 EDT 2014
KEYWORD

nonnbase,easy,nonn,changed

STATUS

proposed

editing

#5 by Robert G. Wilson v at Wed Apr 16 11:52:48 EDT 2014
STATUS

editing

proposed

Discussion
Wed Apr 16 11:55 
Michel Marcus: kwd base, no ?
#4 by Robert G. Wilson v at Wed Apr 16 11:45:57 EDT 2014
NAME

Numbers n such that n and 5n share at least one digit.

COMMENTS

All numbers n which are congruent to 0 (mod 5) have this characteristic.

EXAMPLE

19 is in the sequence since 19 and 5*19 = 95 and together they share the digit 9.

MATHEMATICA

fQ[n_] := Intersection[ IntegerDigits[ n], IntegerDigits[5 n]] != {} && Mod[n, 5] != 0; Select[ Range[ 100], fQ]

CROSSREFS

Cf. A129845, A129846, A129848, A241141, A241142, A241143, A241144, A241145, A241146.

#3 by Robert G. Wilson v at Wed Apr 16 11:42:28 EDT 2014
NAME

allocated Numbers n such that n and 5n share forat Robertleast G. Wilsonone vdigit.

DATA

5, 10, 15, 19, 20, 21, 24, 25, 30, 31, 35, 39, 40, 42, 45, 48, 49, 50, 51, 52, 53, 55, 57, 59, 60, 63, 65, 70, 73, 74, 75, 79, 80, 84, 85, 90, 94, 95, 98, 99, 100, 101, 102, 103, 104, 105, 106, 108, 110, 115, 119, 120, 122, 123, 124, 125, 126, 130, 135, 136, 139, 140, 142, 143, 145, 147, 148, 149, 150, 151, 153

OFFSET

1,1

COMMENTS

All numbers n which are congruent to 0 (mod 5) have this characteristic.

EXAMPLE

19 is in the sequence since 19 and 5*19 = 95 and together they share the digit 9.

MATHEMATICA

fQ[n_] := Intersection[ IntegerDigits[ n], IntegerDigits[5 n]] != {} && Mod[n, 5] != 0; Select[ Range[ 100], fQ]

CROSSREFS

Cf. A129845, A129846, A129848, A241141, A241142, A241143, A241144, A241145, A241146.

KEYWORD

allocated

nonn,easy

AUTHOR

Robert G. Wilson v, Apr 16 2014

STATUS

approved

editing

#2 by Robert G. Wilson v at Wed Apr 16 11:38:44 EDT 2014
KEYWORD

allocating

allocated

#1 by Robert G. Wilson v at Wed Apr 16 11:38:44 EDT 2014
NAME

allocated for Robert G. Wilson v

KEYWORD

allocating

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 August 18 20:50 EDT 2024. Contains 375284 sequences. (Running on oeis4.)