[R/get_gfed4.R:74:1:](https://github.com/ecmwf/caliver/blob/ed39dc9695ac994dc6ccbd9cbfe1692c5bc47ed6/R/get_gfed4.R#L74) *style:* **functions should have cyclomatic complexity of less than 15, this has 34.**
```r
get_gfed4 <- function(start_date = NULL,
^
```
[R/plot_fire_pdf.R:56:5:](https://github.com/ecmwf/caliver/blob/ed39dc9695ac994dc6ccbd9cbfe1692c5bc47ed6/R/plot_fire_pdf.R#L56) *style:* **Commented code should be removed.**
```r
  # ToDo: hdistance <- max(danger_classes) / 100
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/vdi.R:76:9:](https://github.com/ecmwf/caliver/blob/ed39dc9695ac994dc6ccbd9cbfe1692c5bc47ed6/R/vdi.R#L76) *style:* **Variable and function name style should be snake_case.**
```r
    rat$ID <- factor(x = rat$ID, levels = 1:5)
        ^~
```
[R/vdi.R:77:9:](https://github.com/ecmwf/caliver/blob/ed39dc9695ac994dc6ccbd9cbfe1692c5bc47ed6/R/vdi.R#L77) *style:* **Variable and function name style should be snake_case.**
```r
    rat$Danger <- factor(x = rat$Danger,
        ^~~~~~
```
[R/zzz.R:1:1:](https://github.com/ecmwf/caliver/blob/ed39dc9695ac994dc6ccbd9cbfe1692c5bc47ed6/R/zzz.R#L1) *style:* **Variable and function name style should be snake_case.**
```r
.onAttach <- function(...) {
^~~~~~~~~
```


Deployment failed with the following error:

~~~
Your `package.json` file is missing a `build` property inside the `script` property.
~~~


Nevermind I found my answer here https://github.com/laravel/docs/pull/5447/files#diff-e6fbd6eb4a701f2e57b69c2f4696dbaeR321


I started with CJXD distribution but used terraform/jx boot to create the cluster.

I came across a bug around `dir` in jenkins-x.yaml pipelines and tried to upgrade and couldn't.

I've now gotten past this.

I had to:
1. Buy a domain
2. In terraform - add external-dns service account, key, rolebindings, and kubernetes secret
3. Change jx boot config to enable externaldns, set the domain, and enable tls (first with staging)
4. Apply'd that - update failed near the end because vault didn't have https yet
5. Waited for dns to propagate
6. change boot config to use LE prod
7. Apply jx boot
8. It failed again this time it told me it couldn't find something, so I assumed that meant my version stream was updated
9. Update version stream
10. update jx cli
11. Apply jx boot again

And that final run succeeded... however, I am still seeing a bit of weirdness as two ingress routes did not get updated...

```
➜  ~ k get ingress --all-namespaces
NAMESPACE                         NAME                     HOSTS                                                              ADDRESS         PORTS     AGE
jx-darkstoregh-dashboard-2-pr-9   dashboard-2              dashboard-2.jx-xgh-dashboard-2-pr-9.104.198.21.14.nip.io   104.198.21.14   80        9d
jx-staging                        dashboard-2              dashboard-2.jx-staging.darkstoredev.com                            104.198.21.14   80, 443   16h
jx                                chartmuseum              chartmuseum-jx.darkstoredev.com                                    104.198.21.14   80, 443   15d
jx                                deck                     deck-jx.104.198.21.14.nip.io                                       104.198.21.14   80        15d
jx                                hook                     hook-jx.darkstoredev.com                                           104.198.21.14   80, 443   15d
jx                                jx-vault-darkstore-dev   vault-jx.darkstoredev.com                                          104.198.21.14   80, 443   15d
jx                                nexus                    nexus-jx.darkstoredev.com                                          104.198.21.14   80, 443   15d
jx                                tide                     tide-jx.104.198.21.14.nip.io                                       104.198.21.14   80        15d
server-2-pr-1                     server-2                 server-2.server-2-pr-1.darkstoredev.com                            104.198.21.14   80        10h
```


It should be rather `'array! <> type/1`. It should not use `head`, as source code blocks in R/S have a hidden header, so the blocks are not at the head.


TeamCity Bvcms / Build [Build 1968](https://builds.tpsdb.com/viewLog.html?buildId=8253&buildTypeId=Bvcms_Build) is now running


Successfully aliased the URL <https://front-font-1ngvcg50t.now.sh> to the following aliases:

* https://front-font.deep-impact.now.sh
* https://front-font-git-master.deep-impact.now.sh


Okay, I've got a fix and a new release.


Базовая стилизация предполагает и фоны. Насколько я понял, текущий ПР посвящен базовой стилизации хедера?

пулреквесты должны быть не ради пулреквестов. Вот ты работаешь 3-4 часа в день, значит, ты научился эффективно организовыватьрабочий процесс и ценишь время. Так и в этой отрасли. Жаль, что ты лишь порофлил над статьей о стадийности, но ведь дело-то какое: разделять фоны и шрифты - это вынос вперед ногами тайм-менеджмента. Один прочес макета или два - есть же разница?
Да и столько пулреквестов = это по времени немалая часть от самой задачи базовой стилизации на этом маленьком проекте ) надо ли оно?
Плюс если ты не почешешь весь макет сразу, ты проглядишь общие сущности. и у тебя будут by-design универсальные заголовки расписаны одинаково по каждому БЭМ-блоку ) и вообще эти блоки будут не по вариантам стилизации разбиты, как должно, а по контенту.


SQL execute in MySQL


[inst/unitTests/test_combine.R:2:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L2) *style:* **Put spaces around all infix operators.**
```r
data("mat_test", package="MetNet")
                       ~^~
```
[inst/unitTests/test_combine.R:5:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L5) *style:* **Put spaces around all infix operators.**
```r
mat_test <- cbind(mz=mz, mat_test)
                   ~^~
```
[inst/unitTests/test_combine.R:11:36:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L11) *style:* **Put spaces around all infix operators.**
```r
transformations <- data.frame(group=as.character(transformations[, 1]),
                                  ~^~
```
[inst/unitTests/test_combine.R:12:40:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L12) *style:* **Put spaces around all infix operators.**
```r
                                formula=as.character(transformations[, 2]),
                                      ~^~
```
[inst/unitTests/test_combine.R:13:37:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L13) *style:* **Put spaces around all infix operators.**
```r
                                mass=as.numeric(transformations[, 3]))
                                   ~^~
```
[inst/unitTests/test_combine.R:16:55:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L16) *style:* **Trailing whitespace is superfluous.**
```r
stat_adj <- createStatisticalAdjacency(mat_test[, -1],
                                                      ^
```
[inst/unitTests/test_combine.R:17:14:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L17) *style:* **Put spaces around all infix operators.**
```r
        model=c("clr", "aracne","pearson", "spearman", "bayes"))
            ~^~
```
[inst/unitTests/test_combine.R:17:33:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L17) *style:* **Commas should always have a space after.**
```r
        model=c("clr", "aracne","pearson", "spearman", "bayes"))
                                ^
```
[inst/unitTests/test_combine.R:19:50:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L19) *style:* **Trailing whitespace is superfluous.**
```r
struct_adj <- createStructuralAdjacency(mat_test,
                                                 ^
```
[inst/unitTests/test_combine.R:20:23:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L20) *style:* **Put spaces around all infix operators.**
```r
        transformation=transformations, ppm=5)
                     ~^~
```
[inst/unitTests/test_combine.R:20:44:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L20) *style:* **Put spaces around all infix operators.**
```r
        transformation=transformations, ppm=5)
                                          ~^~
```
[inst/unitTests/test_combine.R:22:51:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L22) *style:* **Trailing whitespace is superfluous.**
```r
## START unit test combineStructuralStatistical ##
                                                  ^
```
[inst/unitTests/test_combine.R:24:1:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L24) *style:* **Variable and function names should not be longer than 30 characters.**
```r
test_combine_structural_statistical <- function() {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_combine.R:25:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L25) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(combineStructuralStatistical(NULL, stat_adj))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_combine.R:25:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L25) *warning:* **no visible global function definition for ‘combineStructuralStatistical’**
```r
    checkException(combineStructuralStatistical(NULL, stat_adj))
                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_combine.R:25:55:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L25) *warning:* **no visible binding for global variable ‘stat_adj’**
```r
    checkException(combineStructuralStatistical(NULL, stat_adj))
                                                      ^~~~~~~~
```
[inst/unitTests/test_combine.R:26:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L26) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(combineStructuralStatistical(struct_adj[[1]], NULL))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_combine.R:26:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L26) *warning:* **no visible global function definition for ‘combineStructuralStatistical’**
```r
    checkException(combineStructuralStatistical(struct_adj[[1]], NULL))
                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_combine.R:26:49:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L26) *warning:* **no visible binding for global variable ‘struct_adj’**
```r
    checkException(combineStructuralStatistical(struct_adj[[1]], NULL))
                                                ^~~~~~~~~~
```
[inst/unitTests/test_combine.R:27:65:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L27) *style:* **Trailing whitespace is superfluous.**
```r
    checkException(combineStructuralStatistical(struct_adj[[1]],
                                                                ^
```
[inst/unitTests/test_combine.R:28:28:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L28) *style:* **Put spaces around all infix operators.**
```r
        stat_adj, threshold="a"))
                          ~^~
```
[inst/unitTests/test_combine.R:29:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L29) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(sum(cons_adj), 4)
    ^~~~~~~~~~~
```
[inst/unitTests/test_combine.R:29:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L29) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(sum(cons_adj), 4)
                    ^~~~~~~~
```
[inst/unitTests/test_combine.R:30:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L30) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(dim(cons_adj), c(7, 7))
    ^~~~~~~~~~~
```
[inst/unitTests/test_combine.R:30:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L30) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(dim(cons_adj), c(7, 7))
                    ^~~~~~~~
```
[inst/unitTests/test_combine.R:31:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L31) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(cons_adj), paste0("x", 1:7))
    ^~~~~~~~~~~
```
[inst/unitTests/test_combine.R:31:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L31) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(rownames(cons_adj), paste0("x", 1:7))
                         ^~~~~~~~
```
[inst/unitTests/test_combine.R:32:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L32) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(colnames(cons_adj), paste0("x", 1:7))
    ^~~~~~~~~~~
```
[inst/unitTests/test_combine.R:32:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L32) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(colnames(cons_adj), paste0("x", 1:7))
                         ^~~~~~~~
```
[inst/unitTests/test_combine.R:33:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L33) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(cons_adj), colnames(cons_adj))
    ^~~~~~~~~~~
```
[inst/unitTests/test_combine.R:33:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L33) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(rownames(cons_adj), colnames(cons_adj))
                         ^~~~~~~~
```
[inst/unitTests/test_combine.R:33:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L33) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkEquals(rownames(cons_adj), colnames(cons_adj))
                         ^~~~~~~~
```
[inst/unitTests/test_combine.R:34:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L34) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.matrix(cons_adj))
    ^~~~~~~~~
