updated NUFORC R file added pivot csv file