|
Search: id:A100716
|
|
|
| A100716 |
|
Numbers n such that p^p divides n, where p is some prime divisor of n. |
|
+0
9
|
|
| 4, 8, 12, 16, 20, 24, 27, 28, 32, 36, 40, 44, 48, 52, 54, 56, 60, 64, 68, 72, 76, 80, 81, 84, 88, 92, 96, 100, 104, 108, 112, 116, 120, 124, 128, 132, 135, 136, 140, 144, 148, 152, 156, 160, 162, 164, 168, 172, 176, 180, 184, 188, 189, 192, 196, 200, 204, 208, 212
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Complement of A048103; A129251(a(n)) > 0; A051674 is a subsequence; A129254 = (terms a(k) such that a(k+1)=a(k)+1);. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Apr 07 2007
|
|
LINKS
|
R. Zumkeller, Table of n, a(n) for n = 1..1000
|
|
EXAMPLE
|
54 is included because 3^3 divides 54.
|
|
MATHEMATICA
|
fQ[n_] := Union[ Table[ #[[1]] <= #[[2]]] & /@ FactorInteger[n]][[ -1]] == True; Select[ Range[2, 215], fQ[ # ] &] (from Robert G. Wilson v Dec 14 2004)
|
|
CROSSREFS
|
Cf. A100717.
Cf. A129150, A129151, A129152.
Sequence in context: A068306 A113645 A086133 this_sequence A076310 A008586 A059558
Adjacent sequences: A100713 A100714 A100715 this_sequence A100717 A100718 A100719
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet (qq-quet(AT)mindspring.com), Dec 10 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 14 2004
|
|
|
Search completed in 0.004 seconds
|
