Create CreditFlows.R