[tests/testthat/test-bg-cnbd-k.R:31:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L31) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.ConditionalExpectedTransactions(params[-1], 32, 1, 16, 32),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:36:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L36) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotFrequencyInCalibration(params, cbs, 7), tolerance = 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotFreqVsConditionalExpectedFrequency(params[-1], T.star = 39, cbs, cbs$x.star, 7),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L38) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotFreqVsConditionalExpectedFrequency(params, T.star = 39, cbs, cbs$x.star, 7), tolerance = 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:39:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L39) *style:* **lines should not be more than 80 characters.**
```r
  # Note: BTYD::bgnbd.PlotRecVsConditionalExpectedFrequency can't handle missing bins, so we can't compare
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:40:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L40) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(bgcnbd.PlotRecVsConditionalExpectedFrequency(params, cbs, T.star = 39, cbs$x.star))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotTrackingInc(params[-1], cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:43:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L43) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:45:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L45) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(bgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.ExpectedCumulativeTransactions(params[-1], 11, 39, 12),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotTrackingCum(params[-1], cbs$T.cal, 32 + 32, cu_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:69:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L69) *style:* **lines should not be more than 80 characters.**
```r
  est_fixed_k <- bgcnbd.EstimateParameters(cbs[, c("x", "t.x", "T.cal", "litt")], k = params[1])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:76:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L76) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est32 <- bgcnbd.ConditionalExpectedTransactions(params, 32, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:77:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-bg-cnbd-k.R#L77) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est64 <- bgcnbd.ConditionalExpectedTransactions(params, 64, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:5:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L5) *style:* **lines should not be more than 80 characters.**
```r
  elog <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.Date() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:6:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L6) *style:* **lines should not be more than 80 characters.**
```r
  elog_time <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.time() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:7:14:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L7) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  elog_dt <- as.data.table(elog)
             ^~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:19:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L19) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog_time, units = "secs", T.cal = as.character(min(elog_time$date) + 21))[, 1:4],
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L20) *style:* **lines should not be more than 80 characters.**
```r
               elog2cbs(elog, units = "days", T.cal = as.character(Sys.Date() + 21))[, 1:4])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L30) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "sales", "first", "T.cal", "T.star", "x.star", "sales.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:32:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L32) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "first", "T.cal", "T.star", "x.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:34:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L34) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "first", "T.cal", "T.star", "x.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:37:16:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L37) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog$cust), nrow(elog2cbs(elog)))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog[elog$date <= T.cal, "cust"]), nrow(elog2cbs(elog, T.cal = T.cal)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:38:16:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L38) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog[elog$date <= T.cal, "cust"]), nrow(elog2cbs(elog, T.cal = T.cal)))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog_dt[, .(cust, date)]), sum(cbs$x) + sum(cbs$x.star) + nrow(cbs))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:42:16:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L42) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog_dt[, .(cust, date)]), sum(cbs$x) + sum(cbs$x.star) + nrow(cbs))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog_dt[elog_dt$first <= T.cal & date <= T.tot, .(cust, date)]),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:47:16:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L47) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog_dt[elog_dt$first <= T.cal & date <= T.tot, .(cust, date)]),
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:52:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L52) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog_s[first <= T.cal & date <= T.cal, sum(sales)], sum(cbs$sales))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:53:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L53) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog_s[first <= T.cal & date <= T.tot, sum(sales)], sum(cbs$sales) + sum(cbs$sales.star))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:56:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L56) *style:* **lines should not be more than 80 characters.**
```r
  cbs <- elog2cbs(elog_s, T.cal = as.character(T.cal), T.tot = as.character(T.tot))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:64:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L64) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog, units = "hours")$t.x / (7 * 24), elog2cbs(elog)$t.x)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:65:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L65) *style:* **lines should not be more than 80 characters.**
```r
  elog_time <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.time() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:66:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-elog2cbs.R#L66) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog, units = "days")[, c(1:4, 6)], elog2cbs(elog_time, units = "secs")[, c(1:4, 6)])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:8:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L8) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(BTYDplus:::dc.check.model.params.safe(printnames, params, "foo"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:12:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L12) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(BTYDplus:::dc.check.model.params.safe(printnames, params, "foo"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L25) *style:* **lines should not be more than 80 characters.**
```r
                         col.names = c("cust", "sampleid", "date", "cds", "sales"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:28:15:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L28) *style:* **Variable and function names should be all lowercase.**
```r
  utils::data(cdnowSummary, package = "BTYD", envir = environment())
              ^~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:29:21:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(cum, cdnowSummary$cu.tracking)
                    ^~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(diff(elog2cum(elog, by = 7, first = TRUE)), elog2inc(elog, by = 7, first = TRUE))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:39:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L39) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(tail(elog2cum(elog, by = 1, first = FALSE), 1), nrow(elog) - uniqueN(elog$cust))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:39:77:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L39) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(tail(elog2cum(elog, by = 1, first = FALSE), 1), nrow(elog) - uniqueN(elog$cust))
                                                                            ^~~~~~~
```
[tests/testthat/test-helpers.R:41:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L41) *style:* **lines should not be more than 80 characters.**
```r
  elog <- data.table(cust = c(1, 1, 1, 1, 1, 3, 3), t = c(0, 9, 9, 20, 22, 4, 6))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, headers = c("X", "Y"), title = ""))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:52:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L52) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, T.cal = "2006-12-31", title = NULL))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:53:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L53) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, T.cal = "2006-12-31", T.tot = "2007-06-30",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:57:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-helpers.R#L57) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(head(groceryElog, 10), T.cal = "2006-12-31", T.tot = "2007-12-30"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L20) *style:* **lines should not be more than 80 characters.**
```r
  est2 <- mbgcnbd.EstimateParameters(cbs[, c("x", "t.x", "T.cal", "litt")], k = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:28:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L28) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est <- mbgcnbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(mbgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal + cbs$T.star), elog2inc(elog, by = 14)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:48:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L48) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(mbgcnbd.PlotTrackingCum(params, cbs$T.cal, max(cbs$T.cal + cbs$T.star), elog2cum(elog, by = 14)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  mat <- mbgcnbd.PlotFreqVsConditionalExpectedFrequency(params, cbs$T.star, cbs, cbs$x.star, 7)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:55:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L55) *style:* **lines should not be more than 80 characters.**
```r
  expect_lt(mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = c(0, 1), t.x = c(0, 12), T.cal = 32)[2], 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:56:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L56) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = 3, t.x = 12, T.cal = 32) !=
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:57:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L57) *style:* **lines should not be more than 80 characters.**
```r
                mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = 2, t.x = 12, T.cal = 32))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:67:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mbg-cnbd-k.R#L67) *style:* **lines should not be more than 80 characters.**
