|
| |
|
|
A112644
|
|
Odd and squarefree abundant numbers not divisible by 5.
|
|
2
|
|
|
|
22309287, 28129101, 30069039, 34051017, 35888853, 36399363, 38057019, 39768729, 40681641, 41708667, 43444401, 45588543, 45894849, 48141093, 48555507, 50489439, 51294243, 51408357, 53804751, 54777723, 55186131, 56429373, 57228171, 58555497, 59168109
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Donovan Johnson, Table of n, a(n) for n = 1..1000
|
|
|
EXAMPLE
|
99906807=3.7.11.13.17.19.103
|
|
|
MATHEMATICA
|
ta={{0}}; Do[g=n; s=DivisorSigma[1, n]-2*n; If[Greater[s, 0]&&Equal[Abs[MoebiusMu[n]], 1]&& !Equal[Mod[n, 2], 0]&&!Equal[Mod[n, 5], 0], Print[n, PrimeFactorList[n], s]; ta=Append[ta, n]], {n, 10000000, 100000000}]; {ta=Delete[ta, 1], g}
|
|
|
CROSSREFS
|
Cf. A087248, A046391, A112643, A112642, A112640.
Sequence in context: A183799 A205096 A183969 * A179710 A069317 A022211
Adjacent sequences: A112641 A112642 A112643 * A112645 A112646 A112647
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Sep 20 2005
|
|
|
STATUS
|
approved
|
| |
|
|
