[inst/site/classifier_test.R:9:1:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L9) *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/classifier_test.R:9:82:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L9) *style:* **Commas should always have a space after.**
```r
cylinder <- manyseries_to_wordbag(CBF[["data_train"]][CBF[["labels_train"]] == 1,], w, p, a, "exact", 0.01)
                                                                                ^
```
[inst/site/classifier_test.R:10:1:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L10) *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/classifier_test.R:10:78:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L10) *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/classifier_test.R:11:1:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L11) *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/classifier_test.R:11:80:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L11) *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/classifier_test.R:15:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L15) *style:* **Use <-, not =, for assignment.**
```r
tfidf = bags_to_tfidf( list("cylinder" = cylinder, "bell" = bell, "funnel" = funnel) )
      ^
```
[inst/site/classifier_test.R:19:18:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L19) *style:* **Use <-, not =, for assignment.**
```r
labels_predicted = rep(-1, length(CBF[["labels_test"]]))
                 ^
```
[inst/site/classifier_test.R:20:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L20) *style:* **Use <-, not =, for assignment.**
```r
labels_test = CBF[["labels_test"]]
            ^
```
[inst/site/classifier_test.R:21:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L21) *style:* **Use <-, not =, for assignment.**
```r
data_test = CBF[["data_test"]]
          ^
```
[inst/site/classifier_test.R:22:33:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L22) *style:* **Commas should always have a space after.**
```r
for (i in c(1:length(data_test[,1]))) {
                                ^
```
[inst/site/classifier_test.R:23:10:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L23) *style:* **Use <-, not =, for assignment.**
```r
  series = data_test[i,]
         ^
```
[inst/site/classifier_test.R:23:24:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L23) *style:* **Commas should always have a space after.**
```r
  series = data_test[i,]
                       ^
```
[inst/site/classifier_test.R:24:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L24) *style:* **Use <-, not =, for assignment.**
```r
  bag = series_to_wordbag(series, w, p, a, "exact", 0.01)
      ^
```
[inst/site/classifier_test.R:25:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L25) *style:* **Use <-, not =, for assignment.**
```r
  cosines = cosine_sim(list("bag"=bag, "tfidf" = tfidf))
          ^
```
[inst/site/classifier_test.R:25:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L25) *style:* **Put spaces around all infix operators.**
```r
  cosines = cosine_sim(list("bag"=bag, "tfidf" = tfidf))
                                ~^~
```
[inst/site/classifier_test.R:26:23:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L26) *style:* **Use <-, not =, for assignment.**
```r
  labels_predicted[i] = which(cosines$cosines == max(cosines$cosines))
                      ^
```
[inst/site/classifier_test.R:31:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L31) *style:* **Use <-, not =, for assignment.**
```r
error = length(which((labels_test != labels_predicted))) / length(labels_test)
      ^
```
[inst/site/classifier_test.R:31:22:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L31) *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/classifier_test.R:36:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/classifier_test.R#L36) *style:* **Place a space before left parenthesis, except in a function call.**
```r
which((labels_test != labels_predicted))
      ^
```
[inst/site/density_curve_test.R:7:3:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L7) *style:* **Use <-, not =, for assignment.**
```r
df=data.frame(time=c(1:length(ecg)),value=ecg)
  ^
```
[inst/site/density_curve_test.R:7:3:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L7) *style:* **Put spaces around all infix operators.**
```r
df=data.frame(time=c(1:length(ecg)),value=ecg)
 ~^~
```
[inst/site/density_curve_test.R:7:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L7) *style:* **Put spaces around all infix operators.**
```r
df=data.frame(time=c(1:length(ecg)),value=ecg)
                 ~^~
```
[inst/site/density_curve_test.R:7:37:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L7) *style:* **Commas should always have a space after.**
```r
df=data.frame(time=c(1:length(ecg)),value=ecg)
                                    ^
```
[inst/site/density_curve_test.R:7:42:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L7) *style:* **Put spaces around all infix operators.**
```r
df=data.frame(time=c(1:length(ecg)),value=ecg)
                                        ~^~
```
[inst/site/density_curve_test.R:8:51:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L8) *style:* **Put spaces around all infix operators.**
```r
p1 <- ggplot(df, aes(time, value)) + geom_line(lwd=1.1,color="blue1") + theme_classic() +
                                                 ~^~
```
[inst/site/density_curve_test.R:8:56:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L8) *style:* **Commas should always have a space after.**
```r
p1 <- ggplot(df, aes(time, value)) + geom_line(lwd=1.1,color="blue1") + theme_classic() +
                                                       ^
```
[inst/site/density_curve_test.R:8:61:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L8) *style:* **Put spaces around all infix operators.**
```r
p1 <- ggplot(df, aes(time, value)) + geom_line(lwd=1.1,color="blue1") + theme_classic() +
                                                           ~^~
```
[inst/site/density_curve_test.R:11:40:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L11) *style:* **Commas should always have a space after.**
```r
        axis.title.x = element_blank(),axis.title.y=element_blank(),
                                       ^
```
[inst/site/density_curve_test.R:11:52:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L11) *style:* **Put spaces around all infix operators.**
```r
        axis.title.x = element_blank(),axis.title.y=element_blank(),
                                                  ~^~
```
[inst/site/density_curve_test.R:12:21:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L12) *style:* **Put spaces around all infix operators.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                   ~^~
```
[inst/site/density_curve_test.R:12:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L12) *style:* **Commas should always have a space after.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                                     ^
```
[inst/site/density_curve_test.R:12:49:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L12) *style:* **Put spaces around all infix operators.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                                               ~^~
```
[inst/site/density_curve_test.R:13:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
               ~^~
```
[inst/site/density_curve_test.R:13:29:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Commas should always have a space after.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                            ^
```
[inst/site/density_curve_test.R:13:31:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Commas should always have a space after.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                              ^
```
[inst/site/density_curve_test.R:13:40:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Commas should always have a space after.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                                       ^
```
[inst/site/density_curve_test.R:13:47:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Commas should always have a space after.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                                              ^
```
[inst/site/density_curve_test.R:13:50:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                                                ~^~
```
[inst/site/density_curve_test.R:13:53:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Commas should always have a space after.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                                                    ^
```
[inst/site/density_curve_test.R:13:56:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L13) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=df[390:510,],aes(time,value),lwd=2,col="red")
                                                      ~^~
```
[inst/site/density_curve_test.R:15:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L15) *style:* **Use <-, not =, for assignment.**
```r
w=100
 ^
```
[inst/site/density_curve_test.R:15:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L15) *style:* **Put spaces around all infix operators.**
```r
w=100
~^~
```
[inst/site/density_curve_test.R:16:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L16) *style:* **Use <-, not =, for assignment.**
```r
p=8
 ^
```
[inst/site/density_curve_test.R:16:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L16) *style:* **Put spaces around all infix operators.**
```r
p=8
~^~
```
[inst/site/density_curve_test.R:17:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L17) *style:* **Use <-, not =, for assignment.**
```r
a=8
 ^
```
[inst/site/density_curve_test.R:17:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L17) *style:* **Put spaces around all infix operators.**
```r
a=8
~^~
```
[inst/site/density_curve_test.R:20:35:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L20) *style:* **Put spaces around all infix operators.**
```r
ecg_str <- paste(ecg_sax, collapse=" ")
                                 ~^~
```
[inst/site/density_curve_test.R:23:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L23) *style:* **Use <-, not =, for assignment.**
```r
density_curve = rep(0,length(ecg))
              ^
```
[inst/site/density_curve_test.R:23:23:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L23) *style:* **Commas should always have a space after.**
```r
density_curve = rep(0,length(ecg))
                      ^
```
[inst/site/density_curve_test.R:24:4:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L24) *style:* **Place a space before left parenthesis, except in a function call.**
```r
for(i in 2:length(ecg_grammar)){
   ^
```
[inst/site/density_curve_test.R:25:8:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L25) *style:* **Use <-, not =, for assignment.**
```r
  rule = ecg_grammar[[i]]
       ^
```
[inst/site/density_curve_test.R:26:6:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L26) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(j in 1:length(rule$rule_interval_starts)){
     ^
```
[inst/site/density_curve_test.R:27:8:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L27) *style:* **Use <-, not =, for assignment.**
```r
    xs = rule$rule_interval_starts[j]
       ^
```
[inst/site/density_curve_test.R:28:8:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L28) *style:* **Use <-, not =, for assignment.**
```r
    xe = rule$rule_interval_ends[j] + w
       ^
```
[inst/site/density_curve_test.R:33:20:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L33) *style:* **Put spaces around all infix operators.**
```r
which(density_curve==min(density_curve))
                  ~^~~
```
[inst/site/density_curve_test.R:34:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Use <-, not =, for assignment.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
           ^
```
[inst/site/density_curve_test.R:34:26:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Put spaces around all infix operators.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                        ~^~
```
[inst/site/density_curve_test.R:34:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Commas should always have a space after.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                                     ^
```
[inst/site/density_curve_test.R:34:39:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Put spaces around all infix operators.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                                     ~^~
```
[inst/site/density_curve_test.R:34:46:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Commas should always have a space after.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                                             ^
```
[inst/site/density_curve_test.R:34:46:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Place a space before left parenthesis, except in a function call.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                                             ^
```
[inst/site/density_curve_test.R:34:50:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L34) *style:* **Put spaces around all infix operators.**
```r
min_values = data.frame(x=c(444:476),y=rep(0,(476-443)))
                                                ~^~
```
[inst/site/density_curve_test.R:36:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L36) *style:* **Use <-, not =, for assignment.**
```r
density_df=data.frame(time=c(1:length(density_curve)),value=density_curve)
          ^
```
[inst/site/density_curve_test.R:36:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L36) *style:* **Put spaces around all infix operators.**
```r
density_df=data.frame(time=c(1:length(density_curve)),value=density_curve)
         ~^~
```
[inst/site/density_curve_test.R:36:27:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L36) *style:* **Put spaces around all infix operators.**
```r
density_df=data.frame(time=c(1:length(density_curve)),value=density_curve)
                         ~^~
```
[inst/site/density_curve_test.R:36:55:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L36) *style:* **Commas should always have a space after.**
```r
density_df=data.frame(time=c(1:length(density_curve)),value=density_curve)
                                                      ^
```
[inst/site/density_curve_test.R:36:60:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L36) *style:* **Put spaces around all infix operators.**
```r
density_df=data.frame(time=c(1:length(density_curve)),value=density_curve)
                                                          ~^~
```
[inst/site/density_curve_test.R:37:20:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L37) *style:* **Commas should always have a space after.**
```r
shade <- rbind(c(0,0), density_df, c(2229,0))
                   ^
```
[inst/site/density_curve_test.R:37:43:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L37) *style:* **Commas should always have a space after.**
```r
shade <- rbind(c(0,0), density_df, c(2229,0))
                                          ^
```
[inst/site/density_curve_test.R:38:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L38) *style:* **Put spaces around all infix operators.**
```r
names(shade)<-c("x","y")
           ~^~~
```
[inst/site/density_curve_test.R:38:21:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L38) *style:* **Commas should always have a space after.**
```r
names(shade)<-c("x","y")
                    ^
```
[inst/site/density_curve_test.R:39:31:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L39) *style:* **Put spaces around all infix operators.**
```r
p2 <- ggplot(density_df, aes(x=time,y=value)) +
                             ~^~
```
[inst/site/density_curve_test.R:39:37:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L39) *style:* **Commas should always have a space after.**
```r
p2 <- ggplot(density_df, aes(x=time,y=value)) +
                                    ^
```
[inst/site/density_curve_test.R:39:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L39) *style:* **Put spaces around all infix operators.**
```r
p2 <- ggplot(density_df, aes(x=time,y=value)) +
                                    ~^~
```
[inst/site/density_curve_test.R:40:16:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L40) *style:* **Put spaces around all infix operators.**
```r
  geom_line(col="cyan2") + theme_classic() +
              ~^~
```
[inst/site/density_curve_test.R:41:45:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L41) *style:* **Put spaces around all infix operators.**
```r
  geom_polygon(data = shade, aes(x, y), fill="cyan", alpha=0.5) +
                                           ~^~
```
[inst/site/density_curve_test.R:41:59:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L41) *style:* **Put spaces around all infix operators.**
```r
  geom_polygon(data = shade, aes(x, y), fill="cyan", alpha=0.5) +
                                                         ~^~
```
[inst/site/density_curve_test.R:43:1:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L43) *style:* **lines should not be more than 100 characters.**
```r
  theme(plot.title = element_text(size = rel(1.5)), axis.title.x = element_blank(),axis.title.y=element_blank(),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/density_curve_test.R:43:84:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L43) *style:* **Commas should always have a space after.**
```r
  theme(plot.title = element_text(size = rel(1.5)), axis.title.x = element_blank(),axis.title.y=element_blank(),
                                                                                ^
```
[inst/site/density_curve_test.R:43:96:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L43) *style:* **Put spaces around all infix operators.**
```r
  theme(plot.title = element_text(size = rel(1.5)), axis.title.x = element_blank(),axis.title.y=element_blank(),
                                                                                ~^~
```
[inst/site/density_curve_test.R:44:21:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L44) *style:* **Put spaces around all infix operators.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                   ~^~
```
[inst/site/density_curve_test.R:44:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L44) *style:* **Commas should always have a space after.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                                     ^
```
[inst/site/density_curve_test.R:44:49:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L44) *style:* **Put spaces around all infix operators.**
```r
        axis.ticks.y=element_blank(),axis.text.y=element_blank()) +
                                               ~^~
```
[inst/site/density_curve_test.R:45:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
               ~^~
```
[inst/site/density_curve_test.R:45:29:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Commas should always have a space after.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                            ^
```
[inst/site/density_curve_test.R:45:35:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Commas should always have a space after.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                                  ^
```
[inst/site/density_curve_test.R:45:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Commas should always have a space after.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                                     ^
```
[inst/site/density_curve_test.R:45:41:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                                       ~^~
```
[inst/site/density_curve_test.R:45:44:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Commas should always have a space after.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                                           ^
```
[inst/site/density_curve_test.R:45:47:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L45) *style:* **Put spaces around all infix operators.**
```r
  geom_line(data=min_values,aes(x,y),lwd=2,col="red")
                                             ~^~
```
[inst/site/density_curve_test.R:48:26:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/density_curve_test.R#L48) *style:* **Put spaces around all infix operators.**
```r
grid.arrange(p1, p2, ncol=1)
                        ~^~
```
[inst/site/direct_optimizer_test.R:9:5:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L9) *style:* **Use <-, not =, for assignment.**
```r
  w = round(x[1], digits = 0)
    ^
```
[inst/site/direct_optimizer_test.R:10:5:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L10) *style:* **Use <-, not =, for assignment.**
```r
  p = round(x[2], digits = 0)
    ^
```
[inst/site/direct_optimizer_test.R:11:5:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L11) *style:* **Use <-, not =, for assignment.**
```r
  a = round(x[3], digits = 0)
    ^
```
[inst/site/direct_optimizer_test.R:13:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L13) *warning:* **no visible binding for global variable ‘train_labels’**
```r
  m <- length(train_labels)
              ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:14:22:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L14) *warning:* **no visible binding for global variable ‘train_labels’**
```r
  c <- length(unique(train_labels))
                     ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:16:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L16) *warning:* **no visible global function definition for ‘cvFolds’**
```r
  folds <- cvFolds(m, K = nfolds, type = "random")
           ^~~~~~~
```
[inst/site/direct_optimizer_test.R:16:27:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L16) *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:24:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *warning:* **no visible global function definition for ‘alply’, Did you mean 'apply'?**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
            ^~~~~
```
[inst/site/direct_optimizer_test.R:24:26:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *warning:* **no visible binding for global variable ‘train_labels’**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
                         ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:24:40:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *style:* **Commas should always have a space after.**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
                                       ^
```
[inst/site/direct_optimizer_test.R:24:42:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *style:* **Commas should always have a space after.**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
                                         ^
```
[inst/site/direct_optimizer_test.R:24:53:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
                                                    ^
```
[inst/site/direct_optimizer_test.R:24:55:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L24) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
    bags <- alply(unique(train_labels),1,function(x){x})
                                                      ^
```
[inst/site/direct_optimizer_test.R:26:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L26) *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:26:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L26) *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:28:71:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L28) *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:30:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L30) *style:* **Use <-, not =, for assignment.**
```r
    tfidf = bags_to_tfidf( bags )
          ^
```
[inst/site/direct_optimizer_test.R:30:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L30) *warning:* **no visible global function definition for ‘bags_to_tfidf’**
```r
    tfidf = bags_to_tfidf( bags )
            ^~~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:32:22:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L32) *style:* **Use <-, not =, for assignment.**
```r
    labels_predicted = rep(-1, length(set_test))
                     ^
```
[inst/site/direct_optimizer_test.R:33:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L33) *style:* **Use <-, not =, for assignment.**
```r
    labels_test = train_labels[set_test]
                ^
```
[inst/site/direct_optimizer_test.R:33:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L33) *warning:* **no visible binding for global variable ‘train_labels’**
```r
    labels_test = train_labels[set_test]
                  ^~~~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:34:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L34) *style:* **Use <-, not =, for assignment.**
```r
    data_test = train_data[set_test,]
              ^
```
[inst/site/direct_optimizer_test.R:34:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L34) *warning:* **no visible binding for global variable ‘train_data’**
```r
    data_test = train_data[set_test,]
                ^~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:34:37:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L34) *style:* **Commas should always have a space after.**
```r
    data_test = train_data[set_test,]
                                    ^
```
[inst/site/direct_optimizer_test.R:37:10:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L37) *style:* **Use <-, not =, for assignment.**
```r
      bag=NA
         ^
```
[inst/site/direct_optimizer_test.R:37:10:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L37) *style:* **Put spaces around all infix operators.**
```r
      bag=NA
        ~^~
```
[inst/site/direct_optimizer_test.R:38:35:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L38) *style:* **Put spaces around all infix operators.**
```r
      if (length(labels_predicted)>1) {
                                 ~^~
```
[inst/site/direct_optimizer_test.R:39:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L39) *style:* **Use <-, not =, for assignment.**
```r
        bag = series_to_wordbag(data_test[j,], w, p, a, "exact", 0.01)
            ^
```
[inst/site/direct_optimizer_test.R:39:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L39) *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:39:45:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L39) *style:* **Commas should always have a space after.**
```r
        bag = series_to_wordbag(data_test[j,], w, p, a, "exact", 0.01)
                                            ^
```
[inst/site/direct_optimizer_test.R:41:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L41) *style:* **Use <-, not =, for assignment.**
```r
        bag = series_to_wordbag(data_test, w, p, a, "exact", 0.01)
            ^
```
[inst/site/direct_optimizer_test.R:41:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L41) *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:43:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L43) *style:* **Use <-, not =, for assignment.**
```r
      cosines = cosine_sim(list("bag" = bag, "tfidf" = tfidf))
              ^
```
[inst/site/direct_optimizer_test.R:43:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L43) *warning:* **no visible global function definition for ‘cosine_sim’**
```r
      cosines = cosine_sim(list("bag" = bag, "tfidf" = tfidf))
                ^~~~~~~~~~
```
[inst/site/direct_optimizer_test.R:45:28:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L45) *style:* **Use <-, not =, for assignment.**
```r
       labels_predicted[j] = which(cosines$cosines == max(cosines$cosines))
                           ^
```
[inst/site/direct_optimizer_test.R:51:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L51) *style:* **Use <-, not =, for assignment.**
```r
    error = length(which((labels_test != labels_predicted))) / length(labels_test)
          ^
```
[inst/site/direct_optimizer_test.R:51:26:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L51) *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:56:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L56) *style:* **Use <-, not =, for assignment.**
```r
  err = mean(laply(errors,function(x){x}))
      ^
```
[inst/site/direct_optimizer_test.R:56:14:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L56) *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:56:27:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L56) *style:* **Commas should always have a space after.**
```r
  err = mean(laply(errors,function(x){x}))
                          ^
```
[inst/site/direct_optimizer_test.R:56:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L56) *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:56:40:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L56) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
  err = mean(laply(errors,function(x){x}))
                                       ^
```
[inst/site/direct_optimizer_test.R:58:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L58) *style:* **Commas should always have a space after.**
```r
  print(paste(w,p,a, " -> ", err))
                ^
```
[inst/site/direct_optimizer_test.R:58:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L58) *style:* **Commas should always have a space after.**
```r
  print(paste(w,p,a, " -> ", err))
                  ^
```
[inst/site/direct_optimizer_test.R:66:8:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L66) *style:* **Use <-, not =, for assignment.**
```r
nfolds = 30
       ^
```
[inst/site/direct_optimizer_test.R:67:32:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L67) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(120,60,12)),
                               ^
```
[inst/site/direct_optimizer_test.R:67:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L67) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(120,60,12)),
                                 ^
```
[inst/site/direct_optimizer_test.R:67:49:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L67) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(120,60,12)),
                                                ^
```
[inst/site/direct_optimizer_test.R:67:52:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L67) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(120,60,12)),
                                                   ^
```
[inst/site/direct_optimizer_test.R:72:8:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L72) *style:* **Use <-, not =, for assignment.**
```r
nfolds = 50
       ^
```
[inst/site/direct_optimizer_test.R:73:32:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L73) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(140,50,12)),
                               ^
```
[inst/site/direct_optimizer_test.R:73:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L73) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(140,50,12)),
                                 ^
```
[inst/site/direct_optimizer_test.R:73:49:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L73) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(140,50,12)),
                                                ^
```
[inst/site/direct_optimizer_test.R:73:52:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L73) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(140,50,12)),
                                                   ^
```
[inst/site/direct_optimizer_test.R:77:6:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L77) *style:* **Use <-, not =, for assignment.**
```r
data = read.table("../../sax-vsm_classic.git/src/resources/data/Beef/Beef_TRAIN")
     ^
```
[inst/site/direct_optimizer_test.R:78:14:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L78) *style:* **Use <-, not =, for assignment.**
```r
train_labels = unlist(data[,1])
             ^
```
[inst/site/direct_optimizer_test.R:78:29:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L78) *style:* **Commas should always have a space after.**
```r
train_labels = unlist(data[,1])
                            ^
```
[inst/site/direct_optimizer_test.R:79:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L79) *style:* **Use <-, not =, for assignment.**
```r
train_data = matrix(unlist(data[,-1]), nrow = length(train_labels))
           ^
```
[inst/site/direct_optimizer_test.R:79:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L79) *style:* **Commas should always have a space after.**
```r
train_data = matrix(unlist(data[,-1]), nrow = length(train_labels))
                                 ^
```
[inst/site/direct_optimizer_test.R:80:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L80) *style:* **Use <-, not =, for assignment.**
```r
nfolds=30
      ^
```
[inst/site/direct_optimizer_test.R:80:7:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L80) *style:* **Put spaces around all infix operators.**
```r
nfolds=30
     ~^~
```
[inst/site/direct_optimizer_test.R:81:32:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L81) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(470,100,16)),
                               ^
```
[inst/site/direct_optimizer_test.R:81:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L81) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(470,100,16)),
                                 ^
```
[inst/site/direct_optimizer_test.R:81:49:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L81) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(470,100,16)),
                                                ^
```
[inst/site/direct_optimizer_test.R:81:53:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L81) *style:* **Commas should always have a space after.**
```r
S <- directL(cverror, rep(c(10,2,2)), rep(c(470,100,16)),
                                                    ^
```
[inst/site/direct_optimizer_test.R:85:3:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/direct_optimizer_test.R#L85) *style:* **Commented code should be removed.**
```r
# nloptr.print.options()
  ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/makedata.R:1:2:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L1) *style:* **Commented code should be removed.**
```r
## makes a gun-point dataset
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/site/makedata.R:6:14:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L6) *style:* **Use <-, not =, for assignment.**
```r
labels_train = unlist(dtrain[,1])
             ^
```
[inst/site/makedata.R:6:31:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L6) *style:* **Commas should always have a space after.**
```r
labels_train = unlist(dtrain[,1])
                              ^
```
[inst/site/makedata.R:7:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L7) *style:* **Use <-, not =, for assignment.**
```r
labels_test = unlist(dtest[,1])
            ^
```
[inst/site/makedata.R:7:29:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L7) *style:* **Commas should always have a space after.**
```r
labels_test = unlist(dtest[,1])
                            ^
```
[inst/site/makedata.R:9:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L9) *style:* **Use <-, not =, for assignment.**
```r
data_train = matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
           ^
```
[inst/site/makedata.R:9:36:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L9) *style:* **Commas should always have a space after.**
```r
data_train = matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
                                   ^
```
[inst/site/makedata.R:10:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L10) *style:* **Use <-, not =, for assignment.**
```r
data_test = matrix(unlist(dtest[,-1]), nrow = length(labels_test))
          ^
```
[inst/site/makedata.R:10:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L10) *style:* **Commas should always have a space after.**
```r
data_test = matrix(unlist(dtest[,-1]), nrow = length(labels_test))
                                 ^
```
[inst/site/makedata.R:12:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L12) *style:* **Use <-, not =, for assignment.**
```r
Gun_Point = list("labels_train" = labels_train, "data_train" = data_train,
          ^
```
[inst/site/makedata.R:22:14:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L22) *style:* **Use <-, not =, for assignment.**
```r
labels_train = unlist(dtrain[,1])
             ^
```
[inst/site/makedata.R:22:31:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L22) *style:* **Commas should always have a space after.**
```r
labels_train = unlist(dtrain[,1])
                              ^
```
[inst/site/makedata.R:23:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L23) *style:* **Use <-, not =, for assignment.**
```r
labels_test = unlist(dtest[,1])
            ^
```
[inst/site/makedata.R:23:29:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L23) *style:* **Commas should always have a space after.**
```r
labels_test = unlist(dtest[,1])
                            ^
```
[inst/site/makedata.R:25:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L25) *style:* **Use <-, not =, for assignment.**
```r
data_train = matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
           ^
```
[inst/site/makedata.R:25:36:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L25) *style:* **Commas should always have a space after.**
```r
data_train = matrix(unlist(dtrain[,-1]), nrow = length(labels_train))
                                   ^
```
[inst/site/makedata.R:26:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L26) *style:* **Use <-, not =, for assignment.**
```r
data_test = matrix(unlist(dtest[,-1]), nrow = length(labels_test))
          ^
```
[inst/site/makedata.R:26:34:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L26) *style:* **Commas should always have a space after.**
```r
data_test = matrix(unlist(dtest[,-1]), nrow = length(labels_test))
                                 ^
```
[inst/site/makedata.R:28:5:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L28) *style:* **Use <-, not =, for assignment.**
```r
CBF = list("labels_train" = labels_train, "data_train" = data_train,
    ^
```
[inst/site/makedata.R:35:72:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/makedata.R#L35) *style:* **Put spaces around all infix operators.**
```r
ecg0606 <- read.table("inst/test_data/ecg0606_1.csv", as.is = T, header=F)$V1
                                                                      ~^~
```
[inst/site/readme_examples.R:10:16:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L10) *style:* **Put spaces around all infix operators.**
```r
plot(x, y, type="l", col="blue",
              ~^~
```
[inst/site/readme_examples.R:10:25:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L10) *style:* **Put spaces around all infix operators.**
```r
plot(x, y, type="l", col="blue",
                       ~^~
```
[inst/site/readme_examples.R:11:10:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L11) *style:* **Put spaces around all infix operators.**
```r
     main="A scaled sine wave with a random noise and its z-normalization")
        ~^~
```
[inst/site/readme_examples.R:14:9:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L14) *style:* **Put spaces around all infix operators.**
```r
abline(h=c(1,-1), lty = 2, col = "gray50")
       ~^~
```
[inst/site/readme_examples.R:14:14:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/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/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/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/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/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/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/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/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/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:16:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Commas should always have a space after.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
               ^
```
[inst/site/readme_examples.R:24:17:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Put spaces around all infix operators.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
               ~^~
```
[inst/site/readme_examples.R:24:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Put spaces around all infix operators.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                 ~^~
```
[inst/site/readme_examples.R:24:22:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Commas should always have a space after.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                     ^
```
[inst/site/readme_examples.R:24:23:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Put spaces around all infix operators.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                     ~^~
```
[inst/site/readme_examples.R:24:25:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Put spaces around all infix operators.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                       ~^~
```
[inst/site/readme_examples.R:24:27:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Put spaces around all infix operators.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                         ~^~
```
[inst/site/readme_examples.R:24:30:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L24) *style:* **Commas should always have a space after.**
```r
abline(v = c(1,1+7/3,1+7/3*2,8), lty = 3, lwd = 2, col = "gray50")
                             ^
```
[inst/site/readme_examples.R:28:12:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Commas should always have a space after.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
           ^
```
[inst/site/readme_examples.R:28:22:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Commas should always have a space after.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                     ^
```
[inst/site/readme_examples.R:28:23:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Put spaces around all infix operators.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                     ~^~
```
[inst/site/readme_examples.R:28:25:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Put spaces around all infix operators.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                       ~^~
```
[inst/site/readme_examples.R:28:28:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Commas should always have a space after.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                           ^
```
[inst/site/readme_examples.R:28:38:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Commas should always have a space after.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                                     ^
```
[inst/site/readme_examples.R:28:41:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Put spaces around all infix operators.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                                       ~^~
```
[inst/site/readme_examples.R:28:44:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Commas should always have a space after.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                                           ^
```
[inst/site/readme_examples.R:28:47:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L28) *style:* **Put spaces around all infix operators.**
```r
segments(1,y_paa3[1],1+7/3,y_paa3[1],lwd=1,col="red")
                                             ~^~
```
[inst/site/readme_examples.R:29:9:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
       ~^~
```
[inst/site/readme_examples.R:29:11:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
         ~^~
```
[inst/site/readme_examples.R:29:13:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
           ~^~
```
[inst/site/readme_examples.R:29:15:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
             ~^~
```
[inst/site/readme_examples.R:29:18:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Commas should always have a space after.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                 ^
```
[inst/site/readme_examples.R:29:19:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                 ~^~
```
[inst/site/readme_examples.R:29:30:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Commas should always have a space after.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                             ^
```
[inst/site/readme_examples.R:29:33:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                               ~^~
```
[inst/site/readme_examples.R:29:40:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Commas should always have a space after.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                                       ^
```
[inst/site/readme_examples.R:29:43:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Put spaces around all infix operators.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                                         ~^~
```
[inst/site/readme_examples.R:29:47:](https://github.com/jMotif/jmotif-R/blob/fe14fe2d3b7e38894a196bf4a99bcc025424a1f2/inst/site/readme_examples.R#L29) *style:* **Commas should always have a space after.**
```r
points(x=1+7/3/2,y=y_paa3[1],col="red",pch=23,lwd=5)
                                              ^
```


TeamCity OSS :: Kubernetes Mesos :: 4 - Smoke Tests [Build 13329](https://teamcity.mesosphere.io/viewLog.html?buildId=116557&buildTypeId=Oss_KubernetesMesos_5SmokeTestsDockerMesos&guest=1) outcome was **SUCCESS**
Summary: Tests passed: 1, ignored: 216 Build time: 00:03:57