ARCHIVE/renko_add_bricks.R

renko_add_bricks <- function(data, size){

  require(data.table)

  data[, step := 1:.N]

  data2 <- copy(data)
  data2[, base := size]
  data <- rbindlist(list(data, data2))

  return(data)
}
RomanAbashin/rrenko documentation built on May 28, 2019, 11:03 p.m.