as.acomp function

create an acomp object