[inst/site/direct_optimizer_test.R:17:15:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L17) *warning:* **no visible binding for global variable ‘train_labels’**
```r
  m <- length(train_labels)
              ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:18:22:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L18) *warning:* **no visible binding for global variable ‘train_labels’**
```r
  c <- length(unique(train_labels))
                     ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:20:12:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L20) *warning:* **no visible global function definition for ‘cvFolds’**
```r
  folds <- cvFolds(m, K = nfolds, type = "random")
           ^~~~~~~
```
[inst/site/direct_optimizer_test.R:20:27:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L20) *warning:* **no visible binding for global variable ‘nfolds’, Did you mean 'folds'?**
```r
  folds <- cvFolds(m, K = nfolds, type = "random")
                          ^~~~~~
```
[inst/site/direct_optimizer_test.R:28:32:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L28) *warning:* **no visible binding for global variable ‘train_labels’**
```r
    bags <- plyr::alply(unique(train_labels), 1, function(x){x})
                               ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:28:61:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L28) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    bags <- plyr::alply(unique(train_labels), 1, function(x){x})
                                                            ^
```
[inst/site/direct_optimizer_test.R:30:19:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L30) *warning:* **no visible binding for global variable ‘train_labels’**
```r
      ll <- which(train_labels[set_train] == unique(train_labels)[j])
                  ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:30:19:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L30) *warning:* **no visible binding for global variable ‘train_labels’**
```r
      ll <- which(train_labels[set_train] == unique(train_labels)[j])
                  ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:32:71:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L32) *style:* **Commas should always have a space after.**
```r
                  manyseries_to_wordbag( (train_data[set_train, ])[ll,], w, p, a, "exact", 0.01)
                                                                      ^
```
[inst/site/direct_optimizer_test.R:37:20:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L37) *warning:* **no visible binding for global variable ‘train_labels’**
```r
    labels_test <- train_labels[set_test]
                   ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:38:18:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L38) *warning:* **no visible binding for global variable ‘train_data’**
```r
    data_test <- train_data[set_test, ]
                 ^~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:43:16:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L43) *warning:* **no visible global function definition for ‘series_to_wordbag’**
```r
        bag <- series_to_wordbag(data_test[j, ], w, p, a, "exact", 0.01)
               ^~~~~~~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:45:16:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L45) *warning:* **no visible global function definition for ‘series_to_wordbag’**
```r
        bag <- series_to_wordbag(data_test, w, p, a, "exact", 0.01)
               ^~~~~~~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:47:18:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L47) *warning:* **no visible global function definition for ‘cosine_sim’**
```r
      cosines <- cosine_sim(list("bag" = bag, "tfidf" = tfidf))
                 ^~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:55:27:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L55) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    error <- length(which((labels_test != labels_predicted))) / length(labels_test)
                          ^
```
[inst/site/direct_optimizer_test.R:60:15:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L60) *warning:* **no visible global function definition for ‘laply’, Did you mean 'lapply'?**
```r
  err <- mean(laply(errors,function(x){x}))
              ^~~~~
```
[inst/site/direct_optimizer_test.R:60:28:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L60) *style:* **Commas should always have a space after.**
```r
  err <- mean(laply(errors,function(x){x}))
                           ^
```
[inst/site/direct_optimizer_test.R:60:39:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L60) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  err <- mean(laply(errors,function(x){x}))
                                      ^
```
[inst/site/direct_optimizer_test.R:71:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L71) *style:* **Variable or function name should be snake_case.**
```r
S <- directL(cverror, rep(c(10, 2, 2)), rep(c(120, 60, 12)),
^
```
[inst/site/direct_optimizer_test.R:77:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L77) *style:* **Variable or function name should be snake_case.**
```r
S <- directL(cverror, rep(c(10, 2, 2)), rep(c(140, 50, 12)),
^
```
[inst/site/direct_optimizer_test.R:86:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L86) *style:* **Variable or function name should be snake_case.**
```r
S <- directL(cverror, rep(c(10, 2, 2)), rep(c(470, 100, 16)),
^
```
[inst/site/direct_optimizer_test.R:92:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/direct_optimizer_test.R#L92) *style:* **Commented code should be removed.**
```r
# nloptr.print.options()
  ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:1:2:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L1) *style:* **Commented code should be removed.**
```r
#install.packages("devtools")
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:2:2:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L2) *style:* **Commented code should be removed.**
```r
#library(devtools)
 ^~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:3:2:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L3) *style:* **Commented code should be removed.**
```r
#install_github('jMotif/jmotif-R')
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:12:61:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L12) *style:* **Commas should always have a space after.**
```r
cylinders <- CBF[["data_train"]][CBF[["labels_train"]] == 1,]
                                                            ^
```
[inst/site/enevenbughunt.R:15:18:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L15) *style:* **Commas should always have a space after.**
```r
c <- cylinders[2,]
                 ^
```
[inst/site/enevenbughunt.R:24:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L24) *style:* **Lines should not be more than 100 characters.**
```r
#cylinder <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 1,], w, p, a, "exact", 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:24:2:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L24) *style:* **Commented code should be removed.**
```r
#cylinder <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 1,], w, p, a, "exact", 0.01)
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:25:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L25) *style:* **Lines should not be more than 100 characters.**
```r
bell <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 2,], w, p, a, "exact", 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:25:78:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L25) *style:* **Commas should always have a space after.**
```r
bell <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 2,], w, p, a, "exact", 0.01)
                                                                             ^
```
[inst/site/enevenbughunt.R:26:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L26) *style:* **Lines should not be more than 100 characters.**
```r
funnel <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 3,], w, p, a, "exact", 0.01)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/enevenbughunt.R:26:80:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L26) *style:* **Commas should always have a space after.**
```r
funnel <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 3,], w, p, a, "exact", 0.01)
                                                                               ^