```r
    cbs$x.est <- mbgcnbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:17:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L17) *style:* **lines should not be more than 80 characters.**
```r
  abe_params$beta <- matrix(c(0.18, -2.5, 0.5, -0.3, -0.2, 0.8), byrow = TRUE, ncol = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L20) *style:* **lines should not be more than 80 characters.**
```r
  abe_draws <- abe.mcmc.DrawParameters(abe_cbs, c("covariate_1", "covariate_2"), mcmc, burnin, thin, chains)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L25) *style:* **lines should not be more than 80 characters.**
```r
  pggg_draws <- pggg.mcmc.DrawParameters(pggg_cbs, mcmc / 10, burnin / 10, thin / 10, chains)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:32:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L32) *style:* **lines should not be more than 80 characters.**
```r
  pnbd_xstar_draws1 <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, sample_size = size)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:35:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L35) *style:* **lines should not be more than 80 characters.**
```r
  pnbd_xstar_draws2 <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, sample_size = size)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_gt(cor(apply(pnbd_xstar_draws2, 2, mean), apply(pnbd_xstar_draws, 2, mean)), 0.95)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(pnbd_xstar_draws <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, T.star = 10))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:46:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L46) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(dim(pnbd_xstar_draws3), c((mcmc + burnin - burnin2) * chains / thin, nrow(pnbd_cbs)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:46:42:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L46) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  expect_equal(dim(pnbd_xstar_draws3), c((mcmc + burnin - burnin2) * chains / thin, nrow(pnbd_cbs)))
                                         ^
```
[tests/testthat/test-mcmc.R:85:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L85) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(mcmc.Expectation(pnbd_draws, 28), mean(pnbd_cbs$x), tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:86:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L86) *style:* **lines should not be more than 80 characters.**
```r
  x <- mcmc.ExpectedCumulativeTransactions(pnbd_draws, T.cal = pnbd_cbs$T.cal, T.tot = 56, n.periods.final = 56)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:99:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-mcmc.R#L99) *style:* **lines should not be more than 80 characters.**
```r
               BTYD::pnbd.PlotFrequencyInCalibration(unlist(pnbd_params), pnbd_cbs, censor = 7),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-nbd.R:18:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-nbd.R#L18) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est <- nbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:12:37:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-ggg-mcmc.R#L12) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- pggg.mcmc.DrawParameters(as.data.table(cbs),
                                    ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:13:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-ggg-mcmc.R#L13) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 10, burnin = 0, thin = 1, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:14:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-ggg-mcmc.R#L14) *style:* **lines should not be more than 80 characters.**
```r
                                    param_init = list(r = 1, alpha = 1, s = 1, beta = 1, t = 1, gamma = 1))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:16:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-ggg-mcmc.R#L16) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 100, burnin = 20, thin = 10, chains = 2, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:9:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L9) *style:* **lines should not be more than 80 characters.**
