OFFSET
0,2
LINKS
Index entries for linear recurrences with constant coefficients, signature (3, -3, 1).
FORMULA
Conjecture: a(n) = A028566(n), n > 12. [R. J. Mathar, Jul 31 2010]
MAPLE
A033676 := proc(n) local dvs; dvs := sort(convert(numtheory[divisors](n), list)) ; op(floor((nops(dvs)+1)/2) , dvs) ; end proc:
A163280 := proc(n, k) local r, T ; r := 0 ; for T from k^2 by k do if A033676(T) = k then r := r+1 ; if r = n then return T ; end if; end if; end do: end proc:
printf("0, ") ; for n from 1 to 90 do printf("%d, ", A163280(9, n)) ; end do ; # R. J. Mathar, Jul 31 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Aug 08 2009
EXTENSIONS
Terms beyond a(12) from R. J. Mathar, Jul 31 2010
STATUS
approved