```
[inst/site/enevenbughunt.R:28:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L28) *style:* **Use <-, not =, for assignment.**
```r
tfidf = bags_to_tfidf( list("cylinder" = cylinder, "bell" = bell, "funnel" = funnel) )
      ^
```
[inst/site/enevenbughunt.R:30:18:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L30) *style:* **Use <-, not =, for assignment.**
```r
labels_predicted = rep(-1, length(CBF[["labels_test"]]))
                 ^
```
[inst/site/enevenbughunt.R:31:13:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L31) *style:* **Use <-, not =, for assignment.**
```r
labels_test = CBF[["labels_test"]]
            ^
```
[inst/site/enevenbughunt.R:32:11:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L32) *style:* **Use <-, not =, for assignment.**
```r
data_test = CBF[["data_test"]]
          ^
```
[inst/site/enevenbughunt.R:33:33:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L33) *style:* **Commas should always have a space after.**
```r
for (i in c(1:length(data_test[,1]))) {
                                ^
```
[inst/site/enevenbughunt.R:34:10:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L34) *style:* **Use <-, not =, for assignment.**
```r
  series = data_test[i,]
         ^
```
[inst/site/enevenbughunt.R:34:24:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L34) *style:* **Commas should always have a space after.**
```r
  series = data_test[i,]
                       ^
```
[inst/site/enevenbughunt.R:35:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L35) *style:* **Use <-, not =, for assignment.**
```r
  bag = series_to_wordbag(series, w, p, a, "exact", 0.01)
      ^
```
[inst/site/enevenbughunt.R:36:11:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L36) *style:* **Use <-, not =, for assignment.**
```r
  cosines = cosine_sim(list("bag"=bag, "tfidf" = tfidf))
          ^
```
[inst/site/enevenbughunt.R:36:34:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L36) *style:* **Put spaces around all infix operators.**
```r
  cosines = cosine_sim(list("bag"=bag, "tfidf" = tfidf))
                                ~^~
```
[inst/site/enevenbughunt.R:37:23:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L37) *style:* **Use <-, not =, for assignment.**
```r
  labels_predicted[i] = which(cosines$cosines == max(cosines$cosines))
                      ^
```
[inst/site/enevenbughunt.R:42:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L42) *style:* **Use <-, not =, for assignment.**
```r
error = length(which((labels_test != labels_predicted))) / length(labels_test)
      ^
```
[inst/site/enevenbughunt.R:42:22:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L42) *style:* **Place a space before left parenthesis, except in a function call.**
```r
error = length(which((labels_test != labels_predicted))) / length(labels_test)
                     ^
```
[inst/site/enevenbughunt.R:47:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/enevenbughunt.R#L47) *style:* **Place a space before left parenthesis, except in a function call.**
```r
which((labels_test != labels_predicted))
      ^
```
[inst/site/makedata.R:8:14:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L8) *style:* **Use <-, not =, for assignment.**
```r
labels_train = unlist(dtrain[,1])
             ^
```
[inst/site/makedata.R:8:31:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L8) *style:* **Commas should always have a space after.**
```r
labels_train = unlist(dtrain[,1])
                              ^
```
[inst/site/makedata.R:9:13:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L9) *style:* **Use <-, not =, for assignment.**
```r
labels_test = unlist(dtest[,1])
            ^
```
[inst/site/makedata.R:9:29:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L9) *style:* **Commas should always have a space after.**
```r
labels_test = unlist(dtest[,1])
                            ^
```
[inst/site/makedata.R:11:37:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L11) *style:* **Commas should always have a space after.**
```r
data_train <- matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
                                    ^
```
[inst/site/makedata.R:12:35:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L12) *style:* **Commas should always have a space after.**
```r
data_test <- matrix(unlist(dtest[,-1]), nrow = length(labels_test))
                                  ^
```
[inst/site/makedata.R:14:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L14) *style:* **Variable or function name should be snake_case.**
```r
Gun_Point <- list("labels_train" = labels_train, "data_train" = data_train,
^~~~~~~~~
```
[inst/site/makedata.R:24:32:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L24) *style:* **Commas should always have a space after.**
```r
labels_train <- unlist(dtrain[,1])
                               ^
```
[inst/site/makedata.R:25:30:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L25) *style:* **Commas should always have a space after.**
```r
labels_test <- unlist(dtest[,1])
                             ^
```
[inst/site/makedata.R:27:37:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L27) *style:* **Commas should always have a space after.**
```r
data_train <- matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
                                    ^
```
[inst/site/makedata.R:28:35:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L28) *style:* **Commas should always have a space after.**
```r
data_test <- matrix(unlist(dtest[,-1]), nrow = length(labels_test))
                                  ^
```
[inst/site/makedata.R:30:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/makedata.R#L30) *style:* **Variable or function name should be snake_case.**
```r
CBF <- list("labels_train" = labels_train, "data_train" = data_train,
^~~
```
[inst/site/readme_examples.R:14:16:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L14) *style:* **Commas should always have a space after.**
```r
abline(h = c(1,-1), lty = 2, col = "gray50")
               ^
```
[inst/site/readme_examples.R:15:36:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L15) *style:* **Commas should always have a space after.**
```r
legend(0, -4, c("scaled sine wave","z-normalized wave"),
                                   ^
```
[inst/site/readme_examples.R:16:18:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L16) *style:* **Commas should always have a space after.**
```r
       lty = c(1,1), lwd = c(1,1), col = c("blue","red"), cex = 0.8)
                 ^
```
[inst/site/readme_examples.R:16:32:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L16) *style:* **Commas should always have a space after.**
```r
       lty = c(1,1), lwd = c(1,1), col = c("blue","red"), cex = 0.8)
                               ^
```
[inst/site/readme_examples.R:16:51:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L16) *style:* **Commas should always have a space after.**
```r
       lty = c(1,1), lwd = c(1,1), col = c("blue","red"), cex = 0.8)
                                                  ^
```
[inst/site/readme_examples.R:24:27:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L24) *style:* **Commas should never have a space before.**
```r
abline(v = c(1, 1 + 7 / 3 , 1 + 7 / 3 * 2, 8), lty = 3, lwd = 2, col = "gray50")
                         ~^
```
[inst/site/readme_examples.R:38:13:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L38) *style:* **Commas should always have a space after.**
```r
y <- seq(-2,2, length = 100)
            ^
```
[inst/site/readme_examples.R:40:9:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L40) *style:* **Commas should always have a space after.**
```r
lines(x,y, type = "l", lwd = 5, col = "magenta")
        ^
```
[inst/site/readme_examples.R:62:82:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L62) *style:* **Commas should always have a space after.**
```r
cylinder <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 1,],
                                                                                ^
