|
| |
|
|
A062238
|
|
Composite numbers which contain their largest proper factor as a substring.
|
|
13
| |
|
|
15, 25, 125, 1537, 3977, 11371, 38117, 110317, 117197, 123679, 143323, 146137, 179297, 197513, 316619, 390913, 397139, 399797, 485357, 779917, 797191, 990919, 1110691, 1178951, 1483117, 1723717, 1813733, 2165299, 2273099, 2369777
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 3{97}7 = 97*41
|
|
|
MATHEMATICA
| Do[ If[ !PrimeQ[ n ] && StringPosition[ ToString[ n ], ToString[ Divisors[ n ] [ [ -2 ] ] ] ] != {}, Print[ n ] ], {n, 2, 10^7} ]
|
|
|
CROSSREFS
| Sequence in context: A020202 A020300 A032587 * A146249 A074974 A191913
Adjacent sequences: A062235 A062236 A062237 * A062239 A062240 A062241
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Erich Friedman (efriedma(AT)stetson.edu), Jun 30 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 08 2001
|
| |
|
|
