|
| |
|
|
A101436
|
|
Number of exponents in prime factorization of n which are primes.
|
|
1
| |
|
|
0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 2, 0, 0, 0, 1, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,36
|
|
|
COMMENTS
| First occurrence of k: 1,4,36,900,44100 (A061742). - Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 25 2005
|
|
|
EXAMPLE
| 36 = 2^2 *3^2. Since 2 is a prime and occurs twice as an exponent in the prime factorization of 36, a(36) = 2.
|
|
|
MATHEMATICA
| f[n_] := Length[ Select[ Flatten[ Table[ #[[2]], {1}] & /@ FactorInteger[n]], PrimeQ[ # ] &]]; Table[ f[n], {n, 105}] (from Robert G. Wilson v Jan 25 2005)
|
|
|
CROSSREFS
| Sequence in context: A133698 A093956 A160383 * A056170 A059483 A067618
Adjacent sequences: A101433 A101434 A101435 * A101437 A101438 A101439
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Leroy Quet, Jan 18 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 25 2005
|
| |
|
|