```
[inst/site/readme_examples.R:64:78:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L64) *style:* **Commas should always have a space after.**
```r
bell <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 2,],
                                                                             ^
```
[inst/site/readme_examples.R:66:80:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L66) *style:* **Commas should always have a space after.**
```r
funnel <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 3,],
                                                                               ^
```
[inst/site/readme_examples.R:71:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L71) *style:* **Use <-, not =, for assignment.**
```r
tfidf = bags_to_tfidf(
      ^
```
[inst/site/readme_examples.R:77:59:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L77) *style:* **Commas should always have a space after.**
```r
sample <- (CBF[["data_train"]][CBF[["labels_train"]] == 3,])[1,]
                                                          ^
```
[inst/site/readme_examples.R:77:64:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L77) *style:* **Commas should always have a space after.**
```r
sample <- (CBF[["data_train"]][CBF[["labels_train"]] == 3,])[1,]
                                                               ^
```
[inst/site/readme_examples.R:87:34:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L87) *style:* **Commas should always have a space after.**
```r
  pattern <- weighted_patterns[i,]
                                 ^
```
[inst/site/readme_examples.R:101:56:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L101) *style:* **Commas should always have a space after.**
```r
  scale_colour_gradientn(name = "Class specificity:  ",limits = c(0,1),
                                                       ^
```
[inst/site/readme_examples.R:101:69:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L101) *style:* **Commas should always have a space after.**
```r
  scale_colour_gradientn(name = "Class specificity:  ",limits = c(0,1),
                                                                    ^
```
[inst/site/readme_examples.R:109:47:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L109) *style:* **Commas should always have a space after.**
```r
        axis.text.x = element_text(size = 12),axis.text.y = element_blank(),
                                              ^
```
[inst/site/readme_examples.R:118:33:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L118) *style:* **Commas should always have a space after.**
```r
for (i in c(1:length(data_test[,1]))) {
                                ^
```
[inst/site/readme_examples.R:119:25:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L119) *style:* **Commas should always have a space after.**
```r
  series <- data_test[i,]
                        ^
```
[inst/site/readme_examples.R:127:23:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L127) *style:* **Place a space before left parenthesis, except in a function call.**
```r
error <- length(which((labels_test != labels_predicted))) / length(labels_test)
                      ^
```
[inst/site/readme_examples.R:132:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/readme_examples.R#L132) *style:* **Place a space before left parenthesis, except in a function call.**
```r
which((labels_test != labels_predicted))
      ^
```
[inst/site/test_RRA.R:15:25:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/test_RRA.R#L15) *style:* **Commas should always have a space after.**
```r
sax_df <- ldply(ecg_sax,function(x){x})
                        ^
```
[inst/site/test_RRA.R:15:36:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/test_RRA.R#L15) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
sax_df <- ldply(ecg_sax,function(x){x})
                                   ^
```
[inst/site/test_RRA.R:16:26:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/test_RRA.R#L16) *style:* **Commas should always have a space after.**
```r
names(sax_df) <- c("idx","word")
                         ^
```
[inst/site/test_RRA.R:31:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/site/test_RRA.R#L31) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/test_data/bugs.R:2:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L2) *style:* **Use spaces to indent, not tabs.**
```r
NA
^
```
[inst/test_data/bugs.R:6:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L6) *style:* **Lines should not be more than 100 characters.**
```r
str_to_repair_grammar("adcc ccbb bbbd bbcb bdbb cbbc accb ccbb daba cbbc bbdb bcbb dabc bbcb adcc ccbc dabb	cbbd bbcb cdbb cbbc bbdc adcc cbcb bbbd bbcb bdbb cbbc accb cdbb dbbb cbbd bccb cdab cbbc accb ccbb dabb cbbd bbcb bdbb cbbc accb ccbb cbbd bbcb bdbb cbbc accb ccbb dabb cbbd bbcb bdbb cbbc accc ccbc dacb bbbd 	bbcb bdbb cbbc accb ccbc dbba cbbc bbdb bcbb dbbc bbcb adcc ccbc daba cbbc bbdb bcbb dbbc bbcb adcb bdac dcbb cbbd bbcb bdbb cbbc accb cdbb dbbb cbbd bccb bdab cbbc accb cdbb dbbb cbbd bbcb bdbb cbbc accc ccbb cbbd bbcb bdbb cbbc accb")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/test_data/bugs.R:11:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L11) *style:* **Lines should not be more than 100 characters.**
```r
str_to_repair_grammar("dacb bbbd bbcb bdbb cbbc accb ccbc dbba cbbc bbdb bcbb dbbc bbcb adcc ccbc daba cbbc bbdb bcbb dbbc bbcb adcb bdac dcbb cbbd bbcb bdbb cbbc accb cdbb dbbb cbbd bccb bdab cbbc accb cdbb dbbb cbbd bbcb bdbb cbbc accc ccbb cbbd bbcb bdbb cbbc accb")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/test_data/bugs.R:14:6:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L14) *style:* **Use <-, not =, for assignment.**
```r
data = fread("/Users/psenin/workspace/grammarviz2_src/data/mitdb__100_180.txt")
     ^
```
[inst/test_data/bugs.R:15:5:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L15) *style:* **Use <-, not =, for assignment.**
```r
sax = sax_via_window(data$V1, 160, 4, 4, "exact", 0.001)
    ^
```
[inst/test_data/bugs.R:16:5:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L16) *style:* **Use <-, not =, for assignment.**
```r
str = paste(unlist(sax), collapse =" ")
    ^
```
[inst/test_data/bugs.R:16:35:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L16) *style:* **Put spaces around all infix operators.**
```r
str = paste(unlist(sax), collapse =" ")
                                  ^~
```
[inst/test_data/bugs.R:17:9:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L17) *style:* **Use <-, not =, for assignment.**
```r
grammar = str_to_repair_grammar(str)
        ^
```
[inst/test_data/bugs.R:19:6:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L19) *style:* **Use <-, not =, for assignment.**
```r
str1 = grammar[[1]]$rule_string
     ^
```
[inst/test_data/bugs.R:20:4:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L20) *style:* **Place a space before left parenthesis, except in a function call.**
```r
for(i in c(2:95)){
   ^
```
[inst/test_data/bugs.R:21:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Lines should not be more than 100 characters.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/test_data/bugs.R:21:14:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Use <-, not =, for assignment.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
             ^
```
[inst/test_data/bugs.R:21:14:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Put spaces around all infix operators.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
            ~^~
```
[inst/test_data/bugs.R:21:26:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
                         ^
```
[inst/test_data/bugs.R:21:35:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Put spaces around all infix operators.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
                                  ^~
```
[inst/test_data/bugs.R:21:49:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Put spaces around all infix operators.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
                                                ^~
```
[inst/test_data/bugs.R:21:111:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L21) *style:* **Put spaces around all infix operators.**
```r
	str1 = gsub(paste(" R", i - 1, " ", sep = ""), paste(" ", grammar[[i]]$expanded_rule_string, " ", sep = ""), str1)
                                                                                ^~
```
[inst/test_data/bugs.R:26:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/inst/test_data/bugs.R#L26) *error:* **unexpected '>'**
```r
> library(jmotif)
^
```
[R/jmotif.R:25:27:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/jmotif.R#L25) *style:* **Commas should always have a space after.**
```r
        distance_matrix[i,j] <- (cutlines[i] - cutlines[j - 1]) * (cutlines[i] - cutlines[j - 1])
                          ^
```
[R/jmotif.R:27:27:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/jmotif.R#L27) *style:* **Commas should always have a space after.**
```r
        distance_matrix[j,i] <- distance_matrix[i,j]
                          ^
```
[R/jmotif.R:27:51:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/jmotif.R#L27) *style:* **Commas should always have a space after.**
```r
        distance_matrix[j,i] <- distance_matrix[i,j]
                                                  ^
```
[R/jmotif.R:34:72:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/jmotif.R#L34) *style:* **Commas should always have a space after.**
```r
    stop(paste("unable to get a distance matrix for the alphabet size",a_size))
                                                                       ^
```
[R/jmotif.R:62:21:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/jmotif.R#L62) *warning:* **no visible global function definition for ‘sax_distance_matrix’**
```r
      dist_table <- sax_distance_matrix(alphabet_size)
                    ^~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:34:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L34) *style:* **Lines should not be more than 100 characters.**
```r
#' Finds the Euclidean distance between points, if distance is above the threshold, abandons the computation
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:67:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L67) *style:* **Lines should not be more than 100 characters.**
```r
    .Call('jmotif_find_discords_hotsax', PACKAGE = 'jmotif', ts, w_size, paa_size, a_size, n_threshold, discords_num)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:123:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L123) *style:* **Lines should not be more than 100 characters.**
```r
find_discords_rra <- function(series, w_size, paa_size, a_size, nr_strategy, n_threshold, discords_num) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:124:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L124) *style:* **Lines should not be more than 100 characters.**
```r
    .Call('jmotif_find_discords_rra', PACKAGE = 'jmotif', series, w_size, paa_size, a_size, nr_strategy, n_threshold, discords_num)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:143:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L143) *style:* **Lines should not be more than 100 characters.**
```r
    .Call('jmotif_series_to_wordbag', PACKAGE = 'jmotif', ts, w_size, paa_size, a_size, nr_strategy, n_threshold)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:162:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L162) *style:* **Lines should not be more than 100 characters.**
```r
    .Call('jmotif_manyseries_to_wordbag', PACKAGE = 'jmotif', data, w_size, paa_size, a_size, nr_strategy, n_threshold)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:206:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L206) *style:* **Lines should not be more than 100 characters.**
```r
#' Translates an alphabet size into the array of corresponding SAX cut-lines built using the Normal distribution.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:260:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L260) *style:* **Lines should not be more than 100 characters.**
```r
#' @param nr_strategy the Numerosity Reduction strategy, acceptable values are "exact" and "mindist" --
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:269:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L269) *style:* **Lines should not be more than 100 characters.**
```r
    .Call('jmotif_sax_via_window', PACKAGE = 'jmotif', ts, w_size, paa_size, a_size, nr_strategy, n_threshold)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:381:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/R/RcppExports.R#L381) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test_cosine_sim.R:1:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosine_sim.R#L1) *style:* **Use <-, not =, for assignment.**
```r
a = c(2, 1, 0, 2, 0, 1, 1, 1)
  ^
```
[tests/testthat/test_cosine_sim.R:6:58:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosine_sim.R#L6) *style:* **Commas should always have a space after.**
```r
  expect_equal(0.1784162, as.numeric(cosine_dist(rbind(a,b))), tolerance = 1e-6)
                                                         ^
```
[tests/testthat/test_cosines.R:4:78:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosines.R#L4) *style:* **Commas should always have a space after.**
```r
bag1 <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 1,],
                                                                             ^
```
[tests/testthat/test_cosines.R:6:78:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosines.R#L6) *style:* **Commas should always have a space after.**
```r
bag2 <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 2,],
                                                                             ^
```
[tests/testthat/test_cosines.R:8:78:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosines.R#L8) *style:* **Commas should always have a space after.**
```r
bag3 <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 3,],
                                                                             ^