```
[inst/unitTests/test_combine.R:34:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L34) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkTrue(is.matrix(cons_adj))
                        ^~~~~~~~
```
[inst/unitTests/test_combine.R:35:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L35) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.numeric(cons_adj))
    ^~~~~~~~~
```
[inst/unitTests/test_combine.R:35:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L35) *warning:* **no visible binding for global variable ‘cons_adj’**
```r
    checkTrue(is.numeric(cons_adj))
                         ^~~~~~~~
```
[inst/unitTests/test_combine.R:37:49:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_combine.R#L37) *style:* **Trailing whitespace is superfluous.**
```r
## END unit test combineStructuralStatistical ##
                                                ^
```
[inst/unitTests/test_statistical.R:2:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L2) *style:* **Put spaces around all infix operators.**
```r
data("mat_test", package="MetNet")
                       ~^~
```
[inst/unitTests/test_statistical.R:5:43:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L5) *style:* **Put spaces around all infix operators.**
```r
lasso_mat <- lasso(t(mat_test_z), parallel=FALSE, PFER=0.75, cutoff=0.95)
                                         ~^~
```
[inst/unitTests/test_statistical.R:5:55:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L5) *style:* **Put spaces around all infix operators.**
```r
lasso_mat <- lasso(t(mat_test_z), parallel=FALSE, PFER=0.75, cutoff=0.95)
                                                     ~^~
