[go: up one dir, main page]

login
Revision History for A062672 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Composite and every divisor (except 1) contains the digit 5.
(history; published version)
#15 by Harvey P. Dale at Sun Jan 22 15:45:29 EST 2023
STATUS

editing

approved

#14 by Harvey P. Dale at Sun Jan 22 15:45:26 EST 2023
MATHEMATICA

Select[Range[6300], CompositeQ[#]&&AllTrue[Rest[Divisors[#]], DigitCount[ #, 10, 5]> 0&]&] (* Harvey P. Dale, Jan 22 2023 *)

STATUS

approved

editing

#13 by Bruno Berselli at Thu Nov 07 05:17:58 EST 2019
STATUS

reviewed

approved

#12 by Joerg Arndt at Thu Nov 07 04:42:11 EST 2019
STATUS

proposed

reviewed

#11 by Michel Marcus at Thu Nov 07 04:16:43 EST 2019
STATUS

editing

proposed

#10 by Michel Marcus at Thu Nov 07 04:16:40 EST 2019
EXAMPLE

25 has divisors 1, 5 and 25, all of which contain the digit 5.

STATUS

proposed

editing

#9 by Amiram Eldar at Thu Nov 07 03:30:49 EST 2019
STATUS

editing

proposed

#8 by Amiram Eldar at Thu Nov 07 03:27:29 EST 2019
#7 by Amiram Eldar at Thu Nov 07 03:12:40 EST 2019
OFFSET

0,1,1

LINKS

Amiram Eldar, <a href="/A062672/b062672.txt">Table of n, a(n) for n = 1..10000</a>

EXTENSIONS

Offset corrected by Amiram Eldar, Nov 07 2019

STATUS

approved

editing

#6 by N. J. A. Sloane at Wed Jun 11 21:23:08 EDT 2014
STATUS

proposed

approved