```r
  params$beta <- matrix(c(0.18, -2.5, 0.5, -0.3, -0.2, 0.8), byrow = TRUE, ncol = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:11:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L11) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(abe.GenerateData(n = 100, T.cal = 32, T.star = c(16, 32), params))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:21:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L21) *style:* **lines should not be more than 80 characters.**
```r
  draws <- abe.mcmc.DrawParameters(as.data.table(cbs), covariates = c("covariate_1"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:21:36:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L21) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- abe.mcmc.DrawParameters(as.data.table(cbs), covariates = c("covariate_1"),
                                   ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:22:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L22) *style:* **lines should not be more than 80 characters.**
```r
                                   mcmc = 10, burnin = 0, thin = 1, mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L25) *style:* **lines should not be more than 80 characters.**
```r
  draws <- abe.mcmc.DrawParameters(cbs, covariates = c("covariate_1", "covariate_2"), mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:28:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L28) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(all(c("lambda", "mu", "z", "tau") %in% colnames(as.matrix(draws$level_1[[1]]))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:29:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L29) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(all(c("log_lambda_intercept", "log_mu_intercept", "log_lambda_covariate_1", "log_mu_covariate_1",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L30) *style:* **lines should not be more than 80 characters.**
```r
    "log_lambda_covariate_2", "log_mu_covariate_2", "var_log_lambda", "cov_log_lambda_log_mu", "var_log_mu") %in%
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(matrix(est[1:6], ncol = 2, byrow = T), params$beta, tolerance = 0.05)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:41:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L41) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(unname(est["var_log_lambda"]), params$gamma[1, 1], tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-abe.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(unname(est["cov_log_lambda_log_mu"]), params$gamma[1, 2], tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:17:16:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L17) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(sim$elog$cust), n)
               ^~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L30) *style:* **lines should not be more than 80 characters.**
```r
  sim <- pggg.GenerateData(100, 52, c(26, 104), params, date.zero = as.Date("2010-01-01"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:61:37:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L61) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- pnbd.mcmc.DrawParameters(as.data.table(cbs),
                                    ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:62:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L62) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 10, burnin = 0, thin = 1, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:63:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L63) *style:* **lines should not be more than 80 characters.**
```r
                                    param_init = list(r = 1, alpha = 1, s = 1, beta = 1))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:95:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L95) *style:* **lines should not be more than 80 characters.**
```r
                                          mcmc = 10, burnin = 0, thin = 2, chains = 2,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:96:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-pareto-nbd-mcmc.R#L96) *style:* **lines should not be more than 80 characters.**
```r
                                          use_data_augmentation = FALSE, mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:17:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-timing.R#L17) *style:* **lines should not be more than 80 characters.**
```r
  expect_error(k_est_1 <- estimateRegularity(elog, plot = TRUE, min = 60), "sufficient")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:21:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-timing.R#L21) *style:* **lines should not be more than 80 characters.**
```r
  k_est_3 <- estimateRegularity(elog, method = "mle-minka", plot = TRUE, title = "Plot Title")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:22:1:](https://github.com/mplatzer/BTYDplus/blob/6b4a175eba07014782a8883a6e4e5b6375ec9cc9/tests/testthat/test-timing.R#L22) *style:* **lines should not be more than 80 characters.**
```r
  k_est_4 <- estimateRegularity(elog, method = "mle-thom", plot = TRUE, title = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


TeamCity OTA+ :: rvi_sota_server :: ci [Build 2096](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=23767&buildTypeId=ota_plus_RviSotaServer_Ci) outcome was **SUCCESS**
Summary: Tests passed: 312, ignored: 4 Build time: 00:13:25


boring


The following doc(s) have been deployed to the [ilovelampd](https://ilovelampd-static-docs.pantheonsite.io/docs) Multidev environment:
- [docs/unsupported-modules-plugins](https://ilovelampd-static-docs.pantheonsite.io/docs/unsupported-modules-plugins)


is this the measure? if so, consider renaming to measure.


The bin directory is here: https://github.com/abw333/dominoes/tree/master/bin


@anthoneykulis


aaa


upps, sorry :)


Yes! :)


@anthonykulis


@jbucaran @dodekeract it is just enough to navigate them to unpkg's site, it would be best source of truth. Almost everyone know that it can add specific version.


| aaa


Oh well ...


This runs against the no-vertical alignment guideline.


does this do two loads then? one from the hqmf and one again with additional information? Is this similar to how qdm does it? if not, is there a way this can just do a single load? maybe put this additional logic into the measure loader?


@jbucaran site for HyperApp using HyperApp would be great too :) I'm considering to do the same for https://github.com/tunnckoCore/gibon which got place on Trending today ;p :tada:


good


TeamCity OTA+ :: rvi_sota_server :: ci [Build 2097](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=23771&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


Thanks!


kind of weird to open and read one file and return the path for the other. thoughts on making this more symmetric? either return the path for both or return the file contents for both?


@tunnckoCore You posted the trending screenshot in the README. That's hillarious! Nice.


[tests/testthat/test-bg-cnbd-k.R:31:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L31) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.ConditionalExpectedTransactions(params[-1], 32, 1, 16, 32),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:36:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L36) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotFrequencyInCalibration(params, cbs, 7), tolerance = 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotFreqVsConditionalExpectedFrequency(params[-1], T.star = 39, cbs, cbs$x.star, 7),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L38) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotFreqVsConditionalExpectedFrequency(params, T.star = 39, cbs, cbs$x.star, 7), tolerance = 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:39:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L39) *style:* **lines should not be more than 80 characters.**
```r
  # Note: BTYD::bgnbd.PlotRecVsConditionalExpectedFrequency can't handle missing bins, so we can't compare
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:40:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L40) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(bgcnbd.PlotRecVsConditionalExpectedFrequency(params, cbs, T.star = 39, cbs$x.star))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotTrackingInc(params[-1], cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:43:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L43) *style:* **lines should not be more than 80 characters.**
```r
               bgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:45:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L45) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(bgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal) + 32, inc_tracking,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.ExpectedCumulativeTransactions(params[-1], 11, 39, 12),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(BTYD::bgnbd.PlotTrackingCum(params[-1], cbs$T.cal, 32 + 32, cu_tracking),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:69:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L69) *style:* **lines should not be more than 80 characters.**
```r
  est_fixed_k <- bgcnbd.EstimateParameters(cbs[, c("x", "t.x", "T.cal", "litt")], k = params[1])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:76:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L76) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est32 <- bgcnbd.ConditionalExpectedTransactions(params, 32, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-bg-cnbd-k.R:77:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-bg-cnbd-k.R#L77) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est64 <- bgcnbd.ConditionalExpectedTransactions(params, 64, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:5:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L5) *style:* **lines should not be more than 80 characters.**
```r
  elog <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.Date() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:6:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L6) *style:* **lines should not be more than 80 characters.**
```r
  elog_time <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.time() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:7:14:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L7) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  elog_dt <- as.data.table(elog)
             ^~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:19:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L19) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog_time, units = "secs", T.cal = as.character(min(elog_time$date) + 21))[, 1:4],
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L20) *style:* **lines should not be more than 80 characters.**
```r
               elog2cbs(elog, units = "days", T.cal = as.character(Sys.Date() + 21))[, 1:4])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L30) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "sales", "first", "T.cal", "T.star", "x.star", "sales.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:32:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L32) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "first", "T.cal", "T.star", "x.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:34:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L34) *style:* **lines should not be more than 80 characters.**
