OFFSET
1,1
MAPLE
A074753 := proc(n) option remember ; local a, k ; a := 0 ; for k from 1 to n do if numtheory[sigma](k) < n then a := a+1 ; end if; end do ; a ; end proc: isA175091 := proc(n) return ( (A074753(n) mod 6 )in {2, 4}) ; end proc ; for n from 1 to 300 do if isA175091(n) then printf("%d, ", n) ; end if; end do ; # R. J. Mathar, Feb 08 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Jan 29 2010
EXTENSIONS
Corrected by R. J. Mathar, Feb 08 2010
STATUS
approved