diff options
Diffstat (limited to 'R/build_portfolios.R')
| -rw-r--r-- | R/build_portfolios.R | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/R/build_portfolios.R b/R/build_portfolios.R index 69c1e20b..b08c0aee 100644 --- a/R/build_portfolios.R +++ b/R/build_portfolios.R @@ -16,6 +16,7 @@ if(length(args) >=2){ data <- read.table(file.path(root.dir, "scripts", "cusips_to_price.txt"))
dealnames <- dealnamefromcusip(data$V1)
uniqdealnames <- unique(dealnames)
+ uniqdealnames <- uniqdealnames[!is.na(uniqdealnames)]
reinvflags <- data$V2[match(uniqdealnames, dealnames)]
dealnames <- uniqdealnames
unlink(file.path(root.dir, "scripts", "cusips_to_price.txt"))
|