```
[tests/testthat/test_cosines.R:11:57:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosines.R#L11) *style:* **Commas should always have a space after.**
```r
sample <- (CBF[["data_test"]][CBF[["labels_test"]] == 3,])[1,]
                                                        ^
```
[tests/testthat/test_cosines.R:11:62:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_cosines.R#L11) *style:* **Commas should always have a space after.**
```r
sample <- (CBF[["data_test"]][CBF[["labels_test"]] == 3,])[1,]
                                                             ^
```
[tests/testthat/test_discord_brute_force.R:18:50:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_brute_force.R#L18) *style:* **Commas should always have a space after.**
```r
  expect_equal(discords[discords$position == 411,]$nn_distance, 1.5045846602966542)
                                                 ^
```
[tests/testthat/test_discord_hot_sax.R:16:50:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_hot_sax.R#L16) *style:* **Commas should always have a space after.**
```r
  expect_equal(discords[discords$position == 430,]$nn_distance, 5.252618285620532)
                                                 ^
```
[tests/testthat/test_discord_hot_sax.R:17:50:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_hot_sax.R#L17) *style:* **Commas should always have a space after.**
```r
  expect_equal(discords[discords$position == 318,]$nn_distance, 4.154825115936453)
                                                 ^
```
[tests/testthat/test_discord_hot_sax.R:18:51:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_hot_sax.R#L18) *style:* **Commas should always have a space after.**
```r
  expect_equal(discords[discords$position == 2080,]$nn_distance, 2.381003269560112)
                                                  ^
