|
| |
|
|
A071394
|
|
Numbers n divisible by pi(n) [A057809] with prime pi(n); i.e. largest prime factor of n equals pi(n).
|
|
1
| |
|
|
4, 6, 33, 335, 355, 3073, 8408, 64690, 481044, 1304693, 1304719, 3524318, 3524654, 9559785, 9559905, 70115803, 189963234, 189963918, 514278263, 1394194660, 3779856591, 10246935974, 75370122456, 204475052725, 204475053325
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| pi(8408) = 1051 and 8408 = 2.2.2.'1051'.
|
|
|
MATHEMATICA
| c = 0; lpf[n_] := If[ PrimeQ[n], c++; n, Transpose[ FactorInteger[n]][[1, -1]]]; Do[ If[ lpf[n] == c, Print[n]], {n, 2, 10^7}]
|
|
|
CROSSREFS
| Cf. A000720, A006530.
Sequence in context: A087299 A164127 A180139 * A137021 A176002 A175061
Adjacent sequences: A071391 A071392 A071393 * A071395 A071396 A071397
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Jun 12 2002
|
|
|
EXTENSIONS
| Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 13 2002
More terms from Hans Havermann (gladhobo(AT)teksavvy.com), Jul 02 2002
|
| |
|
|