```r
               c("cust", "x", "t.x", "litt", "first", "T.cal", "T.star", "x.star"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:37:16:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L37) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog$cust), nrow(elog2cbs(elog)))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog[elog$date <= T.cal, "cust"]), nrow(elog2cbs(elog, T.cal = T.cal)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:38:16:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L38) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog[elog$date <= T.cal, "cust"]), nrow(elog2cbs(elog, T.cal = T.cal)))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog_dt[, .(cust, date)]), sum(cbs$x) + sum(cbs$x.star) + nrow(cbs))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:42:16:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L42) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog_dt[, .(cust, date)]), sum(cbs$x) + sum(cbs$x.star) + nrow(cbs))
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(uniqueN(elog_dt[elog_dt$first <= T.cal & date <= T.tot, .(cust, date)]),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:47:16:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L47) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(elog_dt[elog_dt$first <= T.cal & date <= T.tot, .(cust, date)]),
               ^~~~~~~
```
[tests/testthat/test-elog2cbs.R:52:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L52) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog_s[first <= T.cal & date <= T.cal, sum(sales)], sum(cbs$sales))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:53:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L53) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog_s[first <= T.cal & date <= T.tot, sum(sales)], sum(cbs$sales) + sum(cbs$sales.star))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:56:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L56) *style:* **lines should not be more than 80 characters.**
```r
  cbs <- elog2cbs(elog_s, T.cal = as.character(T.cal), T.tot = as.character(T.tot))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:64:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L64) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog, units = "hours")$t.x / (7 * 24), elog2cbs(elog)$t.x)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:65:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L65) *style:* **lines should not be more than 80 characters.**
```r
  elog_time <- data.frame(cust = c(1, 1, 1, 1, 1, 2, 3), date = Sys.time() + c(0, 14, 14, 28, 35, 7, 24))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-elog2cbs.R:66:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-elog2cbs.R#L66) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(elog2cbs(elog, units = "days")[, c(1:4, 6)], elog2cbs(elog_time, units = "secs")[, c(1:4, 6)])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:8:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L8) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(BTYDplus:::dc.check.model.params.safe(printnames, params, "foo"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:12:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L12) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(BTYDplus:::dc.check.model.params.safe(printnames, params, "foo"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L25) *style:* **lines should not be more than 80 characters.**
```r
                         col.names = c("cust", "sampleid", "date", "cds", "sales"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:28:15:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L28) *style:* **Variable and function names should be all lowercase.**
```r
  utils::data(cdnowSummary, package = "BTYD", envir = environment())
              ^~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:29:21:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(cum, cdnowSummary$cu.tracking)
                    ^~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(diff(elog2cum(elog, by = 7, first = TRUE)), elog2inc(elog, by = 7, first = TRUE))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:39:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L39) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(tail(elog2cum(elog, by = 1, first = FALSE), 1), nrow(elog) - uniqueN(elog$cust))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:39:77:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L39) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(tail(elog2cum(elog, by = 1, first = FALSE), 1), nrow(elog) - uniqueN(elog$cust))
                                                                            ^~~~~~~
```
[tests/testthat/test-helpers.R:41:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L41) *style:* **lines should not be more than 80 characters.**
```r
  elog <- data.table(cust = c(1, 1, 1, 1, 1, 3, 3), t = c(0, 9, 9, 20, 22, 4, 6))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, headers = c("X", "Y"), title = ""))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:52:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L52) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, T.cal = "2006-12-31", title = NULL))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:53:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L53) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(groceryElog, T.cal = "2006-12-31", T.tot = "2007-06-30",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-helpers.R:57:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-helpers.R#L57) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(plotTimingPatterns(head(groceryElog, 10), T.cal = "2006-12-31", T.tot = "2007-12-30"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L20) *style:* **lines should not be more than 80 characters.**
```r
  est2 <- mbgcnbd.EstimateParameters(cbs[, c("x", "t.x", "T.cal", "litt")], k = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:28:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L28) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est <- mbgcnbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:47:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L47) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(mbgcnbd.PlotTrackingInc(params, cbs$T.cal, max(cbs$T.cal + cbs$T.star), elog2inc(elog, by = 14)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:48:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L48) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(mbgcnbd.PlotTrackingCum(params, cbs$T.cal, max(cbs$T.cal + cbs$T.star), elog2cum(elog, by = 14)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:51:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L51) *style:* **lines should not be more than 80 characters.**
```r
  mat <- mbgcnbd.PlotFreqVsConditionalExpectedFrequency(params, cbs$T.star, cbs, cbs$x.star, 7)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:55:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L55) *style:* **lines should not be more than 80 characters.**
```r
  expect_lt(mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = c(0, 1), t.x = c(0, 12), T.cal = 32)[2], 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:56:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L56) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = 3, t.x = 12, T.cal = 32) !=
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:57:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L57) *style:* **lines should not be more than 80 characters.**
```r
                mbgcnbd.ConditionalExpectedTransactions(params, T.star = 32, x = 2, t.x = 12, T.cal = 32))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mbg-cnbd-k.R:67:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mbg-cnbd-k.R#L67) *style:* **lines should not be more than 80 characters.**
```r
    cbs$x.est <- mbgcnbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$t.x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:17:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L17) *style:* **lines should not be more than 80 characters.**
```r
  abe_params$beta <- matrix(c(0.18, -2.5, 0.5, -0.3, -0.2, 0.8), byrow = TRUE, ncol = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:20:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L20) *style:* **lines should not be more than 80 characters.**
```r
  abe_draws <- abe.mcmc.DrawParameters(abe_cbs, c("covariate_1", "covariate_2"), mcmc, burnin, thin, chains)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L25) *style:* **lines should not be more than 80 characters.**
```r
  pggg_draws <- pggg.mcmc.DrawParameters(pggg_cbs, mcmc / 10, burnin / 10, thin / 10, chains)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:32:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L32) *style:* **lines should not be more than 80 characters.**
```r
  pnbd_xstar_draws1 <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, sample_size = size)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:35:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L35) *style:* **lines should not be more than 80 characters.**
```r
  pnbd_xstar_draws2 <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, sample_size = size)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:37:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L37) *style:* **lines should not be more than 80 characters.**
```r
  expect_gt(cor(apply(pnbd_xstar_draws2, 2, mean), apply(pnbd_xstar_draws, 2, mean)), 0.95)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(pnbd_xstar_draws <- mcmc.DrawFutureTransactions(pnbd_cbs, pnbd_draws, T.star = 10))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:46:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L46) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(dim(pnbd_xstar_draws3), c((mcmc + burnin - burnin2) * chains / thin, nrow(pnbd_cbs)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:46:42:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L46) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  expect_equal(dim(pnbd_xstar_draws3), c((mcmc + burnin - burnin2) * chains / thin, nrow(pnbd_cbs)))
                                         ^
```
[tests/testthat/test-mcmc.R:85:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L85) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(mcmc.Expectation(pnbd_draws, 28), mean(pnbd_cbs$x), tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:86:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L86) *style:* **lines should not be more than 80 characters.**
```r
  x <- mcmc.ExpectedCumulativeTransactions(pnbd_draws, T.cal = pnbd_cbs$T.cal, T.tot = 56, n.periods.final = 56)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mcmc.R:99:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-mcmc.R#L99) *style:* **lines should not be more than 80 characters.**
```r
               BTYD::pnbd.PlotFrequencyInCalibration(unlist(pnbd_params), pnbd_cbs, censor = 7),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-nbd.R:18:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-nbd.R#L18) *style:* **lines should not be more than 80 characters.**
