Update fcs.R