|
| |
|
|
A105428
|
|
Smallest prime dividing the composite near-repdigit number 133...33 consisting of a 1 followed by n 3's, where n=A105427.
|
|
1
| |
|
|
7, 31, 67, 151, 23, 13, 7, 157, 163, 107, 17, 13, 7, 89, 170809, 31, 13, 7, 4363363, 251, 42169, 43, 13, 7, 641, 17, 6791, 109, 13, 7, 31, 29, 373, 261382937, 13, 7, 101921, 82647847, 443, 13, 7, 43, 1042402171, 71, 31, 13, 7, 1601, 425519761
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| M. Kamada, Factorizations of 133...33
|
|
|
MATHEMATICA
| Transpose[FactorInteger[#]][[1, 1]]&/@DeleteCases[Table[ FromDigits[ PadRight[{1}, n, 3]], {n, 2, 60}], _?PrimeQ] (* From Harvey P. Dale, Dec 10 2011 *)
|
|
|
PROG
| (PARI) for(n=1, 100, m=10^n+(10^n-1)/3; if(!isprime(m), print1(factorint(m)[1, 1], " "))) (Alekseyev)
|
|
|
CROSSREFS
| Cf. A089018.
Sequence in context: A135659 A031388 A163354 * A050547 A157914 A090684
Adjacent sequences: A105425 A105426 A105427 * A105429 A105430 A105431
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Lekraj Beedassy (blekraj(AT)yahoo.com), Apr 08 2005
|
|
|
EXTENSIONS
| More terms from Max Alekseyev (maxale(AT)gmail.com), Apr 11 2005
|
| |
|
|