```
[inst/unitTests/test_statistical.R:5:68:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L5) *style:* **Put spaces around all infix operators.**
```r
lasso_mat <- lasso(t(mat_test_z), parallel=FALSE, PFER=0.75, cutoff=0.95)
                                                                  ~^~
```
[inst/unitTests/test_statistical.R:7:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L7) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(lasso(mat_test))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:7:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L7) *warning:* **no visible global function definition for ‘lasso’, Did you mean 'class'?**
```r
    checkException(lasso(mat_test))
                   ^~~~~
```
[inst/unitTests/test_statistical.R:7:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L7) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkException(lasso(mat_test))
                         ^~~~~~~~
```
[inst/unitTests/test_statistical.R:9:8:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L9) *style:* **Commented code should be removed.**
```r
    ## checkEquals(sum(lasso_mat), 2) ##
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:9:41:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L9) *style:* **Trailing whitespace is superfluous.**
```r
    ## checkEquals(sum(lasso_mat), 2) ##
                                        ^
```
[inst/unitTests/test_statistical.R:10:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L10) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(lasso_mat), colnames(lasso_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:10:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L10) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(rownames(lasso_mat), colnames(lasso_mat))
                         ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:10:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L10) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(rownames(lasso_mat), colnames(lasso_mat))
                         ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:11:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L11) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(lasso_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:11:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L11) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(rownames(lasso_mat), rownames(mat_test))
                         ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:11:47:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L11) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(lasso_mat), rownames(mat_test))
                                              ^~~~~~~~
```
[inst/unitTests/test_statistical.R:12:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L12) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(ncol(lasso_mat), nrow(lasso_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:12:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L12) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(ncol(lasso_mat), nrow(lasso_mat))
                     ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:12:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L12) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(ncol(lasso_mat), nrow(lasso_mat))
                     ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:13:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L13) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(nrow(lasso_mat), nrow(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:13:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L13) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkEquals(nrow(lasso_mat), nrow(mat_test))
                     ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:13:39:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L13) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(nrow(lasso_mat), nrow(mat_test))
                                      ^~~~~~~~
```
[inst/unitTests/test_statistical.R:14:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L14) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.numeric(lasso_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:14:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L14) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkTrue(is.numeric(lasso_mat))
                         ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:15:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L15) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.matrix(lasso_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:15:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L15) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkTrue(is.matrix(lasso_mat))
                        ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:16:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L16) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(all(lasso_mat %in% c(0, 1)))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:16:19:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L16) *warning:* **no visible binding for global variable ‘lasso_mat’**
```r
    checkTrue(all(lasso_mat %in% c(0, 1)))
                  ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:20:35:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L20) *style:* **Trailing whitespace is superfluous.**