```r
  cbs$x.est <- nbd.ConditionalExpectedTransactions(params, cbs$T.star, cbs$x, cbs$T.cal)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:12:37:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-ggg-mcmc.R#L12) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- pggg.mcmc.DrawParameters(as.data.table(cbs),
                                    ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:13:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-ggg-mcmc.R#L13) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 10, burnin = 0, thin = 1, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:14:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-ggg-mcmc.R#L14) *style:* **lines should not be more than 80 characters.**
```r
                                    param_init = list(r = 1, alpha = 1, s = 1, beta = 1, t = 1, gamma = 1))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-ggg-mcmc.R:16:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-ggg-mcmc.R#L16) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 100, burnin = 20, thin = 10, chains = 2, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:9:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L9) *style:* **lines should not be more than 80 characters.**
```r
  params$beta <- matrix(c(0.18, -2.5, 0.5, -0.3, -0.2, 0.8), byrow = TRUE, ncol = 2)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:11:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L11) *style:* **lines should not be more than 80 characters.**
```r
  expect_silent(abe.GenerateData(n = 100, T.cal = 32, T.star = c(16, 32), params))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:21:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L21) *style:* **lines should not be more than 80 characters.**
```r
  draws <- abe.mcmc.DrawParameters(as.data.table(cbs), covariates = c("covariate_1"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:21:36:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L21) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- abe.mcmc.DrawParameters(as.data.table(cbs), covariates = c("covariate_1"),
                                   ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:22:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L22) *style:* **lines should not be more than 80 characters.**
```r
                                   mcmc = 10, burnin = 0, thin = 1, mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:25:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L25) *style:* **lines should not be more than 80 characters.**
