OFFSET
1,1
COMMENTS
The largest powers dividing 44 of each prime dividing 44 are 2^2 and 11^1. The least of these is 2^2 =4. The largest powers dividing 45 of each prime dividing 45 are 3^2 and 5^1. The least of these is 5^1 = 5. So a(44) = 4 * 5 = 20.
FORMULA
PROG
Contribution from Franklin T. Adams-Watters, Apr 09 2009: (Start)
(PARI) minpp(n)=local(m, r, pp); if(n==1, 1, m=factor(n); r=m[1, 1]^m[1, 2]; for(i=2, matsize(m)[1], pp=m[i, 1]^m[i, 2]; if(pp<r, r=pp)); r)
vector(80, i, minpp(i)*minpp(i+1)) (End)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 07 2008
EXTENSIONS
More terms from Franklin T. Adams-Watters, Apr 09 2009
STATUS
approved