```r
## START unit test randomForest ##
                                  ^
```
[inst/unitTests/test_statistical.R:21:1:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L21) *style:* **Variable and function name style should be snake_case.**
```r
randomForest_mat <- randomForest(mat_test, parallel=FALSE, num.cores=1)
^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:21:52:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L21) *style:* **Put spaces around all infix operators.**
```r
randomForest_mat <- randomForest(mat_test, parallel=FALSE, num.cores=1)
                                                  ~^~
```
[inst/unitTests/test_statistical.R:21:69:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L21) *style:* **Put spaces around all infix operators.**
```r
randomForest_mat <- randomForest(mat_test, parallel=FALSE, num.cores=1)
                                                                   ~^~
```
[inst/unitTests/test_statistical.R:22:1:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L22) *style:* **Variable and function name style should be snake_case.**
```r
test_randomForest <- function() {
^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:24:8:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L24) *style:* **Commented code should be removed.**
```r
    ## checkEquals(sum(randomForest_mat), 31) ##
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:24:49:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L24) *style:* **Trailing whitespace is superfluous.**
```r
    ## checkEquals(sum(randomForest_mat), 31) ##
                                                ^
```
[inst/unitTests/test_statistical.R:25:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L25) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(randomForest_mat), colnames(randomForest_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:25:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L25) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(rownames(randomForest_mat), colnames(randomForest_mat))
                         ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:25:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L25) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(rownames(randomForest_mat), colnames(randomForest_mat))
                         ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:26:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L26) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(randomForest_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:26:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L26) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(rownames(randomForest_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:26:54:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L26) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(randomForest_mat), rownames(mat_test))
                                                     ^~~~~~~~
```
[inst/unitTests/test_statistical.R:27:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L27) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(ncol(randomForest_mat), nrow(randomForest_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:27:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L27) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(ncol(randomForest_mat), nrow(randomForest_mat))
                     ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:27:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L27) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(ncol(randomForest_mat), nrow(randomForest_mat))
                     ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:28:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L28) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(nrow(randomForest_mat), nrow(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:28:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L28) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkEquals(nrow(randomForest_mat), nrow(mat_test))
                     ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:28:46:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L28) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(nrow(randomForest_mat), nrow(mat_test))
                                             ^~~~~~~~
```
[inst/unitTests/test_statistical.R:29:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L29) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.numeric(randomForest_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:29:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L29) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkTrue(is.numeric(randomForest_mat))
                         ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:30:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L30) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.matrix(randomForest_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:30:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L30) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkTrue(is.matrix(randomForest_mat))
                        ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:31:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L31) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(all(randomForest_mat %in% c(0, 1)))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:31:19:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L31) *warning:* **no visible binding for global variable ‘randomForest_mat’**
```r
    checkTrue(all(randomForest_mat %in% c(0, 1)))
                  ^~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:33:33:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L33) *style:* **Trailing whitespace is superfluous.**
```r
## END unit test randomForest ##
                                ^
```
[inst/unitTests/test_statistical.R:35:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L35) *style:* **Trailing whitespace is superfluous.**
```r
## START unit test clr ##
                         ^
```
[inst/unitTests/test_statistical.R:40:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L40) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(clr(mi_mat_test_z, clr_threshold="a"))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:40:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L40) *warning:* **no visible global function definition for ‘clr’, Did you mean 'cor'?**
```r
    checkException(clr(mi_mat_test_z, clr_threshold="a"))
                   ^~~
```
[inst/unitTests/test_statistical.R:40:24:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L40) *warning:* **no visible binding for global variable ‘mi_mat_test_z’**
```r
    checkException(clr(mi_mat_test_z, clr_threshold="a"))
                       ^~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:40:52:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L40) *style:* **Put spaces around all infix operators.**
```r
    checkException(clr(mi_mat_test_z, clr_threshold="a"))
                                                  ~^~
```
[inst/unitTests/test_statistical.R:41:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L41) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(sum(clr_mat), 30)
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:41:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L41) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(sum(clr_mat), 30)
                    ^~~~~~~
```
[inst/unitTests/test_statistical.R:42:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L42) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(clr_mat), colnames(clr_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:42:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L42) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(rownames(clr_mat), colnames(clr_mat))
                         ^~~~~~~
```
[inst/unitTests/test_statistical.R:42:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L42) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(rownames(clr_mat), colnames(clr_mat))
                         ^~~~~~~
```
[inst/unitTests/test_statistical.R:43:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L43) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(clr_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:43:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L43) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(rownames(clr_mat), rownames(mat_test))
                         ^~~~~~~