```r
  draws <- abe.mcmc.DrawParameters(cbs, covariates = c("covariate_1", "covariate_2"), mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:28:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L28) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(all(c("lambda", "mu", "z", "tau") %in% colnames(as.matrix(draws$level_1[[1]]))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:29:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L29) *style:* **lines should not be more than 80 characters.**
```r
  expect_true(all(c("log_lambda_intercept", "log_mu_intercept", "log_lambda_covariate_1", "log_mu_covariate_1",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L30) *style:* **lines should not be more than 80 characters.**
```r
    "log_lambda_covariate_2", "log_mu_covariate_2", "var_log_lambda", "cov_log_lambda_log_mu", "var_log_mu") %in%
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:38:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L38) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(matrix(est[1:6], ncol = 2, byrow = T), params$beta, tolerance = 0.05)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:41:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L41) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(unname(est["var_log_lambda"]), params$gamma[1, 1], tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-abe.R:42:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-abe.R#L42) *style:* **lines should not be more than 80 characters.**
```r
  expect_equal(unname(est["cov_log_lambda_log_mu"]), params$gamma[1, 2], tolerance = 0.1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:17:16:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L17) *style:* **Variable and function names should be all lowercase.**
```r
  expect_equal(uniqueN(sim$elog$cust), n)
               ^~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:30:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L30) *style:* **lines should not be more than 80 characters.**
```r
  sim <- pggg.GenerateData(100, 52, c(26, 104), params, date.zero = as.Date("2010-01-01"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:61:37:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L61) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
  draws <- pnbd.mcmc.DrawParameters(as.data.table(cbs),
                                    ^~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:62:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L62) *style:* **lines should not be more than 80 characters.**
```r
                                    mcmc = 10, burnin = 0, thin = 1, mc.cores = 1,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:63:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L63) *style:* **lines should not be more than 80 characters.**
```r
                                    param_init = list(r = 1, alpha = 1, s = 1, beta = 1))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:95:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L95) *style:* **lines should not be more than 80 characters.**
```r
                                          mcmc = 10, burnin = 0, thin = 2, chains = 2,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-pareto-nbd-mcmc.R:96:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-pareto-nbd-mcmc.R#L96) *style:* **lines should not be more than 80 characters.**
```r
                                          use_data_augmentation = FALSE, mc.cores = 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:17:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-timing.R#L17) *style:* **lines should not be more than 80 characters.**
```r
  expect_error(k_est_1 <- estimateRegularity(elog, plot = TRUE, min = 60), "sufficient")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:21:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-timing.R#L21) *style:* **lines should not be more than 80 characters.**
```r
  k_est_3 <- estimateRegularity(elog, method = "mle-minka", plot = TRUE, title = "Plot Title")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-timing.R:22:1:](https://github.com/mplatzer/BTYDplus/blob/b102e2ebb2368f2313c54c4cfd75ae3c42ec47e5/tests/testthat/test-timing.R#L22) *style:* **lines should not be more than 80 characters.**
```r
  k_est_4 <- estimateRegularity(elog, method = "mle-thom", plot = TRUE, title = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Any reason for the 40mV?   the SY8106A has step size 10mV with configurable slew rates from 1 to 128 cycles.


Please, have a look on this, @carlosinftech , @aposadas , @nhnminh , @daolf , @jeanineharb .


Yea temporary ;d;d


I often use following:

```
// pragma inline
bug(string place, string message) {
  if (DEBUG)
     llOwnerSay("["+llGetScriptName()+"."+place+"]: "+message);
}
```

and optimise option.


is `ufUseThreshold` needed in this case?


should this be `None` instead?
Does this ever get returned if there's an error? If not, should it even be initialized?


طيب تقدر تختار عملية من
local storage
وتكمل منها


Fair enough!


yes, I deleted that.
>
> I see your comment 'playing with how to add a script to the page so it
> can be called from a form button'. What are the benefits of doing it
> this way?
>
> I don't know much about this so I could be way wrong - but it seems
> easier / probably faster to add an event listener to the button and
> just write a function you can call in the script we've already
> injected and loaded, rather than injecting a new script into the DOM?
>
> —
> You are receiving this because you authored the thread.
> Reply to this email directly, view it on GitHub
> <https://github.com/bmoreinis/fakenews/commit/9e28e291b28b96bdee1a45cdebf2926c9250fb43#commitcomment-20816903>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AEitseKnV86JCiXeV4s6SHFf36wBJuqwks5rax1WgaJpZM4L8K19>.
>

--

Martin Bram Moreinis, Designer/Developer
http://myinstructionaldesigns.com
(413) 829-0355


Catamorphisms


metasfresh issue #695


now it is correct :+1:


Thank you so so much.

If I need help can i ask you?

I think i have read some research papers with your name Alan Wagner. Are you the same person?

> On 10 Feb 2017, at 12:11 am, Alan Wagner <notifications@github.com> wrote:
>
> The bin directory is here: https://github.com/abw333/dominoes/tree/master/bin <https://github.com/abw333/dominoes/tree/master/bin>
> —
> You are receiving this because you were mentioned.
> Reply to this email directly, view it on GitHub <https://github.com/abw333/dominoes/commit/8999dd8db4d4b722fe552ff20c7c0ea4639c69a9#commitcomment-20816959>, or mute the thread <https://github.com/notifications/unsubscribe-auth/AXvaCTjblRzLBZeYNfFS-6A5SOZf5_wKks5rax59gaJpZM4LZ3vT>.
>


Nice work 👍  @Duaam


это на самом деле не буду логировать в проде, просто проверить


script for pattern change.sql - what it is about?

Recently on my job I faced necessity to change a big amount of URLs in Postgres DB, that was related with changing storage addresses of some pictures.
I am Java developer, and as usual I write only simple CRUD scripts in DB, so I tried to monitor all web resources, and found nothing to help me solve my problen directly, so I decided to improve my PSQL and made it by my self.
So, I had different schemas in DB, different tables and columns, the real pictures  stored in 5 different URLs, and needed to be moved in single URL. The data type in columns were of few types: text, varchar and text arrays.
By the way, the largest problem for me was in changing parts of matching array elements.
That was realy hot.
So if you have similar task, just take this script, enter info about schema,tables,columns as in example, also patterns that needs to be changed and new pattern.
Also you can rework it to your purposes, since Im am not PSQL PRO level specialist.


+semver:patch


Shouldn't it be `Math.max(Math.min(this.unloadQueue.size() - 100,  (int) (this.unloadQueue.size() * UNLOAD_QUEUE_RESIZE_FACTOR)), 0);`? If there are less than 100 chunks to unload this will just hang iirc (don't have the code in front of me).


👍 Bude oznacena release?


I do not think this is valid for qdm measures. for draft qdm measures out of the mat, it has `eMeasure` on it. For published ones, it does not. However, published ones can't be imported like this anyways because they have no XML file, which is probably why this worked fine previously.


I don't know if I should keep SequinLand's additions to Nukkit to a separate class or keep everything in cn.nukkit.


should we remove this check generally? it's only included in the draft exports from the MAT. we could just prompt them for their user name and password if its not included.


hahahaha


Death Wish Ball I ment


See later commits. It was removed.


![](https://github.trello.services/images/mini-trello-icon.png) [Generar CRUD de Usuarios](https://trello.com/c/i6tYOXYa/1-generar-crud-de-usuarios)


I suppose this is due to the possibility of wanting a different python version.


This doesn't really add. It replaces the library. Quick fix:

    Book[] arr = library.load()


TeamCity OTA+ :: rvi_sota_server :: ci [Build 2097](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=23771&buildTypeId=ota_plus_RviSotaServer_Ci) outcome was **SUCCESS**
Summary: Tests passed: 290, ignored: 4 Build time: 00:14:52


لا


`seconds.milliseconds` doesn't make sense... floating point numbers don't work that way. `java.lang.System.nanoTime() / 1000000` converts from nanoseconds to milliseconds. Likewise, CACurrentMediaTime, which is in seconds, needs to be converted to milliseconds (* 1000). Only after doing that are both functions returning values in the same unit (milliseconds).


In general I think it's a good start, other areas that could be interesting are:
- Compiler flags, what are worth enabling to make use of the compiler to catch issues (-Wstack-protector, -Wformat-security, D_FORTIFY_SOURCE ... and similar).
- Kees in KSPP has a few items listed [here](https://kernsec.org/wiki/index.php/Kernel_Self_Protection_Project#Bug_Classes] that I think would be worth to include in this guideline doc.


Please explain all of these in detail.


Score of new vs base: 85 - 81 - 272  [0.505] 438
ELO difference: 3.17 +/- 20.02 STC


I'm not sure what is your intention here.

Let A = see(move), what exactly is the condition you want to prune ?


@species Hier ist uns wohl ein Fehler unterlaufen.


SEA3D examples are in my fork, pull request submitted.

@mrdoob why did you revert the matrix multiplication change?


localStorage.save.push(document.getElementById('historyListId').innerHTML);

أفضل تصير
array


@arkadig please don't forget to specify which part of the app your commit refers to. "Changed Style & functionality" is way too broad naming!


Alright. Check others message box :)


subindo uma pasta


@species Das Postfach sollte mittlerweile wohl als kompromittiert gelten.


Sure.

That's probably another Alan Wagner.


weird: looks like the double loading happens here too.


лишняя обертка для навигации, будет достаточно просто тега nav


ASP .NET labs and projects.


добавить в href ссылку на каталог href="catalog.html"


should we delete this comment?


для индексной страницы ссылка в логотипе не нужна, поэтому можно либо убрать тег а, либо убрать атрибут href


how much of this is duplicated across measures? Can we have a main measure class with an interface for both qdm and cql measures?


الحذف تقدر تحذف تخزين واحد ولا كلها .

الطريقة أنه يصير لكل تخزين
id
ويفضل يكون
index
<li id="0" > 1+1 </li>


This fixes #18.


is this just pulling in previous work? if so, should this have been rebased onto the base branch?


Is this line correct @ed-flanagan ? It seems like this should be `elsif MacOS.version <= :mavericks`.


> SEA3D examples are fixed in my fork, pull request submitted.

Please send a note to the owner: https://github.com/sunag/sea3d
cheers


is there a reason we're doing this series of checks? why not call the `is_cql_package` and `is_hqmf_package` calls?


Sorry, in fact I'm did confound something.
However what I detected is, that in line 954 we sometimes have lmrDepth =0, so we call pos.see_ge(move,0) and according this [test ](http://tests.stockfishchess.org/tests/view/589c283a0ebc59099759f4d9) it makes sense. If it makes sense there, then I thought, it may also make sense to start with pos.see_ge(move,0) in line 958 ...


NM. I see that it's not - that it's necessary for the cql loader.


для тега main было бы неплохо задать какой-то определяющий его класс, например page-content. Также советовал бы для тегов header и footer, относящихся к главной сетке страницы задавать классы типа page-header и page-footer. Так как в html 5 хедереов и футеров может быть несколько, мы сразу же укажем названием, что они относятся к главной сетке страницы


Can we just do `self._handle_exception(e)`? I want to try and get rid of these error codes


ليش اعطيه ايدي ؟


VRML materials for chip capacitors


видел я тот комент на лоре)
вроде на макросах замутить такое можно, и даже намного правильнее сделать - типа в панели навигация, а в консоли - печать


странное название класса для блока)


also made the pre checkbox actually do something


i'm leaving this for now as this is planned to be revamped at some point.


Ayyy lmao


这是百度的前端学院的任务


можно сделать картинку фоном к блоку, но по моему лучше было бы вставить их именно как картинки, через img, они вполне подходят под определение контентных изображений, поясняют пользователю к чему относится блок


indentation, not indention


This commit has been deployed to YP70


линию здесь сделаем с помощью css, div и hr не нужны


Fixes michaelachmann/LnkShortener/issues/13


Shi


лучше убрать из названий классов всякие first и second, отлично подойдет обычный about


> Just heads up I think this could potentially be a breaking change for those who update depending on how they are displaying the date picker.
>
> For example if they are using it in a modal, the date picker might now not be visible since the z-index was decreased as the date picker would now show underneath.

This is exactly what happened to me. The date picker was showing behind the modal and couldn't be clicked. I downgraded to the old version as an emergency fix.


You are correct @DavidJFelix, fixing now.


The following doc(s) have been deployed to the [dsi56toc](https://dsi56toc-static-docs.pantheonsite.io/docs) Multidev environment:
- [source/_partials/footer_content.html](https://github.com/pantheon-systems/documentation/commit/7aeec2dcd53531e3c9309e1acd4ea5815bb35ae8/source/_partials/footer_content.html)
- [source/docs/assets/css/main.css](https://github.com/pantheon-systems/documentation/commit/7aeec2dcd53531e3c9309e1acd4ea5815bb35ae8/source/docs/assets/css/main.css)


How did you dare? You know how much I love the number 1574! It means so much to me like heeee... heee...
Forget it. Let's bash @cyberium instead.


процент заключить в тег sup, специальный тег для верхнего индекса. Для всех нижележащих также


Checkmarx scan results 09 Feb 2017 09:49 UTC -05:00

High
Medium
Low
Info

New
0
0
0
0

Recurrent
27
19
33
0

Fixed
0
0
0
0

 Open Viewer
Included commits

Commit ID	Owner

97c2c989eb8b04648e9c25b4800274e82ab1c9ea	@web-flow


`inout` and `out` intents (currently) turn into using assignment to a pass-by-ref value. The difference from `ref` is that there is a local copy of the value that is updated. There is deinitialization to do on this local copy, but it's not obvious to me that the CHIP needs this detail.


indent


عشان، تقدر تحدد
onclick ?
فيه طرق ثانية ...
هذه وحده منها


думаю второй список здесь лишний, текст можно вложить и в один с цифрами процентов


Yo, it's me again... doing what I do best... randomly commenting on your old cls... :P

I was just wondering... what's up with this persist key thing?


yes, it should be NDEBUG. I will fix it in my next commit.


please add `value_options` with:`"true", "false"`


убираем теги для линии, css делаем ее


Should be "(..) in the `sendMessage` method"


it can be added back if needed, config is open to modifications. my opinion was, modules already do one thing, shared code may not appear.


important line to disable caching while running code in vs


название изменить, убрать третьи и последующие


Thanks! I'll fix this.


лишняя обертка. Что она должна делать?


убрать


this is the pill to prevent issues after redirecting everything to index.,html using redirect rule in web.config


футеру задать класс


no error,but cannot convert name.
my version can read english(normal) and number only
![work](https://cloud.githubusercontent.com/assets/25096086/22788336/1ba1b7b0-ef12-11e6-86e8-1952f3c1e3f3.png)


this whole section is to default all requests for the site to index.html page


No such model in JwtManager. No email address in UserAppModel in BusinessLogic - two different models.


@ChShersh shouldn't it be `whenNothingM :: Monad m => m (Maybe a) -> m b -> m b` ?


Intriguing. Browser support for DETAILS element is [pretty good](http://caniuse.com/#search=Details). Wonder if it has something to do with box-sizing. Will look into it. What's your User Agent?


This should be PR'd upstream


I want to join hacking community.


This commit has been deployed to Stagging


здесь  статичную карту сделаем фоном, динамичную с помощью стороннего iframe. img здесь не нужен будет


1. 네 그러는 것이 좋을 것 같습니다.
2. MNIST Data 특성상 28*28 pixel로 구성되있기 때문에 28*28=784는 항상 일정 합니다. 또한 0~9까지 10개의 수에 대한 확률을 y가 가지기 때문에 10으로 고정되어 있습니다. 이때문에 변수가 아닌 상수로 사용되는것 같습니다^^


@ChShersh this is not intuative to me, I would do:
```
whenNothing :: Applicative f => Maybe a -> f b -> f b
whenNothing (Just x) f = f
whenNothing Nothing  m = m


develop (Myoldmopar) - x86_64-MacOS-10.9-clang: OK (1785 of 1785 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.png)


Ajout de l'activation du paiement.


Developer Handbook


here too ;-)


