R Code for running the Interim PCOD Analysis