```
[inst/unitTests/test_statistical.R:43:45:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L43) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(clr_mat), rownames(mat_test))
                                            ^~~~~~~~
```
[inst/unitTests/test_statistical.R:44:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L44) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(ncol(clr_mat), nrow(clr_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:44:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L44) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(ncol(clr_mat), nrow(clr_mat))
                     ^~~~~~~
```
[inst/unitTests/test_statistical.R:44:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L44) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(ncol(clr_mat), nrow(clr_mat))
                     ^~~~~~~
```
[inst/unitTests/test_statistical.R:45:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L45) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(nrow(clr_mat), nrow(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:45:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L45) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkEquals(nrow(clr_mat), nrow(mat_test))
                     ^~~~~~~
```
[inst/unitTests/test_statistical.R:45:37:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L45) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(nrow(clr_mat), nrow(mat_test))
                                    ^~~~~~~~
```
[inst/unitTests/test_statistical.R:46:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L46) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.numeric(clr_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:46:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L46) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkTrue(is.numeric(clr_mat))
                         ^~~~~~~
```
[inst/unitTests/test_statistical.R:47:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L47) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.matrix(clr_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:47:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L47) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkTrue(is.matrix(clr_mat))
                        ^~~~~~~
```
[inst/unitTests/test_statistical.R:48:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L48) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(all(clr_mat %in% c(0, 1)))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:48:19:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L48) *warning:* **no visible binding for global variable ‘clr_mat’**
```r
    checkTrue(all(clr_mat %in% c(0, 1)))
                  ^~~~~~~
```
[inst/unitTests/test_statistical.R:55:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L55) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(aracne(mi_mat_test_z, aracne_threshold="a"))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:55:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L55) *warning:* **no visible global function definition for ‘aracne’, Did you mean 'trace'?**
```r
    checkException(aracne(mi_mat_test_z, aracne_threshold="a"))
                   ^~~~~~
```
[inst/unitTests/test_statistical.R:55:27:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L55) *warning:* **no visible binding for global variable ‘mi_mat_test_z’**
```r
    checkException(aracne(mi_mat_test_z, aracne_threshold="a"))
                          ^~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:55:58:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L55) *style:* **Put spaces around all infix operators.**
```r
    checkException(aracne(mi_mat_test_z, aracne_threshold="a"))
                                                        ~^~
```
[inst/unitTests/test_statistical.R:56:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L56) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(aracne(mi_mat_test_z, eps="a"))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:56:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L56) *warning:* **no visible global function definition for ‘aracne’, Did you mean 'trace'?**
```r
    checkException(aracne(mi_mat_test_z, eps="a"))
                   ^~~~~~
```
[inst/unitTests/test_statistical.R:56:27:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L56) *warning:* **no visible binding for global variable ‘mi_mat_test_z’**
```r
    checkException(aracne(mi_mat_test_z, eps="a"))
                          ^~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:56:45:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L56) *style:* **Put spaces around all infix operators.**
```r
    checkException(aracne(mi_mat_test_z, eps="a"))
                                           ~^~
```
[inst/unitTests/test_statistical.R:57:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L57) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(sum(aracne_mat), 31)
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:57:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L57) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(sum(aracne_mat), 31)
                    ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:58:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L58) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(aracne_mat), colnames(aracne_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:58:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L58) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(rownames(aracne_mat), colnames(aracne_mat))
                         ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:58:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L58) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(rownames(aracne_mat), colnames(aracne_mat))
                         ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:59:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L59) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(aracne_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:59:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L59) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(rownames(aracne_mat), rownames(mat_test))
                         ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:59:48:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L59) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(aracne_mat), rownames(mat_test))
                                               ^~~~~~~~
```
[inst/unitTests/test_statistical.R:60:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L60) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(ncol(aracne_mat), nrow(aracne_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:60:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L60) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(ncol(aracne_mat), nrow(aracne_mat))
                     ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:60:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L60) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(ncol(aracne_mat), nrow(aracne_mat))
                     ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:61:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L61) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(nrow(aracne_mat), nrow(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:61:22:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L61) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkEquals(nrow(aracne_mat), nrow(mat_test))
                     ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:61:40:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L61) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(nrow(aracne_mat), nrow(mat_test))
                                       ^~~~~~~~
```
[inst/unitTests/test_statistical.R:62:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L62) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.numeric(aracne_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:62:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L62) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkTrue(is.numeric(aracne_mat))
                         ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:63:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L63) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(is.matrix(aracne_mat))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:63:25:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L63) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkTrue(is.matrix(aracne_mat))
                        ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:64:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L64) *warning:* **no visible global function definition for ‘checkTrue’**