одна обертка лишняя. Да и блок карты к футеру как-то слабовато относится. Советую сделать его после main тегом aside (означает дополнительный контент, дополняющий смысл главного контента)


`whenNothingM_` will suit my needs though so its not important


Oh whoops nevermind I just noticed you removed the rest from all other opcodes, smart 👍


эти 2 параграфа не относятся к блоку социальных ссылок, вынести их в отдельный блок рядом с соц. иконками


#include <map> can now be removed


Doesn't this end up going 2 stack pointers down?


I'd make this sentence weaker, maybe with a footnote. Picking a close, total, function is the most widely adopted approach of MC.  There are other approaches possible in Coq, and for example we use them in MC for matrix product.

The Section is already quite long, so I would not put more contents in it.  Maybe a fwd pointer to the section about matrices?


20M内存？r u kidding?


I'm concerned that this is going to cause a race condition in some cases because `OnTabCreated` is not always called


通常情况下，我们会避免在生产环境直接使用root用户进行操作。只在需要提升到root权限时才使用sudo来执行命令。


Default Safari (`Version 10.0.3 (12602.4.8`).


@nate6631  Would you like me to email you what I have so far on the mock-ups or upload them to a folder here?


Supposing depth is less than 7 and extension is zero (so that we reach the test in line 958), and letting SEE=see(move), the condition you are currently using for the pruning decision in line 958 are:

depth = 0 and SEE < 248     ===>  prune
depth = 1 and SEE < 0         ===>  prune
depth = 2 and SEE < -248   ===>  prune
depth = 3 and SEE < -496   ===>  prune
etc.


#1 Encriptado de datos personales del teacher


markdown的语法格式你可以抽时间学一学，文档写的更“漂亮”一些。比如代码可以这么写，更好看。

```php
<?php
phpinfo();
```


Kode-OS doesnt have KODE_RELEASE=true system..
Change Unofficial to Official in vendor/kode/config/common.mk


@thoas thanks for doing this :) 🍺


你如果是在自己的家目录下执行这段代码，是不需要sudo的。


@vincentchabannes @prudhomm It seems this makes options ` --bdf.*` not work anymore (replaced by `ts.*`), is it expected ?


@daveaglick I notice this still isn't used anywhere. Maybe remove it? I also saw it index.cshtml.


Depth is never 0 at line 958, I verified this with a bench-run...


TeamCity Platform Services :: Environment Manager 2 :: Package [Build 3.29.6-pre-15-g60c5c85](http://infra.teamcity.ci.ttldev/viewLog.html?buildId=50036&buildTypeId=PlatformServices_EnvironmentManager2_Package) outcome was **SUCCESS**
Summary: Running Build time: 00:00:36


oh right ... this file


Can you push a new version to npm with this fix please


нет никакого смысла создавать переменную и нигде ее не использовать. если бы ты воспользовался статическим анализатором кода, он бы тебе подсказал, что так делать не надо.


Either or works man.


Suggestion:
```
apk add su-exec
```


_read_group_rename_many2one_fields -> _read_group_resolve_many2one_fields


Since the workload is similar, we can treat all cases as if they were _auto=False, the code is short enough


хороший вариант решения


ouch, h2o-assembly -> h2o-assemblies:main:
you just broke some downstream projects FYI


split line + more vars


Will add more support to the code soon. just haven't touched any php code in a while now.


Defined month in my array


@v0dro : Seems like the tests added by commit 5868487aa60a4f3361a67768409240a890fe8826 are failing on commit 8a4bb1cadc5d05600025f186d5c15aef74ebcdd1.


Okay I will just upload them to a folder in this repo. This first graphic is just a rough version and is still in progress but hopefully it gives you an idea for the look and feel. I will create a folder called mock-ups where the designs ideas will go. Please feel free to give me feedback on the designs.


Ah - thanks. Wasn't sure how you handled that.


1. 代码每次提交请写一句话简单说明本次提交主要改动或目的；
2. markdown语法抽空系统学一下，半小时就能学会；
3. 不要使用test.md这种文件名，起名是门学问，得用心。


Yes please


Can you patch this conditionally on NixOS/Linux? It'll just break Darwin like this.


I thought about future maintainability: couldn't MOM_string_functions.F90 be a symbolic link into MOM6/src/framework/ ?


ok to add comodel_name in `_read_group_process_groupby`


嗯嗯，已经会用<code>了:)


This part is already merged in the master branch: https://github.com/chef/knife-ec2/pull/481
Hence, this can be removed.


Yes, I think so. I was originally trying to do a sparse checkout of only the MOM6/src/ALE directory, but that doesn't really work easily anyway. Since the whole repository is a submodule now anyway I can just add it to the build.sh like the ALE modules.


写错了。。


Do these all work with a null runtime?


`d[field] = (d[field], data_dict[d[field]])`


That what I find a little bit strange with current master is, that even if SEE detects losing a pawn (SEE value = -188) in line 958 we never prune it. Is there a good reason for?


Retrospective comment added about the edit


#29 This has added the capability to remora_post to create the HTML files. Also, we can now do the postprocessing after the job has finished, on a login node, which is helpful for very large executions.


Yes, that's even better.


Will this be able to handle full pathnames such as `https://localhost:3000/some/path/api/swagger/`, and paths without the `/` at the end like `https://localhost:3000/some/path/api/swagger`, or will it merely handle `https://localhost:3000/swagger/` like before?

The two aforementioned examples was the reason for the `location.pathname.replace(/\/$/, "")` part I added.


原来还能这样


wat bedoel meneer


Test


Evidently we have unnecessary #include "MOM_memory.h" in remapping? We should clean that up in MOM6...


конечно пустой, ты же сам поудалял из него элементы - `arr.pop()`


согласен.


new comment is done by Elshan