[tests/testthat/test-bg-cnbd-k.R:31:1:](https://github.com/mplatzer/BTYDplus/blob/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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 = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Oh, then it's fine!


Maybe try

http://mirror.jmu.edu/pub/CTAN/obsolete/systems/unix/teTeX/3.0/distrib/tetex-texmf-3.0.tar.gz


develop (kbenne) - x86_64-MacOS-10.10-clang: Build Failed

![Build Badge](http://img.shields.io/badge/build%20status-failing-red.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-NA-red.png)


I can, but it feels like over-complicating something this small and (unless I'm completely missing what you mean) it feels like it will lead to tighter coupling: while it would move the logic out of the view and into the model, it would mean passing the request object around and mean testing the logic would require creating/ mocking a request to pass into the test case.

I did consider doing a bit of hiding by changing this to something like:

```
    if request.user_agent.is_mobile:
        return redirect(link.mobile)
```

where `mobile` and `tablet` would be properties on the `ShortenedLink` model which return the relevant url if it's available and fall back to the default `url` if not. Would that be preferable?


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


Easy: bob just got rick-rolled by a different kind of rick


138331583-ZoneHVACLowTemperatureRadiantVariableFlow-array-bounds (mjwitte) - x86_64-Linux-Ubuntu-14.04-gcc-4.8-IntegrationCoverage-Debug: OK (1783 of 1783 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) ![Coverage Badge](http://img.shields.io/badge/coverage%20status-71.17%25-green.png)


> Maybe try
> http://mirror.jmu.edu/pub/CTAN/obsolete/systems/unix/teTeX/3.0/distrib/tetex-texmf-3.0.tar.gz

That worked.


138331583-ZoneHVACLowTemperatureRadiantVariableFlow-array-bounds (mjwitte) - x86_64-Linux-Ubuntu-14.04-custom_check: OK (0 of 0 tests passed, 0 test warnings)

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


@lrhn @floitschG Why this change?


Shouldn't the docstring be updated?


Подумал, что шрифт текста может быть уникальным, поэтому решил картинку вставить, хотя вряд ли в футере будут использовать какой-то уникальный текст. Исправил.


close #20


sad


  * does the WP text processing preserve the newlines? WP == multilined text so separated by \n. Could return an array of string ie/ text -> "lines" ... this way no need to worry about \n, \r etc as a separator convention.
  * for GETLST, why the explicit length - isn't the array in JSON enough. People can do their own .length's?

ie/ let's make the JSON as natural as possible and remove the "mumpsy-ness"

p.s. in the JSON wrapper, we can call these "proper" names like _getValues_ (this is a parameter interface so why have "parameter" in the names?) and _getWordProcessingValue_


@baulig makes sense. So what we could do is store the key object that is being passed to the PrivateKey setter, and then only create the fallback implementation from that object when we access NativePrivateKey.

Or should we avoid going to the FallbackImpl entirely for this case and just inline what X509Certificate2ImplMono does for PrivateKey?


T


This is the yield that I suspect caused the problem to initiate this commit.


![ezgif com-optimize](https://cloud.githubusercontent.com/assets/7880558/22301638/053d366c-e32c-11e6-858b-f2ed3808e7c7.gif)


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


re: Python feedback
Hello Dexter
cc: @aramnath @reshama @julialintern @vinoad

Great job in completing the Python sections! Your code was very clean and succinct. You were one of the only students to complete Markov:thumbsup:


@nwmoriarty
Somethings had been removed came back...
![screen shot 2017-01-25 at 18 24 34](https://cloud.githubusercontent.com/assets/16145132/22301596/e0bc7d2a-e32b-11e6-8c79-a641c95a3361.png)


@whirm no, thank you!


hi @rldhont

the loading.gif is disappeared...


We discovered too many lines in the debug log because of so many events (that were firing as fast as they could instead of being on an ordinary schedule).  Changes in the running code with this commit fixed the frequency.


Primer Comit


Glad I could inform!

Nice! Yes you would be sure that way. There are a lot of those PS2 mice available really cheap.

That sounds like a really fun application! I think it is really accurate but it overflows after a few mm. So you may have to poll it faster depending on your speed.


Hey @xchapter7x ! Do you know, where I get Dockerfile for this image. Its [dockerhub page](https://hub.docker.com/r/virtmerlin/deploy-worker/) does not have any mentions of Dockerfile.


The MockAlerter keeps up with the time and provides a clock for test purposes.  The MessageCache shares that clock.


Are you sure you wanted to start with my fork? I see the upstream version is 80+ commits ahead of mine:
https://github.com/pskupinski/65816.js


Yes, this code is too small, it's more important to understand how you can apply polymorphism on practice.
> it will lead to tighter coupling

\- Do you mean, using of polymorphism makes [coupling](http://wiki.c2.com/?CouplingAndCohesion) higher?


https://github.com/poparteu/ is not longer public or existing


Отдельный блок. Повторяется в футере.


typo: ability


+1 for keeping it! same process as @wjwwood


The Mock Alerter serves as a message source to provide alerts as time passes.  The Circuits Framework calls periodically, thus advancing the time in the alerter.  The cache monitor keeps up with changes to the cache so that they can be examined after the run.


Add a dummy number 0 as parent


GG 😮😮😮😆😆😆


great!


> and into the model

it's ok to use Strategy to vary behavior instead of model. Model refactoring will be very big.


fucking merged


You're awesome. -RightInTheH


nice, can you trigger a build on jenkins etc :)?


iteration (kbenne) - x86_64-MacOS-10.10-clang: Build Failed

![Build Badge](http://img.shields.io/badge/build%20status-failing-red.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-NA-red.png)


Gitpages setup


yes, thanks!


@virtmerlin ^^


You mean a checkbox in mixer screen ? That would be very great, but is it possible on AVR boards ?


@diddeb This is now in [`v1.0.2`](https://github.com/ElMassimo/request_store_rails/blob/master/CHANGELOG.md#requestlocals-102-2017-01-25) in case you are still using it.


Is this supposed to be January and not February?


upstream PR does not have creator-platform-default config so do not remove this echo options


Modified `<app.py`> file from Docopt  and replaced with a simple cli file that imports data from views module and prints to the user


I double checked this, and claw is definitely affected by armor reduction. Using this log from 1/25 as an example after damage hotfix:

https://www.warcraftlogs.com/reports/Y6xwfAKC8WvJRgnk#fight=9&type=damage-done&source=4&ability=225716&sourcebuffs=-107574&targetbuffs=-208086

The non-crit hit on boss is at 112.5k. Its damage with an 890 trinket and his stats would average: 127186.71 * 1.145 * 1.1 * (1 + 1524/47500) = 165331, which is way too high. Factoring in armor's mod, we'd expect that to be about 165331*.68 = 112425, which perfectly matches the real value.


Hey thanks @ElMassimo!


Addresses issue #10


__API Description file syntax error on line 3441__: duplicated mapping key (Autogenerated message from apiary.io)


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


For context I got this very peculiar message in my crashdump...

```
PocketMine-MP Crash Dump Wed Jan 25 17:13:15 UTC 2017

Error: mkdir(): File exists
File: C:/Users/User/Downloads/server/src/pocketmine/CrashDump
Line: 45
Type: E_WARNING

Code:
[36] 	private $time;
[37] 	private $data = [];
[38] 	private $encodedData = null;
[39] 	private $path;
[40]
[41] 	public function __construct(Server $server){
[42] 		$this->time = time();
[43] 		$this->server = $server;
[44] 		if(!is_dir($this->server->getDataPath()) . "crashdumps"){
[45] 			mkdir($this->server->getDataPath() . "crashdumps");
[46] 		}
[47] 		$this->path = $this->server->getDataPath() . "crashdumps/" . date("D_M_j-H.i.s-T_Y", $this->time) . ".log";
[48] 		$this->fp = @fopen($this->path, "wb");
[49] 		if(!is_resource($this->fp)){
[50] 			throw new \RuntimeException("Could not create Crash Dump");
[51] 		}
[52] 		$this->data["time"] = $this->time;
[53] 		$this->addLine($this->server->getName() . " Crash Dump " . date("D M j H:i:s T Y", $this->time));
[54] 		$this->addLine();
[55] 		$this->baseCrash();
```


I put this in the Labs folder by accident, can I change that? I fixed it on my system but it hasn't updated here and I'm not skilled enough with GitHub to fix it yet.


@kreatordxx The things you find searching for KEY_ALTED. :)


Not without making a push to the repo, I don't have access to jenkins any more for some reason.


To answer you, I did a fresh round of tests.  1. Lectrote show border window colors in Dead Cities correctly.  2.  latest Github checkout of RemGlk  ( 2bb4acb39581d910e3d16e5f7842993122b1e3be) does not via remote-if.py  3. Changing this one line to RemGlk latest, it shows same as Lectrote.

If you test this story hands-on - note one other RemGlk issue I just noticed via remote-if.py . The very first menu (intro) expects a space. With Glulxe there is typically a delay after that first screen until the next screen appears - a couple second.  If you happen to press space a second time _during the delay_ - GlkOte will end up with an error.


@valib Why did you set this? This needs to be reversed, as it's wrong. We're still on Java 7, so it's an error to set minimum Java version for Eclipse to use to Java 8.


Hi, I am still getting a 'last_comment' error when trying to run rake.  I am running Rake version 12.0.0.  Is this where my problem lies?? Any help much appreciated as I am a mega noob to this...!  Thanks


I got errors on PPC because of this. UA_BINARY_OVERLAYABLE_INTEGER is always defined (either true or false) so the implementation of e.g. UA_encode16 is always missing now.


@vincentfretin are you ok with removing grok for Plone 5 the way @tdesvenain and me did it?


[tests/testthat/test-bg-cnbd-k.R:31:1:](https://github.com/mplatzer/BTYDplus/blob/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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/63e95cf5c8ff6ab4db8d5ec3b7d7e2d4e58ddc09/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 = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


classes are capitalized and singular. eg `Order`


I'm sorry but this is just too ridiculous.


Hi @snicolet ,

the first attempt was a lucky run

http://tests.stockfishchess.org/tests/view/5888489a0ebc5915193f7ac5

your proposal failed loudly

https://github.com/Stefano80/Stockfish/compare/cf4a38e...2bedc18

I will think of some more variations but I am not optimistic...


This should be instance_encounters?


Looks good to me!


We will not be using keyboard for this at all. So this need to read from a file. Use google on it. But it basically entails using `FileStream` and `BufferedReader` together.


Yes, 3 wasn't enough so I just went with 500. I hope we can fix this in timely manner so I can forget about this hack.


+## Welcome to GitHub Pages
 -Courser-test repository		 +
 +You can use the [editor on GitHub](https://github.com/PreeV/Courser-test/edit/master/README.md) to maintain and preview the content for your website in Markdown files.
 +
 +Whenever you commit to this repository, GitHub Pages will run [Jekyll](https://jekyllrb.com/) to rebuild the pages in your site, from the content in your Markdown files.
 +
 +### Markdown
 +
 +Markdown is a lightweight and easy-to-use syntax for styling your writing. It includes conventions for
 +
 +```markdown
 +Syntax highlighted code block
 +
 +# Header 1
 +## Header 2
 +### Header 3
 +
 +- Bulleted
 +- List
 +
 +1. Numbered
 +2. List
 +
 +**Bold** and _Italic_ and `Code` text
 +
 +[Link](url) and ![Image](src)
 +```
 +
 +For more details see [GitHub Flavored Markdown](https://guides.github.com/features/mastering-markdown/).
 +
 +### Jekyll Themes
 +
 +Your Pages site will use the layout and styles from the Jekyll theme you have selected in your [repository settings](https://github.com/PreeV/Courser-test/settings). The name of this theme is saved in the Jekyll `_config.yml` configuration file.
 +
 +### Support or Contact
 +
 +Having trouble with Pages? Check out our [documentation](https://help.github.com/categories/github-pages-basics/) or [contact support](https://github.com/contact) and we’ll help you sort it out.


incorrect grammar. so compile time error. also for loops do not throw exceptions.


......回件乱码了


No idea what is happening here. you're using the keyword `new` to call a method named `readfile` and you do not have the proper number of `()`, so look up what the keyword `new` does. If you're going to use a method named `readfile`, you need to create that method `readfile`


spurious because a for loop cannot throw an exception


spurious because we are reading from the command line


On discussion with @igorwwwwwwwwwwwwwwwwwwww , importing the worker Config pkg brings in a lot of dependencies we don't need for gcloud-cleanup.  A simpler approach is to copy the librato configs from the prod environment , and inline them.


Ah interesting, I wonder why they recommend that


__API Description file syntax error on line 3441__: duplicated mapping key (Autogenerated message from apiary.io)


`keyboard` is a variable you created on line 6. It does not belong to `System`. This also only reads one line. The file may be 1000 lines long, or maybe it will be 4 lines long. You cannot know ahead of time, so you need a proper looping mechanism.


This change should have bumped up the major version number, and not just minor. react-native-vector-icons 4.0.0 requires react-native 0.40 or above. Please see the [docs](https://github.com/oblador/react-native-vector-icons/releases/tag/v4.0.0).


* syntax error with `String:`.
* `pullfilename` does not exist. if you're going to use a method to do it, create the method
* `new filename` is illegal syntax. again, you need to go back and reference what the book says about `new`


Not entirely sure, I'll have to look at the code.  The FallbackImpl parses the certificate's binary representation into a `Mono.Security.X509.X509Certificate`, which involves some ASN.1 parsing, so it should be considered an expensive operation.  We should only do that if we actually need the `Mono.Security.X509` instance somewhere.


* `new scanner(...)` is illegal syntax.
* `file` does not exist anywhere
* this is the last of your code, so... you never use it.


nope, two different tables


re: Python feedback
Hi Abhisek
cc: @aramnath @reshama @julialintern @vinoad @gfsoileau

Good job in completing the Python sections! 👍 Your code was clean and succinct. And great job with the markdown! Reshama will send out the solutions soon, check out the Markov section.


Wouldn't it be better to revert the Galaxy breakage that caused this to need to be double unwrapped? Or am I missing something?


IMHO Range | Range[] would be the sufficient to support all use-cases


Thanks for the eyes, would you like to knock this out?  Easy win for a contribution :)


Oh, yeah.. this is a merge conflict, was tired when I was doing these


Hamza, you have a bit to go. Remember, we have some basic steps:

1. check arguments for legality. we need to make sure there is at least one argument passed. otherwise, exit with an appropriate message.
2. loop each argument. Each argument is a file name of an order.
3. read the file in. Each line of the file (excluding header) will be an order item.
   * a header will be prefixed with `#`. ignore it.
   * a `discount` is a reserved word we decided on. it can come on any line, you need to handle that and only apply a discount to the orders total before tax.
4. for each `item` read from the file, transform it into a `String`, `double`, `int` as appropriate
5. put the item into an array. now mind you, if you choose not to do the extra credit, you will need to have an array of type `String`. this means this step and step 4 are reversed. If you choose to do the extra credit, you will need to create an `Item` and put it into the array.
6. Sum up total of items, ignoring discount of row
7. apply discount if applicable
8. apply tax
9. sum up total including tax
10. print order (receipt)


Closes "hide event" at #22


Please refer to https://forum.arduino.cc/index.php?topic=438840.0.


The new file is on <test.py> to test functions and then implement to <app.py> file


Отдельный блок, есть в хедере и в футере дважды


@rsc Hi, thanks start of works perf package.
BTW, it's not huge bug so I'll use this comment area.

I understand you said *"That package is at the top level of the repo because I expect to pull much of benchcmp into an importable package"*.
But now, it seems to `benchstat` main.go file is can't import `golang.org/x/perf/internal/stats` because that's top level internal package.

Is it intended? will it be fixed later?

```sh
$ go get -u -v -x github.com/golang/perf/cmd/bench{save,stat}
.
.
.
# It's $GOPATH/github.com/golang/perf/cmd/benchstat/main.go
main.go:105:2: use of internal package not allowed
```


>Do you mean, using of polymorphism makes coupling higher?

Not at all. I meant in this specific case I feel like making the model aware of user agent requests is a code smell. Again, I may be completely misunderstanding, but to me here Polymorphism would mean subclassing `ShortenedLink` to have mobile and tablet versions and then that would be just moving the issue around since the view would either need to know which to instantiate or there would need to be a Factory to return the proper model based on the user request and that's the same thing.


As I remember, Cookies can only give 1 food bar restored in SP mode, and we should keep it to that vanilla standard, unless it was changed I will look later


This is just to have something on my profile ^^


Good catch.


DOA-TO-UnitVent (Nigusse) - i386-Windows-7-VisualStudio-14: OK (2303 of 2361 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-97.54%25-yellow.png)


Yes you might be right. I am looking into it.


BTW, this op is seems super-slow, both it takes 2s for resizing to 1280 x 1280. @strin got 10x speed-up by switching to nearest neighbor @shlens @martinwicke


Model should not be aware about application logic in any case. Model should encapsulate only domain model logic.


hello


Unable to arm with px4-v3 build on Pixhawk 2 with ARMING_CHECK set to 0. I guess some sensor/EKF trouble. I therefore tried to re-enable UAVCAN by re-defining HAL_WITH_UAVCAN to 1. This results in a linker error (uavcan_main). Any hints?

BTW: If I remember correctly, the v2 memory bug is closely tied to in-flight USB usage. Disabling UAVCAN on the most commonly used hardware platform is quite a harsh action to work around for a bug that is rarely ever seen by the most users (nobody will ever try to download a 100MB+ log via USB nowadays...).


yes, I think I eventually realized that, but only after writing the above comment


What was used to create the diagram "keyless_exchange_diagram.png"?


Say hello!
![article-list](https://cloud.githubusercontent.com/assets/15139/22303079/ee3eac1a-e331-11e6-981d-918e36331bec.png)


public class repository {
	public static void main(String[] args) {
        // Prints "Hello, World" to the terminal window.
        System.out.println("Hello, GitHub");
    }
}


138331937Adaptive-convection-resulting-in-extremely-low-zone-temperature (mjwitte) - x86_64-Linux-Ubuntu-14.04-gcc-4.8: OK (2334 of 2391 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-97.62%25-yellow.png)


Короче ты поймешь!


juuuuuuuuuhhhhuuuuuuuuuuuuuuuuuuuuuuuuuuuu. Hello!


Agree with all changes. We do say 'credibility' not 'credible' elsewhere (based on previous assessments). I prefer 'credible' as I think it's more commonly used (and two syllables shorter). If anyone agrees then make it an issue and I can easily change them all (best way is to search hake-assessment.tex and then change in the appropriate .rnw files).


![](https://github.trello.services/images/mini-trello-icon.png) [Change amount of item in cart](https://trello.com/c/ScoA5RCh/35-change-amount-of-item-in-cart)


BIG!


g


FTR, this is [CVE-2016-10165](http://www.openwall.com/lists/oss-security/2017/01/25/14)


Eu vi na hora que eu alterei. Ai já corri lá remover a chave na Poloniex. Que cagada né HUAUHUAH Acontece


и много имэджей

UPD: Кирилл: Отберите у Насти мой ноут!!!)


I'll see that I can take car of testing for this.


138331937Adaptive-convection-resulting-in-extremely-low-zone-temperature (mjwitte) - x86_64-Linux-Ubuntu-14.04-cppcheck-1.61: OK (0 of 0 tests passed, 0 test warnings)

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


listview1.BeginUpdate;   listview1.EndUpdate; to add ! I forgot it !!!


Новый блок!