```r
    checkTrue(all(aracne_mat %in% c(0, 1)))
    ^~~~~~~~~
```
[inst/unitTests/test_statistical.R:64:19:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L64) *warning:* **no visible binding for global variable ‘aracne_mat’**
```r
    checkTrue(all(aracne_mat %in% c(0, 1)))
                  ^~~~~~~~~~
```
[inst/unitTests/test_statistical.R:66:27:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L66) *style:* **Trailing whitespace is superfluous.**
```r
## END unit test aracne ##
                          ^
```
[inst/unitTests/test_statistical.R:69:48:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L69) *style:* **Put spaces around all infix operators.**
```r
correlation_p_mat <- correlation(mat_test, type="pearson")
                                              ~^~
```
[inst/unitTests/test_statistical.R:70:50:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L70) *style:* **Put spaces around all infix operators.**
```r
correlation_p_p_mat <- correlation(mat_test, type="pearson_partial")
                                                ~^~
```
[inst/unitTests/test_statistical.R:71:51:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L71) *style:* **Put spaces around all infix operators.**
```r
correlation_p_sp_mat <- correlation(mat_test, type="pearson_semipartial")
                                                 ~^~
```
[inst/unitTests/test_statistical.R:72:48:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L72) *style:* **Put spaces around all infix operators.**
```r
correlation_s_mat <- correlation(mat_test, type="spearman")
                                              ~^~
```
[inst/unitTests/test_statistical.R:73:50:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L73) *style:* **Put spaces around all infix operators.**
```r
correlation_s_p_mat <- correlation(mat_test, type="spearman_partial")
                                                ~^~
```
[inst/unitTests/test_statistical.R:74:51:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L74) *style:* **Put spaces around all infix operators.**
```r
correlation_s_sp_mat <- correlation(mat_test, type="spearman_semipartial")
                                                 ~^~
```
[inst/unitTests/test_statistical.R:77:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L77) *warning:* **no visible global function definition for ‘checkException’**
```r
    checkException(correlation(mat_test, correlation_threshold="a"))
    ^~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:77:20:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L77) *warning:* **no visible global function definition for ‘correlation’**
```r
    checkException(correlation(mat_test, correlation_threshold="a"))
                   ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:77:32:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L77) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkException(correlation(mat_test, correlation_threshold="a"))
                               ^~~~~~~~
```
[inst/unitTests/test_statistical.R:77:63:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L77) *style:* **Put spaces around all infix operators.**
```r
    checkException(correlation(mat_test, correlation_threshold="a"))
                                                             ~^~
```
[inst/unitTests/test_statistical.R:78:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L78) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(sum(correlation_p_mat), 47)
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:78:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L78) *warning:* **no visible binding for global variable ‘correlation_p_mat’**
```r
    checkEquals(sum(correlation_p_mat), 47)
                    ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:79:42:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L79) *style:* **Trailing whitespace is superfluous.**
```r
    checkEquals(sum(correlation(mat_test,
                                         ^
```
[inst/unitTests/test_statistical.R:80:27:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L80) *style:* **Put spaces around all infix operators.**
```r
        correlation_adjust="bonferroni", correlation_threshold=1e-11)), 21)
                         ~^~
```
[inst/unitTests/test_statistical.R:80:63:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L80) *style:* **Put spaces around all infix operators.**
```r
        correlation_adjust="bonferroni", correlation_threshold=1e-11)), 21)
                                                             ~^~
```
[inst/unitTests/test_statistical.R:81:42:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L81) *style:* **Trailing whitespace is superfluous.**
```r
    checkEquals(sum(correlation(mat_test,
                                         ^
```
[inst/unitTests/test_statistical.R:82:27:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L82) *style:* **Put spaces around all infix operators.**
```r
        correlation_adjust="none", correlation_threshold=1e-11)), 33)
                         ~^~
```
[inst/unitTests/test_statistical.R:82:57:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L82) *style:* **Put spaces around all infix operators.**
```r
        correlation_adjust="none", correlation_threshold=1e-11)), 33)
                                                       ~^~
```
[inst/unitTests/test_statistical.R:83:7:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L83) *style:* **Commented code should be removed.**
```r
    ##checkEquals(sum(correlation_p_p_mat), 9)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:84:7:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L84) *style:* **Commented code should be removed.**
```r
    ##checkEquals(sum(correlation_p_sp_mat), 7)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:85:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L85) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(sum(correlation_s_mat), 47)
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:85:21:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L85) *warning:* **no visible binding for global variable ‘correlation_s_mat’**
```r
    checkEquals(sum(correlation_s_mat), 47)
                    ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:86:7:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L86) *style:* **Commented code should be removed.**
```r
    ##checkEquals(sum(correlation_s_p_mat, na.rm=TRUE), 19)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:87:7:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L87) *style:* **Commented code should be removed.**
```r
    ##checkEquals(sum(correlation_s_sp_mat, na.rm=TRUE), 7)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:88:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L88) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_mat), colnames(correlation_p_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:88:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L88) *warning:* **no visible binding for global variable ‘correlation_p_mat’**
```r
    checkEquals(rownames(correlation_p_mat), colnames(correlation_p_mat))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:88:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L88) *warning:* **no visible binding for global variable ‘correlation_p_mat’**
```r
    checkEquals(rownames(correlation_p_mat), colnames(correlation_p_mat))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:89:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L89) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_p_mat), colnames(correlation_p_p_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:89:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L89) *warning:* **no visible binding for global variable ‘correlation_p_p_mat’**
```r
    checkEquals(rownames(correlation_p_p_mat), colnames(correlation_p_p_mat))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:89:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L89) *warning:* **no visible binding for global variable ‘correlation_p_p_mat’**
