in r as samma fmaf,