OFFSET
0,1
EXAMPLE
5391411025=3^0 * 5^2 * 7 * 11 * 13 * 17 * 19 * 23 * 29 least odd abundant number with no factor 3.
5775 = 3^1 * 5^2 * 7 * 11.
1575 = 3^2 * 5^2 * 13.
945 = 3^3 * 5 * 7.
81081 = 3^4 * 7 * 11 * 13.
78975 = 3^5 * 5^2 * 13.
1468935 = 3^6 * 5 * 13 * 31.
6375105 = 3^7 * 5 * 11 * 53.
436444281 = 3^8 * 7 * 13 * 17 * 43.
PROG
(PARI)
isprab(v) = {my(sig = sigma(v)); if (sig < 2*v, return (0)); if (sig == 2*v, return (1)); fordiv (v, d, if ((d != v) && (sigma(d)>=2*d), return (0)); ); return (1); }
a(n) = {my(p = 3^n, k = 1); while (1, if (k % 3 != 0, v = p * k; if (isprab(v), return (v)); ); k += 2; ); }
\\ Michel Marcus, Mar 07 2013
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Pierre CAMI, Jan 04 2008
EXTENSIONS
Some terms corrected and a(9)-a(13) from Michel Marcus, Mar 07 2013
a(14)-a(17) from David A. Corneth, Oct 26 2024
STATUS
approved