```r
    checkEquals(rownames(correlation_p_p_mat), colnames(correlation_p_p_mat))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:90:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L90) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_sp_mat), colnames(correlation_p_sp_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:90:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L90) *warning:* **no visible binding for global variable ‘correlation_p_sp_mat’**
```r
    checkEquals(rownames(correlation_p_sp_mat), colnames(correlation_p_sp_mat))
                         ^~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:90:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L90) *warning:* **no visible binding for global variable ‘correlation_p_sp_mat’**
```r
    checkEquals(rownames(correlation_p_sp_mat), colnames(correlation_p_sp_mat))
                         ^~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:91:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L91) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_s_mat), colnames(correlation_s_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:91:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L91) *warning:* **no visible binding for global variable ‘correlation_s_mat’**
```r
    checkEquals(rownames(correlation_s_mat), colnames(correlation_s_mat))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:91:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L91) *warning:* **no visible binding for global variable ‘correlation_s_mat’**
```r
    checkEquals(rownames(correlation_s_mat), colnames(correlation_s_mat))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:92:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L92) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_s_p_mat), colnames(correlation_s_p_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:92:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L92) *warning:* **no visible binding for global variable ‘correlation_s_p_mat’**
```r
    checkEquals(rownames(correlation_s_p_mat), colnames(correlation_s_p_mat))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:92:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L92) *warning:* **no visible binding for global variable ‘correlation_s_p_mat’**
```r
    checkEquals(rownames(correlation_s_p_mat), colnames(correlation_s_p_mat))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:93:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L93) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_s_sp_mat), colnames(correlation_s_sp_mat))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:93:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L93) *warning:* **no visible binding for global variable ‘correlation_s_sp_mat’**
```r
    checkEquals(rownames(correlation_s_sp_mat), colnames(correlation_s_sp_mat))
                         ^~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:93:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L93) *warning:* **no visible binding for global variable ‘correlation_s_sp_mat’**
```r
    checkEquals(rownames(correlation_s_sp_mat), colnames(correlation_s_sp_mat))
                         ^~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:94:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L94) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:94:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L94) *warning:* **no visible binding for global variable ‘correlation_p_mat’**
```r
    checkEquals(rownames(correlation_p_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:94:55:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L94) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(correlation_p_mat), rownames(mat_test))
                                                      ^~~~~~~~
```
[inst/unitTests/test_statistical.R:95:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L95) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_p_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:95:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L95) *warning:* **no visible binding for global variable ‘correlation_p_p_mat’**
```r
    checkEquals(rownames(correlation_p_p_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:95:57:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L95) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(correlation_p_p_mat), rownames(mat_test))
                                                        ^~~~~~~~
```
[inst/unitTests/test_statistical.R:96:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L96) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_p_sp_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:96:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L96) *warning:* **no visible binding for global variable ‘correlation_p_sp_mat’**
```r
    checkEquals(rownames(correlation_p_sp_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:96:58:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L96) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(correlation_p_sp_mat), rownames(mat_test))
                                                         ^~~~~~~~
```
[inst/unitTests/test_statistical.R:97:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L97) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_s_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:97:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L97) *warning:* **no visible binding for global variable ‘correlation_s_mat’**
```r
    checkEquals(rownames(correlation_s_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:97:55:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L97) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(correlation_s_mat), rownames(mat_test))
                                                      ^~~~~~~~
```
[inst/unitTests/test_statistical.R:98:5:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L98) *warning:* **no visible global function definition for ‘checkEquals’**
```r
    checkEquals(rownames(correlation_s_p_mat), rownames(mat_test))
    ^~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:98:26:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L98) *warning:* **no visible binding for global variable ‘correlation_s_p_mat’**
```r
    checkEquals(rownames(correlation_s_p_mat), rownames(mat_test))
                         ^~~~~~~~~~~~~~~~~~~
```
[inst/unitTests/test_statistical.R:98:57:](https://github.com/tnaake/MetNet/blob/f9a4d33f7bd5bd317e809d88705354120520cd16/inst/unitTests/test_statistical.R#L98) *warning:* **no visible binding for global variable ‘mat_test’**
```r
    checkEquals(rownames(correlation_s_p_mat), rownames(mat_test))
                                                        ^~~~~~~~
```


Successfully aliased the URL <https://mcdcdpportal-1m8b8lrhs.now.sh> to the following aliases:

* https://mcd-cdp-portal.mkr-js-prod.now.sh
* https://mcd-cdp-portal-git-develop.mkr-js-prod.now.sh


[R/ods_find_higher_geographies.R:17:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L17) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_higher_geographies.R:19:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L19) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_higher_geographies.R:22:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L22) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_higher_geographies.R:25:60:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L25) *style:* **Commented code should be removed.**
```r
    ?data <http://purl.org/linked-data/sdmx/2009/dimension#refArea> ?geographyURI.
                                                           ^~~~~~~~~~~~~~~~~~~~~~~
```
[R/ods_find_higher_geographies.R:33:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L33) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_higher_geographies.R:35:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L35) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_higher_geographies.R:37:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_higher_geographies.R#L37) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_lower_geographies.R:17:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L17) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_lower_geographies.R:19:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L19) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_lower_geographies.R:22:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L22) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~~~~~~~~~~~~~
```
[R/ods_find_lower_geographies.R:25:74:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L25) *style:* **Commented code should be removed.**
```r
                  ?data <http://purl.org/linked-data/sdmx/2009/dimension#refArea> ?geographyURI.
                                                                         ^~~~~~~~~~~~~~~~~~~~~~~