```
[tests/testthat/test_discord_hot_sax.R:19:49:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_hot_sax.R#L19) *style:* **Commas should always have a space after.**
```r
  expect_equal(discords[discords$position == 25,]$nn_distance, 2.363633774221037)
                                                ^
```
[tests/testthat/test_discord_rra.R:3:26:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_rra.R#L3) *style:* **Commas should always have a space after.**
```r
  expect_true(discords[1,]$start < 420)
                         ^
```
[tests/testthat/test_discord_rra.R:4:26:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_discord_rra.R#L4) *style:* **Commas should always have a space after.**
```r
  expect_true(discords[1,]$end > 420)
                         ^
```
[tests/testthat/test_early_abandoned_dist.R:3:38:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_early_abandoned_dist.R#L3) *style:* **Commas should always have a space after.**
```r
test_dist <- as.numeric(dist(rbind(a,b)))
                                     ^
```
[tests/testthat/test_early_abandoned_dist.R:7:44:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_early_abandoned_dist.R#L7) *style:* **Commas should always have a space after.**
```r
  expect_error(early_abandoned_dist(a, c(1,2), 1))
                                           ^
```
[tests/testthat/test_min_dist_equal.R:16:22:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist_equal.R#L16) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  expect_equal( sqrt((min_dist(str1, str2, 3)) ^ 2 / 2), 0.7421040279 )
                     ^
```
[tests/testthat/test_min_dist_equal.R:18:22:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist_equal.R#L18) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  expect_equal( sqrt((min_dist(str2, str3, 3)) ^ 2), 0.7421040279 )
                     ^
```
[tests/testthat/test_min_dist.R:3:14:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L3) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_true( is_equal_mindist("aaa", "bbb")  )
             ^
```
[tests/testthat/test_min_dist.R:3:47:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L3) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_true( is_equal_mindist("aaa", "bbb")  )
                                              ^
```
[tests/testthat/test_min_dist.R:5:15:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L5) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_false( is_equal_mindist("aaa", "bbba")  )
              ^
```
[tests/testthat/test_min_dist.R:5:49:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L5) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_false( is_equal_mindist("aaa", "bbba")  )
                                                ^
```
[tests/testthat/test_min_dist.R:7:15:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L7) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_false( is_equal_mindist("aaa", "aca")  )
              ^
```
[tests/testthat/test_min_dist.R:7:48:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_min_dist.R#L7) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  expect_false( is_equal_mindist("aaa", "aca")  )
                                               ^
```
[tests/testthat/test_RePair_via_decompression.R:1:12:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_RePair_via_decompression.R#L1) *style:* **Use <-, not =, for assignment.**
```r
sax_string = paste(
           ^
```
[tests/testthat/test_RePair_via_decompression.R:10:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_RePair_via_decompression.R#L10) *style:* **Variable or function name should be snake_case.**
```r
  uncompressed_R0 = paste(grammar[[1]]$rule_string, " ", sep = "")
  ^~~~~~~~~~~~~~~
```
[tests/testthat/test_RePair_via_decompression.R:10:19:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_RePair_via_decompression.R#L10) *style:* **Use <-, not =, for assignment.**
```r
  uncompressed_R0 = paste(grammar[[1]]$rule_string, " ", sep = "")
                  ^
```
[tests/testthat/test_RePair_via_decompression.R:14:7:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_RePair_via_decompression.R#L14) *style:* **Variable or function name should be snake_case.**
```r
      uncompressed_R0 = gsub(
      ^~~~~~~~~~~~~~~
```
[tests/testthat/test_RePair_via_decompression.R:14:23:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_RePair_via_decompression.R#L14) *style:* **Use <-, not =, for assignment.**
```r
      uncompressed_R0 = gsub(
                      ^
```
[tests/testthat/test_SAX_simple.R:16:53:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_simple.R#L16) *style:* **Commas should always have a space after.**
```r
                             nrow = 10, byrow = T)[,1], collapse = "")
                                                    ^
```
[tests/testthat/test_SAX_simple.R:18:53:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_simple.R#L18) *style:* **Commas should always have a space after.**
```r
                             nrow = 14, byrow = T)[,1], collapse = "")
                                                    ^
```
[tests/testthat/test_SAX_simple.R:20:52:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_simple.R#L20) *style:* **Commas should always have a space after.**
```r
                             nrow = 9, byrow = T)[,1], collapse = "")
                                                   ^
