September 1, 2017
A package with miscellaneous functions relating to computation of various financial measures. Currently, it has three modules:
Year | Number of orders | Time (core) | Time (overall) |
---|---|---|---|
2009 | 65,083 | 18.74 | 74 |
2010 | 1,271,870 | 48.96 | 140 |
2011 | 3,013,716 | 105 | 276 |
2012 | 3,248,293 | 129.45 | 301 |
2013 | 5,188,148 | 178.40 | 424 |
2014 | 4,113,407 | 142.75 | 386 |
Year | Number of orders | Time (core) | Time (overall) |
---|---|---|---|
2009 | 722,517 | 70.29 | 124 |
2010 | 2,506,027 | 122.29 | 426 |
2011 | 4,945,747 | 311.29 | 519 |
2012 | 10,401,516 | 517.26 | 780 |
2013 | 14,288,199 | 716.56 | 1020 |
2014 | 16,591,150 | 1115.02 | 1620 |
d <- as.Date("2014-05-23") system.time( atintensity <- iddb(dates = d, symbol = "INFY", segment = "CASH", measures = "atintensity", type = "value", jiffylevel = FALSE) )
system.time( mbp <- iddb(dates = d, symbol = "INFY", segment = "CASH", measures = "mbp", fields = "ltp") ) vol <-function(x) { x <-xts::to.minutes(x, OHLC = FALSE) vol <- sd(x/100) return(vol) }
system.time( comm <- iddb(dates = d, symbol = "CASTORSEED", segment = "FAO", measures = "mbp", exchange = "NCDEX", fields = "ltp") ) vol(comm[[1]])
d <- as.Date("2014-05-27") mbp <- iddb(dates = d, symbol = "3IINFOTECH", segment = "CASH", measures = "mbp", fields = c("bbp", "bsp"), depth = 5, generate = TRUE, wait = TRUE, showConsole = TRUE)
from <- as.Date("2014-05-22") to <- as.Date("2014-05-28") mbp <- iddb(from = from, to = to, symbol = "3IINFOTECH", segment = "CASH", measures = "mbp", exchange = "NSE", fields = c("bbp", "bsp", "ltp"), depth = 5, generate = TRUE, yield = FALSE, ncpu = 3)