```
[R/ods_find_lower_geographies.R:33:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L33) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_lower_geographies.R:35:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L35) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_find_lower_geographies.R:37:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_find_lower_geographies.R#L37) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_get_csv.R:30:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_get_csv.R#L30) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:21:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L21) *style:* **functions should have cyclomatic complexity of less than 15, this has 16.**
```r
ods_print_query <- function(dataset,
^
```
[R/ods_print_query.R:26:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L26) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:43:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L43) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:56:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L56) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:63:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L63) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:75:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L75) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:78:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L78) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:81:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L81) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:101:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L101) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:103:5:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L103) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(!is.null(geography)) {
    ^
```
[R/ods_print_query.R:104:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L104) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:106:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L106) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:112:58:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L112) *style:* **Only use double-quotes.**
```r
                                                   (stop('Geography code not in sc, la, hd, iz, or dz'))
                                                         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ods_print_query.R:114:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L114) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:115:151:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L115) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    query_addition <- paste0("filter (strstarts(strafter(str(?refAreaURI),'http://statistics.gov.scot/id/statistical-geography/'),'", geo_code, "'))." )
                                                                                ^
```
[R/ods_print_query.R:116:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L116) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:119:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L119) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:123:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L123) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:129:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L129) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:131:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L131) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:134:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L134) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:142:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L142) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~~~
```
[R/ods_print_query.R:159:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L159) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:161:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L161) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/ods_print_query.R:163:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L163) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:166:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L166) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:169:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L169) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ods_print_query.R:171:1:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/R/ods_print_query.R#L171) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[tests/testthat/test_ods_dataset.R:39:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_dataset.R#L39) *style:* **Commented code should be removed.**
```r
#  skip_on_cran()
   ^~~~~~~~~~~~~~
```
[tests/testthat/test_ods_dataset.R:40:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_dataset.R#L40) *style:* **Commented code should be removed.**
```r
#  expect_equal(ods_dataset(dataset = "average-household-size", geography = "S12000039")$refArea[1], "West Dunbartonshire")
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_dataset.R:44:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_dataset.R#L44) *style:* **Commented code should be removed.**
```r
#  skip_on_cran()
   ^~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:1:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L1) *style:* **Commented code should be removed.**
```r
#context("ods_print_query")
 ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:3:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L3) *style:* **Commented code should be removed.**
```r
#expected_return_value1 <- "PREFIX qb: <http://purl.org/linked-data/cube#>"
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:4:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L4) *style:* **Commented code should be removed.**
```r
#expected_return_value2 <- "PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#>"
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:5:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L5) *style:* **Commented code should be removed.**
```r
#expected_return_value3 <- "PREFIX xsd: <http://www.w3.org/2001/XMLSchema#>"
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:6:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L6) *style:* **Commented code should be removed.**
```r
#expected_return_value4 <- "select  \\?value where \\{ \\?data qb:dataSet <http://statistics\\.gov\\.scot/data/average-house-size>\\. \\?data  \\.  rdfs:label \\. \\?data  \\.  rdfs:label \\. \\?data \\?measureTypeURI \\?value\\. \\}"
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:7:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L7) *style:* **Commented code should be removed.**
```r
#expected_return_value5 <- "select  \\?value where \\{ \\?data qb:dataSet <http://statistics\\.gov\\.scot/data/average-house-size>\\. \\?data  \\.  rdfs:label \\. \\?data  \\.  rdfs:label \\. FILTER \\(\\?refPeriod >= '2017'\\^\\^xsd:date && \\?refPeriod <= '2018'\\^\\^xsd:date\\) \\?data \\?measureTypeURI \\?value\\. \\}"
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:9:2:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L9) *style:* **Commented code should be removed.**
```r
#printed_query <- ods_print_query("average-house-size")
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:15:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L15) *style:* **Commented code should be removed.**
```r
#  skip_on_cran()
   ^~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:16:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L16) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query, expected_return_value1)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:17:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L17) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query, expected_return_value2)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:18:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L18) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query, expected_return_value3)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:19:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L19) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query, expected_return_value4)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:23:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L23) *style:* **Commented code should be removed.**
```r
#  skip_on_cran()
   ^~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:24:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L24) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query_with_filter, expected_return_value1)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:25:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L25) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query_with_filter, expected_return_value2)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:26:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L26) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query_with_filter, expected_return_value3)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_ods_print_query.R:27:4:](https://github.com/DataScienceScotland/opendatascot/blob/6e5426f26f842af913e20087cc16c649751838fd/tests/testthat/test_ods_print_query.R#L27) *style:* **Commented code should be removed.**
```r
#  expect_match(printed_query_with_filter, expected_return_value5)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```