Update complete.R

initialize vectors to numbers