```
[tests/testthat/test_SAX_strategies.R:12:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_strategies.R#L12) *style:* **Commented code should be removed.**
```r
# plot(as.numeric(dat),t="l")
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_SAX_via_window.R:12:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_via_window.R#L12) *style:* **Commented code should be removed.**
```r
# plot(as.numeric(dat),t="l")
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_SAX_with_NAs.R:12:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_with_NAs.R#L12) *style:* **Commented code should be removed.**
```r
# plot(as.numeric(dat),t="l")
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_SAX_with_NAs.R:40:65:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_with_NAs.R#L40) *style:* **Commas should always have a space after.**
```r
    cylinders <- CBF[["data_train"]][CBF[["labels_train"]] == 1,]
                                                                ^
```
[tests/testthat/test_SAX_with_NAs.R:42:22:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_SAX_with_NAs.R#L42) *style:* **Commas should always have a space after.**
```r
    c <- cylinders[2,]
                     ^
```
[tests/testthat/test_wordbag.R:17:61:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L17) *style:* **Commas should always have a space after.**
```r
  words <- table(matrix(unlist(sax1), ncol = 1, byrow = T)[,1])
                                                            ^
```
[tests/testthat/test_wordbag.R:22:44:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L22) *style:* **Commas should always have a space after.**
```r
                    wb1[wb1$words == "bca",]$counts)
                                           ^
```
[tests/testthat/test_wordbag.R:30:46:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L30) *style:* **Commas should always have a space after.**
```r
  wb2 <- manyseries_to_wordbag(t(t(rbind(dat,dat))), 6, 3, 3, "none", 0.01)
                                             ^
```
[tests/testthat/test_wordbag.R:41:61:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L41) *style:* **Commas should always have a space after.**
```r
  words <- table(matrix(unlist(sax1), ncol = 1, byrow = T)[,1])
                                                            ^
```
[tests/testthat/test_wordbag.R:46:39:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L46) *style:* **Commas should always have a space after.**
```r
               wb1[wb1$words == "bca",]$counts)
                                      ^
```
[tests/testthat/test_wordbag.R:54:46:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_wordbag.R#L54) *style:* **Commas should always have a space after.**
```r
  wb2 <- manyseries_to_wordbag(t(t(rbind(dat,dat))), 6, 3, 3, "mindist", 0.01)
                                             ^
```
[tests/testthat/test_znorm.R:1:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_znorm.R#L1) *style:* **Variable or function name should be snake_case.**
```r
X = c(-1, -2, -1, 0, 2, 1, 1, 0)
^
```
[tests/testthat/test_znorm.R:1:3:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_znorm.R#L1) *style:* **Use <-, not =, for assignment.**
```r
X = c(-1, -2, -1, 0, 2, 1, 1, 0)
  ^
```
[tests/testthat/test_znorm.R:2:1:](https://github.com/jMotif/jmotif-R/blob/0b42d39834afa363f9563a89a024fe30d824bab8/tests/testthat/test_znorm.R#L2) *style:* **Variable or function name should be snake_case.**
```r
Xscaled <- X / 100
^~~~~~~
```


Done: 1bdab2d5153a8a0bb963fe6018732ebf1f6a715a


Bluemix [toolchain](https://console.ng.bluemix.net/devops/toolchains/588f383c-31f4-41ff-a07a-b28b3f931c80 "WestFieldServlet"): [Delivery Pipeline](https://console.ng.bluemix.net/devops/pipelines/c12fb70d-7bd5-49b2-a05b-1c8339e6d87d "WestFieldServlet") deployed [westfield](https://github.com/ksleima/westfield/releases/tag/deploy-ibm-yp-us-south-POT_Org-WestField-20170430-185924 "deploy-ibm-yp-us-south-POT_Org-WestField-20170430-185924") to [WestField](https://console.ng.bluemix.net/apps/e24bfad3-2ee1-4f43-8f66-6892de442d14 "ibm:yp:us-south:POT_Org:WestField"), including this commit


Approve


Hi I was following the tutorial till chapter #6. But somehow my code is not working as yours as intended. Then I decided to try to run completed code from this repository. However I cannot get it working. Can you help me out please? What I did is:

1. Downloaded the repository files and extracted them in **htdocs** folder.
2. Run **composer install** in htdocs folder on cmd
3. Run **php artisan key:generate** in htdocs folder on cmd
4. Everything looks ok till this step.
Run **php artisan migrate** gives this error

![image](https://cloud.githubusercontent.com/assets/3091558/25567192/64dc1010-2e23-11e7-86a1-861993236c88.png)


时钟


密码


You don't need to do this now, epoch fixed this in the fn_selfActions


Bluemix [toolchain](https://console.ng.bluemix.net/devops/toolchains/588f383c-31f4-41ff-a07a-b28b3f931c80 "WestFieldServlet"): [Delivery Pipeline](https://console.ng.bluemix.net/devops/pipelines/c12fb70d-7bd5-49b2-a05b-1c8339e6d87d "WestFieldServlet") deployed [westfield](https://github.com/ksleima/westfield/releases/tag/deploy-ibm-yp-us-south-POT_Org-WestField-20170430-190628 "deploy-ibm-yp-us-south-POT_Org-WestField-20170430-190628") to [WestField](https://console.ng.bluemix.net/apps/e24bfad3-2ee1-4f43-8f66-6892de442d14 "ibm:yp:us-south:POT_Org:WestField"), including this commit


@alexbruy  sorry, but this is still failing...


pk = public token


This is quite cool, hope it passes!


This is actually the first time the top level worked :).  I added a test to confirm for sure.  There is a lot of munging of the list path and this is the first time an `OptionalParamRegex` which didn't work as expected.  I'll probably go back and look at path handling once this lands.


Still failing, using the consul tree I sent you.
Here are the errors
```
2017/04/30 19:04:19 [error] 22173#22173: upsync_parse_json: applications/pods/ecpsdmp400wo-0/colors/blue is illegal, dont contains subkey applications_pods_ecpsdmp400wo-0
2017/04/30 19:04:19 [error] 22173#22173: upsync_parse_json: applications/pods/ecpsdmp400wo-0/colors/blue/servers/10.16.14.232:8998 is illegal, dont contains subkey applications_pods_ecpsdmp400wo-0
2017/04/30 19:04:19 [error] 22173#22173: upsync_parse_json: applications/pods/ecpsdmp400wo-0/colors/blue/servers/10.16.16.28:8998 is illegal, dont contains subkey applications_pods_ecpsdmp400wo-0
2017/04/30 19:04:19 [error] 22173#22173: upsync_parse_json: applications/pods/ecpsdmp400wo-0/colors/green is illegal, dont contains subkey applications_pods_ecpsdmp400wo-0
2017/04/30 19:04:19 [error] 22173#22173: upsync_parse_json: applications/pods/ecpsdmp400wo-0/colors/green/servers/10.16.16.196:8998 is illegal, dont contains subkey applications_pods_ecpsdmp400wo-0
2017/04/30 19:04:19 [error] 22173#22173: upsync_del_peer: upstream "applications_pods_ecpsdmp400wo-0" cannot delete all peers
2017/04/30 19:04:19 [error] 22173#22173: upsync_process: upstream del peers failed
```