[R/AES.R:76:34:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L76) *style:* **Put spaces around all infix operators.**
```r
            for (i in seq_len(len/16)) {
                                ~^~
```
[R/AES.R:77:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L77) *style:* **Put spaces around all infix operators.**
```r
                ind <- (i - 1)*16 + 1:16
                             ~^~
```
[R/AES.R:85:29:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L85) *style:* **Put spaces around all infix operators.**
```r
            result <- raw(16*blocks)
                           ~^~
```
[R/AES.R:88:26:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L88) *style:* **Put spaces around all infix operators.**
```r
                result[16*(i - 1) + 1:16] <- IV
                        ~^~
```
[R/AES.R:110:34:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L110) *style:* **Put spaces around all infix operators.**
```r
            for (i in seq_len(len/16)) {
                                ~^~
```
[R/AES.R:111:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/AES.R#L111) *style:* **Put spaces around all infix operators.**
```r
                ind <- (i - 1)*16 + 1:16
                             ~^~
```
[R/hmac.R:34:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
          ^~~
```
[R/hmac.R:34:27:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                         ~^~
```
[R/hmac.R:34:43:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                                         ~^~
```
[R/hmac.R:34:53:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                                                   ~^~
```
[tests/testthat/test-AES.R:25:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L25) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:27:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L27) *style:* **lines should not be more than 80 characters.**
```r
aes192key       <- hextextToRaw("000102030405060708090a0b0c0d0e0f1011121314151617")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-AES.R:33:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L33) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes192, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:35:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L35) *style:* **lines should not be more than 80 characters.**
```r
aes256key       <- hextextToRaw("000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-AES.R:41:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L41) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes256, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:48:71:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L48) *style:* **Put spaces around all infix operators.**
```r
                                "f69f2445df4f9b17ad2b417be66c3710",sep=""))
                                                                     ~^~
```
[tests/testthat/test-AES.R:54:74:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L54) *style:* **Put spaces around all infix operators.**
```r
                                   "7b0c785e27e8ad3f8223207104725dd4",sep=""))
                                                                        ~^~
```
[tests/testthat/test-AES.R:59:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L59) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(ecb128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:64:75:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L64) *style:* **Put spaces around all infix operators.**
```r
                                    "3ff1caa1681fac09120eca307586e1a7",sep=""))
                                                                         ~^~
```
[tests/testthat/test-AES.R:66:21:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L66) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:66:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L66) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:70:21:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L70) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:70:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L70) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:71:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L71) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(cbc128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:76:74:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L76) *style:* **Put spaces around all infix operators.**
```r
                                   "1e031dda2fbe03d1792170a0f3009cee",sep=""))
                                                                        ~^~
```
[tests/testthat/test-AES.R:78:21:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L78) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:78:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L78) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:82:21:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L82) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:82:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L82) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:83:55:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-AES.R#L83) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(ctr128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-digest.R:17:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L17) *style:* **Put spaces around all infix operators.**
```r
            "345678901234567890", sep=""))
                                    ~^~
```
[tests/testthat/test-digest.R:27:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L27) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=md5Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:28:41:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L28) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE)
                                       ~^~
```
[tests/testthat/test-digest.R:34:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L34) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=md5Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:35:41:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L35) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE, raw=TRUE)
                                       ~^~
```
[tests/testthat/test-digest.R:35:52:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L35) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE, raw=TRUE)
                                                  ~^~
```
[tests/testthat/test-digest.R:50:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L50) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha1Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:51:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L51) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE)
                                    ~^~
```
[tests/testthat/test-digest.R:51:56:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L51) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE)
                                                      ~^~
```
[tests/testthat/test-digest.R:57:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L57) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha1Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:58:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                    ~^~
```
[tests/testthat/test-digest.R:58:56:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                                      ~^~
```
[tests/testthat/test-digest.R:58:67:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                                                 ~^~
```
[tests/testthat/test-digest.R:69:13:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L69) *style:* **Put spaces around all infix operators.**
```r
sha512Input <-c(
            ^~~
```
[tests/testthat/test-digest.R:74:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L74) *style:* **lines should not be more than 80 characters.**
```r
    "cf83e1357eefb8bdf1542850d66d8007d620e4050b5715dc83f4a921d36ce9ce47d0d13c5d85f2b0ff8318d2877eec2f63b931bd47417a81a538327af927da3e",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-digest.R:75:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L75) *style:* **lines should not be more than 80 characters.**
```r
    "91ea1245f20d46ae9a037a989f54f1f790f0a47607eeb8a14d12890cea77a1bbc6c7ed9cf205e67b7f2b8fd4c7dfd3a7a8617e45f3c463d481c7e586c39ac1ed")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-digest.R:77:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L77) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha512Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:78:42:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L78) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE)
                                        ~^~
```
[tests/testthat/test-digest.R:78:62:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L78) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE)
                                                            ~^~
```
[tests/testthat/test-digest.R:84:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L84) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha512Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:85:42:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                        ~^~
```
[tests/testthat/test-digest.R:85:62:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                                            ~^~
```
[tests/testthat/test-digest.R:85:73:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                                                       ~^~
```
[tests/testthat/test-digest.R:106:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L106) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=crc32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:107:40:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L107) *style:* **Put spaces around all infix operators.**
```r
    crc32 <- digest(crc32Input[i], algo="crc32", serialize=FALSE)
                                      ~^~
```
[tests/testthat/test-digest.R:107:59:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L107) *style:* **Put spaces around all infix operators.**
```r
    crc32 <- digest(crc32Input[i], algo="crc32", serialize=FALSE)
                                                         ~^~
```
[tests/testthat/test-digest.R:113:27:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L113) *style:* **Put spaces around all infix operators.**
```r
sha1 <- digest("abc", algo="sha1", serialize=FALSE)
                         ~^~
```
[tests/testthat/test-digest.R:113:45:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L113) *style:* **Put spaces around all infix operators.**
```r
sha1 <- digest("abc", algo="sha1", serialize=FALSE)
                                           ~^~
```
[tests/testthat/test-digest.R:117:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L117) *style:* **Put spaces around all infix operators.**
```r
cat(digest(list(LETTERS, data.frame(a=letters[1:5],
                                    ~^~
```
[tests/testthat/test-digest.R:118:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L118) *style:* **Put spaces around all infix operators.**
```r
                                    b=matrix(1:10,
                                    ~^~
```
[tests/testthat/test-digest.R:119:41:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L119) *style:* **Put spaces around all infix operators.**
```r
                                    ncol=2)))), "\n")
                                       ~^~
```
[tests/testthat/test-digest.R:131:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L131) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=xxhash32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:132:46:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L132) *style:* **Put spaces around all infix operators.**
```r
    xxhash32 <- digest(xxhash32Input[i], algo="xxhash32", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:132:68:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L132) *style:* **Put spaces around all infix operators.**
```r
    xxhash32 <- digest(xxhash32Input[i], algo="xxhash32", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:147:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L147) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=xxhash64Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:148:46:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L148) *style:* **Put spaces around all infix operators.**
```r
    xxhash64 <- digest(xxhash64Input[i], algo="xxhash64", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:148:68:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L148) *style:* **Put spaces around all infix operators.**
```r
    xxhash64 <- digest(xxhash64Input[i], algo="xxhash64", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:163:20:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L163) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=murmur32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:164:46:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L164) *style:* **Put spaces around all infix operators.**
```r
    murmur32 <- digest(murmur32Input[i], algo="murmur32", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:164:68:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L164) *style:* **Put spaces around all infix operators.**
```r
    murmur32 <- digest(murmur32Input[i], algo="murmur32", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:170:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L170) *style:* **Put spaces around all infix operators.**
```r
fname <- system.file("GPL-2", package="digest")
                                    ~^~
```
[tests/testthat/test-digest.R:174:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                             ~^~
```
[tests/testthat/test-digest.R:174:43:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                                         ~^~
```
[tests/testthat/test-digest.R:174:58:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                                                        ~^~
```
[tests/testthat/test-digest.R:175:31:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                             ~^~
```
[tests/testthat/test-digest.R:175:43:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                         ~^~
```
[tests/testthat/test-digest.R:175:58:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                                        ~^~
```
[tests/testthat/test-digest.R:175:70:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                                                    ~^~
```
[tests/testthat/test-digest.R:176:43:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L176) *style:* **Put spaces around all infix operators.**
```r
    h3 <- digest( substr(x,1,18000) , algo=alg, serialize=FALSE)
                                         ~^~
```
[tests/testthat/test-digest.R:176:58:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L176) *style:* **Put spaces around all infix operators.**
```r
    h3 <- digest( substr(x,1,18000) , algo=alg, serialize=FALSE)
                                                        ~^~
```
[tests/testthat/test-digest.R:180:29:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L180) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , algo=alg, serialize=FALSE)
                           ~^~
```
[tests/testthat/test-digest.R:180:44:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L180) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , algo=alg, serialize=FALSE)
                                          ~^~
```
[tests/testthat/test-digest.R:181:29:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                           ~^~
```
[tests/testthat/test-digest.R:181:44:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                                          ~^~
```
[tests/testthat/test-digest.R:181:56:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                                                      ~^~
```
[tests/testthat/test-digest.R:188:38:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L188) *style:* **Put spaces around all infix operators.**
```r
fname <- system.file("GPL-2", package="digest")
                                    ~^~
```
[tests/testthat/test-digest.R:190:25:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L190) *style:* **Put spaces around all infix operators.**
```r
h2 <- digest(fname, algo="md5", file=TRUE)
                       ~^~
```
[tests/testthat/test-digest.R:190:37:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L190) *style:* **Put spaces around all infix operators.**
```r
h2 <- digest(fname, algo="md5", file=TRUE)
                                   ~^~
```
[tests/testthat/test-digest.R:195:58:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L195) *style:* **Put spaces around all infix operators.**
```r
cat("Hello World, you won't have access to read me", file=fname)
                                                        ~^~
```
[tests/testthat/test-digest.R:197:22:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L197) *style:* **Put spaces around all infix operators.**
```r
Sys.chmod(fname, mode="0000")
                    ~^~
```
[tests/testthat/test-digest.R:198:30:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L198) *style:* **Put spaces around all infix operators.**
```r
try(res <- digest(fname, file=TRUE), silent=TRUE)
                            ~^~
```
[tests/testthat/test-digest.R:198:44:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-digest.R#L198) *style:* **Put spaces around all infix operators.**
```r
try(res <- digest(fname, file=TRUE), silent=TRUE)
                                          ~^~
```
[tests/testthat/test-hmac.R:7:21:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L7) *style:* **Only use double-quotes.**
```r
    current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                    ^~~~~~
```
[tests/testthat/test-hmac.R:7:29:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L7) *style:* **Only use double-quotes.**
```r
    current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:8:15:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L8) *style:* **Only use double-quotes.**
```r
    target <- '750c783e6ab0b503eaa86e310a5db738'
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:15:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L15) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                ^~~~~~
```
[tests/testthat/test-hmac.R:15:25:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L15) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:16:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L16) *style:* **Only use double-quotes.**
```r
target <- '750c783e6ab0b503eaa86e310a5db738'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:20:32:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L20) *style:* **Only use double-quotes.**
```r
current <- hmac(rep(0x0b, 16), 'Hi There', "md5")
                               ^~~~~~~~~~
```
[tests/testthat/test-hmac.R:21:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L21) *style:* **Only use double-quotes.**
```r
target <- '9294727a3638bb1c13f48ef8158bfc9d'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:26:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L26) *style:* **Only use double-quotes.**
```r
target <- '56be34521d144c88dbb8c733f0e8b3f6'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L32) *style:* **lines should not be more than 80 characters.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L32) *style:* **Only use double-quotes.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:88:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L32) *style:* **Only use double-quotes.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
                                                                                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:33:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L33) *style:* **Only use double-quotes.**
```r
target <- '109af8ddd9cccbf8927d354da8be892b'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:39:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L39) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha1")
                ^~~~~~
```
[tests/testthat/test-hmac.R:39:25:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L39) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha1")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:40:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L40) *style:* **Only use double-quotes.**
```r
target <- 'effcdf6ae5eb2fa2d27416d5f184df9c259a7c79'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:44:32:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L44) *style:* **Only use double-quotes.**
```r
current <- hmac(rep(0x0b, 16), 'Hi There', "sha1")
                               ^~~~~~~~~~
```
[tests/testthat/test-hmac.R:45:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L45) *style:* **Only use double-quotes.**
```r
target <- '675b0b3a1b4ddf4e124872da6c2f632bfed957e9'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:50:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L50) *style:* **Only use double-quotes.**
```r
target <- 'd730594d167e35d5956fd8003d0db3d3f46dc7bb'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:55:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                ^~~~~
```
[tests/testthat/test-hmac.R:55:24:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:55:71:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                                                                      ^~~~~~~~
```
[tests/testthat/test-hmac.R:56:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L56) *style:* **Only use double-quotes.**
```r
target <- 'f7bc83f430538424b13298e6aa6fb143ef4d59a14946175997479dbc2d1a3cd8'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:66:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L66) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha512")
                ^~~~~~
```
[tests/testthat/test-hmac.R:66:25:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L66) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha512")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:67:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L67) *style:* **lines should not be more than 80 characters.**
```r
target <- '164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:67:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L67) *style:* **Only use double-quotes.**
```r
target <- '164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:71:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                ^~~~~~
```
[tests/testthat/test-hmac.R:71:25:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                        ^~~~~~~~~
```
[tests/testthat/test-hmac.R:71:36:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                                   ^~~~~~~~
```
[tests/testthat/test-hmac.R:72:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L72) *style:* **lines should not be more than 80 characters.**
```r
target <- 'f955821b3f6161673eb20985c677e3dc101860cafef3321ee31641acad9fcd85d9c7d3481ed3e4e1f4fa7af41d7e6ea9606d51e9bc7205d0091a4ee87d90fb9c'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:72:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L72) *style:* **Only use double-quotes.**
```r
target <- 'f955821b3f6161673eb20985c677e3dc101860cafef3321ee31641acad9fcd85d9c7d3481ed3e4e1f4fa7af41d7e6ea9606d51e9bc7205d0091a4ee87d90fb9c'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L77) *style:* **lines should not be more than 80 characters.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:17:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:157:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                                                                                ^~~~~~~~~
```
[tests/testthat/test-hmac.R:77:168:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                                                                                ^~~~~~~~
```
[tests/testthat/test-hmac.R:78:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L78) *style:* **lines should not be more than 80 characters.**
```r
target <- '54b274484a8b8a371c8ae898f453d37c90d488b0c88c89dd705de06b18263d50c28069f1f778c8a997a61a4d53a06bc8e8719ad11a553c49140bb93a4636882e'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:78:11:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L78) *style:* **Only use double-quotes.**
```r
target <- '54b274484a8b8a371c8ae898f453d37c90d488b0c88c89dd705de06b18263d50c28069f1f778c8a997a61a4d53a06bc8e8719ad11a553c49140bb93a4636882e'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:81:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-hmac.R#L81) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-num2hex.R:12:1:](https://github.com/vsimko/digest/blob/e6bc7c6b4807df85ff6388565b99102cbb883102/tests/testthat/test-num2hex.R#L12) *style:* **lines should not be more than 80 characters.**
```r
                digest:::num2hex(border[i] * -1:1, digits = 6, zapsmall = zapsmall[i])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


vcb


@AfterWind The reason I did that was cause it crashed a server due to the exception thrown in the chat formatter. http://pastebin.com/ieGjtmsP


Did I miss something?


Ahhh I knew it would be such a silly mistake on my part. Also, I had
'if(maxPlayer)' originally and i'm not sure why I changed it. I can change
that back. I also had minVal and maxVal within the function originally. I
console.logged their results from outside and inside the function to see
the difference and forget to put it back. Derp! Thank you!

Also, I have just completed and uploaded my objPlacement function for
virtual world scrabble. Right now my test data is consists of an array of
only three objects but I will test it on a much larger one later to see how
it does. Enjoy the rest of the weekend!

- Heather

On Sat, Mar 12, 2016 at 7:23 PM, jschanker <notifications@github.com> wrote:

> You should think about how to generalize this code to more than 3 rows and
> columns.
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/HeathFeath49/tic-tac-toe/commit/c238c8897fee373cfca7e2138673692d03434bbd#commitcomment-16665100>
> .
>


@FernetMenta just a side note. problem occurs on both platforms i have tested : linux and macos


You could just put the `.negate = False` initialisation into `Field.__init__()`.


stay tuned, I will push something soon


@sils1297 felt `special_chars` is a better name than `forbidden_chars` since they're not really forbidden.


Why remove the channel swap for channel 5hd when it's now becoming available it needs adding to the whitelist


[R/AES.R:76:34:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L76) *style:* **Put spaces around all infix operators.**
```r
            for (i in seq_len(len/16)) {
                                ~^~
```
[R/AES.R:77:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L77) *style:* **Put spaces around all infix operators.**
```r
                ind <- (i - 1)*16 + 1:16
                             ~^~
```
[R/AES.R:85:29:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L85) *style:* **Put spaces around all infix operators.**
```r
            result <- raw(16*blocks)
                           ~^~
```
[R/AES.R:88:26:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L88) *style:* **Put spaces around all infix operators.**
```r
                result[16*(i - 1) + 1:16] <- IV
                        ~^~
```
[R/AES.R:110:34:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L110) *style:* **Put spaces around all infix operators.**
```r
            for (i in seq_len(len/16)) {
                                ~^~
```
[R/AES.R:111:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/AES.R#L111) *style:* **Put spaces around all infix operators.**
```r
                ind <- (i - 1)*16 + 1:16
                             ~^~
```
[R/hmac.R:34:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
          ^~~
```
[R/hmac.R:34:27:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                         ~^~
```
[R/hmac.R:34:43:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                                         ~^~
```
[R/hmac.R:34:53:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/R/hmac.R#L34) *style:* **Put spaces around all infix operators.**
```r
        k <-digest(k, algo=algo, serialize=FALSE,raw=TRUE)
                                                   ~^~
```
[tests/testthat/test-AES.R:25:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L25) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:27:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L27) *style:* **lines should not be more than 80 characters.**
```r
aes192key       <- hextextToRaw("000102030405060708090a0b0c0d0e0f1011121314151617")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-AES.R:33:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L33) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes192, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:35:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L35) *style:* **lines should not be more than 80 characters.**
```r
aes256key       <- hextextToRaw("000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-AES.R:41:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L41) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(aes256, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:48:71:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L48) *style:* **Put spaces around all infix operators.**
```r
                                "f69f2445df4f9b17ad2b417be66c3710",sep=""))
                                                                     ~^~
```
[tests/testthat/test-AES.R:54:74:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L54) *style:* **Put spaces around all infix operators.**
```r
                                   "7b0c785e27e8ad3f8223207104725dd4",sep=""))
                                                                        ~^~
```
[tests/testthat/test-AES.R:59:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L59) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(ecb128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:64:75:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L64) *style:* **Put spaces around all infix operators.**
```r
                                    "3ff1caa1681fac09120eca307586e1a7",sep=""))
                                                                         ~^~
```
[tests/testthat/test-AES.R:66:21:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L66) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:66:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L66) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:70:21:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L70) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:70:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L70) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CBC", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:71:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L71) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(cbc128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-AES.R:76:74:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L76) *style:* **Put spaces around all infix operators.**
```r
                                   "1e031dda2fbe03d1792170a0f3009cee",sep=""))
                                                                        ~^~
```
[tests/testthat/test-AES.R:78:21:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L78) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:78:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L78) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:82:21:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L82) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                   ~^~
```
[tests/testthat/test-AES.R:82:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L82) *style:* **Put spaces around all infix operators.**
```r
aes <- AES(key, mode="CTR", IV=iv)
                             ~^~
```
[tests/testthat/test-AES.R:83:55:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-AES.R#L83) *style:* **Put spaces around all infix operators.**
```r
stopifnot(identical(plaintext, aes$decrypt(ctr128, raw=TRUE)))
                                                     ~^~
```
[tests/testthat/test-digest.R:17:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L17) *style:* **Put spaces around all infix operators.**
```r
            "345678901234567890", sep=""))
                                    ~^~
```
[tests/testthat/test-digest.R:27:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L27) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=md5Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:28:41:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L28) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE)
                                       ~^~
```
[tests/testthat/test-digest.R:34:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L34) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=md5Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:35:41:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L35) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE, raw=TRUE)
                                       ~^~
```
[tests/testthat/test-digest.R:35:52:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L35) *style:* **Put spaces around all infix operators.**
```r
    md5 <- digest(md5Input[i], serialize=FALSE, raw=TRUE)
                                                  ~^~
```
[tests/testthat/test-digest.R:50:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L50) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha1Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:51:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L51) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE)
                                    ~^~
```
[tests/testthat/test-digest.R:51:56:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L51) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE)
                                                      ~^~
```
[tests/testthat/test-digest.R:57:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L57) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha1Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:58:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                    ~^~
```
[tests/testthat/test-digest.R:58:56:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                                      ~^~
```
[tests/testthat/test-digest.R:58:67:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L58) *style:* **Put spaces around all infix operators.**
```r
    sha1 <- digest(sha1Input[i], algo="sha1", serialize=FALSE, raw=TRUE)
                                                                 ~^~
```
[tests/testthat/test-digest.R:69:13:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L69) *style:* **Put spaces around all infix operators.**
```r
sha512Input <-c(
            ^~~
```
[tests/testthat/test-digest.R:74:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L74) *style:* **lines should not be more than 80 characters.**
```r
    "cf83e1357eefb8bdf1542850d66d8007d620e4050b5715dc83f4a921d36ce9ce47d0d13c5d85f2b0ff8318d2877eec2f63b931bd47417a81a538327af927da3e",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-digest.R:75:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L75) *style:* **lines should not be more than 80 characters.**
```r
    "91ea1245f20d46ae9a037a989f54f1f790f0a47607eeb8a14d12890cea77a1bbc6c7ed9cf205e67b7f2b8fd4c7dfd3a7a8617e45f3c463d481c7e586c39ac1ed")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-digest.R:77:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L77) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha512Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:78:42:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L78) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE)
                                        ~^~
```
[tests/testthat/test-digest.R:78:62:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L78) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE)
                                                            ~^~
```
[tests/testthat/test-digest.R:84:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L84) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=sha512Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:85:42:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                        ~^~
```
[tests/testthat/test-digest.R:85:62:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                                            ~^~
```
[tests/testthat/test-digest.R:85:73:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L85) *style:* **Put spaces around all infix operators.**
```r
    sha512 <- digest(sha512Input[i], algo="sha512", serialize=FALSE, raw=TRUE)
                                                                       ~^~
```
[tests/testthat/test-digest.R:106:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L106) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=crc32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:107:40:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L107) *style:* **Put spaces around all infix operators.**
```r
    crc32 <- digest(crc32Input[i], algo="crc32", serialize=FALSE)
                                      ~^~
```
[tests/testthat/test-digest.R:107:59:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L107) *style:* **Put spaces around all infix operators.**
```r
    crc32 <- digest(crc32Input[i], algo="crc32", serialize=FALSE)
                                                         ~^~
```
[tests/testthat/test-digest.R:113:27:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L113) *style:* **Put spaces around all infix operators.**
```r
sha1 <- digest("abc", algo="sha1", serialize=FALSE)
                         ~^~
```
[tests/testthat/test-digest.R:113:45:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L113) *style:* **Put spaces around all infix operators.**
```r
sha1 <- digest("abc", algo="sha1", serialize=FALSE)
                                           ~^~
```
[tests/testthat/test-digest.R:117:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L117) *style:* **Put spaces around all infix operators.**
```r
cat(digest(list(LETTERS, data.frame(a=letters[1:5],
                                    ~^~
```
[tests/testthat/test-digest.R:118:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L118) *style:* **Put spaces around all infix operators.**
```r
                                    b=matrix(1:10,
                                    ~^~
```
[tests/testthat/test-digest.R:119:41:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L119) *style:* **Put spaces around all infix operators.**
```r
                                    ncol=2)))), "\n")
                                       ~^~
```
[tests/testthat/test-digest.R:131:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L131) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=xxhash32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:132:46:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L132) *style:* **Put spaces around all infix operators.**
```r
    xxhash32 <- digest(xxhash32Input[i], algo="xxhash32", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:132:68:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L132) *style:* **Put spaces around all infix operators.**
```r
    xxhash32 <- digest(xxhash32Input[i], algo="xxhash32", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:147:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L147) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=xxhash64Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:148:46:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L148) *style:* **Put spaces around all infix operators.**
```r
    xxhash64 <- digest(xxhash64Input[i], algo="xxhash64", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:148:68:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L148) *style:* **Put spaces around all infix operators.**
```r
    xxhash64 <- digest(xxhash64Input[i], algo="xxhash64", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:163:20:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L163) *style:* **Put spaces around all infix operators.**
```r
for (i in seq(along=murmur32Input)) {
                  ~^~
```
[tests/testthat/test-digest.R:164:46:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L164) *style:* **Put spaces around all infix operators.**
```r
    murmur32 <- digest(murmur32Input[i], algo="murmur32", serialize=FALSE)
                                            ~^~
```
[tests/testthat/test-digest.R:164:68:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L164) *style:* **Put spaces around all infix operators.**
```r
    murmur32 <- digest(murmur32Input[i], algo="murmur32", serialize=FALSE)
                                                                  ~^~
```
[tests/testthat/test-digest.R:170:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L170) *style:* **Put spaces around all infix operators.**
```r
fname <- system.file("GPL-2", package="digest")
                                    ~^~
```
[tests/testthat/test-digest.R:174:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                             ~^~
```
[tests/testthat/test-digest.R:174:43:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                                         ~^~
```
[tests/testthat/test-digest.R:174:58:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L174) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , length=18000, algo=alg, serialize=FALSE)
                                                        ~^~
```
[tests/testthat/test-digest.R:175:31:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                             ~^~
```
[tests/testthat/test-digest.R:175:43:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                         ~^~
```
[tests/testthat/test-digest.R:175:58:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                                        ~^~
```
[tests/testthat/test-digest.R:175:70:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L175) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, length=18000, algo=alg, serialize=FALSE, file=TRUE)
                                                                    ~^~
```
[tests/testthat/test-digest.R:176:43:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L176) *style:* **Put spaces around all infix operators.**
```r
    h3 <- digest( substr(x,1,18000) , algo=alg, serialize=FALSE)
                                         ~^~
```
[tests/testthat/test-digest.R:176:58:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L176) *style:* **Put spaces around all infix operators.**
```r
    h3 <- digest( substr(x,1,18000) , algo=alg, serialize=FALSE)
                                                        ~^~
```
[tests/testthat/test-digest.R:180:29:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L180) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , algo=alg, serialize=FALSE)
                           ~^~
```
[tests/testthat/test-digest.R:180:44:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L180) *style:* **Put spaces around all infix operators.**
```r
    h1 <- digest(x    , algo=alg, serialize=FALSE)
                                          ~^~
```
[tests/testthat/test-digest.R:181:29:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                           ~^~
```
[tests/testthat/test-digest.R:181:44:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                                          ~^~
```
[tests/testthat/test-digest.R:181:56:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L181) *style:* **Put spaces around all infix operators.**
```r
    h2 <- digest(fname, algo=alg, serialize=FALSE, file=TRUE)
                                                      ~^~
```
[tests/testthat/test-digest.R:188:38:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L188) *style:* **Put spaces around all infix operators.**
```r
fname <- system.file("GPL-2", package="digest")
                                    ~^~
```
[tests/testthat/test-digest.R:190:25:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L190) *style:* **Put spaces around all infix operators.**
```r
h2 <- digest(fname, algo="md5", file=TRUE)
                       ~^~
```
[tests/testthat/test-digest.R:190:37:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L190) *style:* **Put spaces around all infix operators.**
```r
h2 <- digest(fname, algo="md5", file=TRUE)
                                   ~^~
```
[tests/testthat/test-digest.R:195:58:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L195) *style:* **Put spaces around all infix operators.**
```r
cat("Hello World, you won't have access to read me", file=fname)
                                                        ~^~
```
[tests/testthat/test-digest.R:197:22:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L197) *style:* **Put spaces around all infix operators.**
```r
Sys.chmod(fname, mode="0000")
                    ~^~
```
[tests/testthat/test-digest.R:198:30:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L198) *style:* **Put spaces around all infix operators.**
```r
try(res <- digest(fname, file=TRUE), silent=TRUE)
                            ~^~
```
[tests/testthat/test-digest.R:198:44:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-digest.R#L198) *style:* **Put spaces around all infix operators.**
```r
try(res <- digest(fname, file=TRUE), silent=TRUE)
                                          ~^~
```
[tests/testthat/test-hmac.R:7:21:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L7) *style:* **Only use double-quotes.**
```r
    current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                    ^~~~~~
```
[tests/testthat/test-hmac.R:7:29:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L7) *style:* **Only use double-quotes.**
```r
    current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:8:15:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L8) *style:* **Only use double-quotes.**
```r
    target <- '750c783e6ab0b503eaa86e310a5db738'
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:15:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L15) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                ^~~~~~
```
[tests/testthat/test-hmac.R:15:25:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L15) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "md5")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:16:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L16) *style:* **Only use double-quotes.**
```r
target <- '750c783e6ab0b503eaa86e310a5db738'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:20:32:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L20) *style:* **Only use double-quotes.**
```r
current <- hmac(rep(0x0b, 16), 'Hi There', "md5")
                               ^~~~~~~~~~
```
[tests/testthat/test-hmac.R:21:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L21) *style:* **Only use double-quotes.**
```r
target <- '9294727a3638bb1c13f48ef8158bfc9d'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:26:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L26) *style:* **Only use double-quotes.**
```r
target <- '56be34521d144c88dbb8c733f0e8b3f6'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L32) *style:* **lines should not be more than 80 characters.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L32) *style:* **Only use double-quotes.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:32:88:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L32) *style:* **Only use double-quotes.**
```r
current <- hmac('ThisKeyIsLongerThan64BytesAndThereforeLongerThanTheHashDigestByFour', 'what do ya want for nothing?', "md5")
                                                                                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:33:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L33) *style:* **Only use double-quotes.**
```r
target <- '109af8ddd9cccbf8927d354da8be892b'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:39:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L39) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha1")
                ^~~~~~
```
[tests/testthat/test-hmac.R:39:25:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L39) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha1")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:40:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L40) *style:* **Only use double-quotes.**
```r
target <- 'effcdf6ae5eb2fa2d27416d5f184df9c259a7c79'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:44:32:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L44) *style:* **Only use double-quotes.**
```r
current <- hmac(rep(0x0b, 16), 'Hi There', "sha1")
                               ^~~~~~~~~~
```
[tests/testthat/test-hmac.R:45:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L45) *style:* **Only use double-quotes.**
```r
target <- '675b0b3a1b4ddf4e124872da6c2f632bfed957e9'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:50:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L50) *style:* **Only use double-quotes.**
```r
target <- 'd730594d167e35d5956fd8003d0db3d3f46dc7bb'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:55:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                ^~~~~
```
[tests/testthat/test-hmac.R:55:24:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:55:71:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L55) *style:* **Only use double-quotes.**
```r
current <- hmac('key', 'The quick brown fox jumps over the lazy dog', 'sha256')
                                                                      ^~~~~~~~
```
[tests/testthat/test-hmac.R:56:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L56) *style:* **Only use double-quotes.**
```r
target <- 'f7bc83f430538424b13298e6aa6fb143ef4d59a14946175997479dbc2d1a3cd8'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:66:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L66) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha512")
                ^~~~~~
```
[tests/testthat/test-hmac.R:66:25:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L66) *style:* **Only use double-quotes.**
```r
current <- hmac('Jefe', 'what do ya want for nothing?', "sha512")
                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:67:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L67) *style:* **lines should not be more than 80 characters.**
```r
target <- '164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:67:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L67) *style:* **Only use double-quotes.**
```r
target <- '164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:71:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                ^~~~~~
```
[tests/testthat/test-hmac.R:71:25:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                        ^~~~~~~~~
```
[tests/testthat/test-hmac.R:71:36:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L71) *style:* **Only use double-quotes.**
```r
current <- hmac('love', 'message', 'sha512')
                                   ^~~~~~~~
```
[tests/testthat/test-hmac.R:72:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L72) *style:* **lines should not be more than 80 characters.**
```r
target <- 'f955821b3f6161673eb20985c677e3dc101860cafef3321ee31641acad9fcd85d9c7d3481ed3e4e1f4fa7af41d7e6ea9606d51e9bc7205d0091a4ee87d90fb9c'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:72:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L72) *style:* **Only use double-quotes.**
```r
target <- 'f955821b3f6161673eb20985c677e3dc101860cafef3321ee31641acad9fcd85d9c7d3481ed3e4e1f4fa7af41d7e6ea9606d51e9bc7205d0091a4ee87d90fb9c'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L77) *style:* **lines should not be more than 80 characters.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:17:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:77:157:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                                                                                ^~~~~~~~~
```
[tests/testthat/test-hmac.R:77:168:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L77) *style:* **Only use double-quotes.**
```r
current <- hmac('verylongkeyinfactlongerthanthedigestandthereforehashedbyitselfonlyifwegettothislengthsoonpleasepleasebutiddoesnotlooksoogoodahthereweare', 'message', 'sha512')
                                                                                ^~~~~~~~
```
[tests/testthat/test-hmac.R:78:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L78) *style:* **lines should not be more than 80 characters.**
```r
target <- '54b274484a8b8a371c8ae898f453d37c90d488b0c88c89dd705de06b18263d50c28069f1f778c8a997a61a4d53a06bc8e8719ad11a553c49140bb93a4636882e'
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:78:11:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L78) *style:* **Only use double-quotes.**
```r
target <- '54b274484a8b8a371c8ae898f453d37c90d488b0c88c89dd705de06b18263d50c28069f1f778c8a997a61a4d53a06bc8e8719ad11a553c49140bb93a4636882e'
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-hmac.R:81:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-hmac.R#L81) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-num2hex.R:12:1:](https://github.com/vsimko/digest/blob/03f167ef2cb2175ab102970a0d8107ebaf22e80a/tests/testthat/test-num2hex.R#L12) *style:* **lines should not be more than 80 characters.**
```r
                digest:::num2hex(border[i] * -1:1, digits = 6, zapsmall = zapsmall[i])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Oops Conola misspelled


**code-block**:
\`\`\`
code
\`\`\`

**text-block**: (4 spaces or 1 tab, no highlight)
```
    your text
```

![snip20160314_10](https://cloud.githubusercontent.com/assets/10032927/13730370/0a144a7a-e988-11e5-8826-f48c533f6814.png)


Yea, I misinterpreted some data while debugging a shader. Next commit will fix it.


@amitaibu It seems that we had a lot of redundant code.


Not entirely looked at the implementation but my first thought here is can something like `object LogicalComparison`  be added at predicates to do '<' or '>'


Also if we're talking performance, the with prefix just does `.replace("\n", "\n"+prefix)` and in a much slower way. I believe you should just remove that function and that here.


already there


Can you move this "magic number" to a constant.


2016-03-13 13:05 GMT+01:00 N07070 <notifications@github.com>:

> You're free to correct any mistakes you see ;-)
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/LukeStonehm/LogicalDefence/commit/1f695742ce31b1de38e587df76b79cddb96ad862#commitcomment-16667247>
> .
>


esdf


We should keep the requirements sorted. Except the last line for the stated reasons.


Even Windows stopped supporting Windows XP, i think that its fair that the
project follows suit to better support newer OS's
On Sun, Mar 13, 2016 at 8:04 AM RandQalan <notifications@github.com> wrote:

> This revision breaks trans coding for xp 64 not sure if others os have
> same problem
>
> I took old binary with new source and it works so this has to be the
> problem
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/UniversalMediaServer/UniversalMediaServer/commit/f8aaf4a71f0f28ba20f8f75cf9ccb08e1dfcb9a6#commitcomment-16667939>
> .
>


I would prefer to keep the name. It is ""equal" with given epsilon. Sort of overload for the other `IsEqual `with arbitrary epsilon.

> Have you looked for other occurrences of this? I'm pretty sure that's not the only one.

You are right, there are other occurrences, changing them now.


Is there a way to avoid this hardcoding?


@sils1297 But `bear_dir` is _not_ a glob


Sorry, didn't know I have one, will fix


this helped: `grep -rnw ./ -e "defs.hpp"` :)


Thanx, now I'm trying how Git Hub works. :)

2016-03-13 19:01 GMT+01:00 J.M. <jn.marie@gmail.com>:

>
>
> 2016-03-13 13:05 GMT+01:00 N07070 <notifications@github.com>:
>
>> You're free to correct any mistakes you see ;-)
>>
>> —
>> Reply to this email directly or view it on GitHub
>> <https://github.com/LukeStonehm/LogicalDefence/commit/1f695742ce31b1de38e587df76b79cddb96ad862#commitcomment-16667247>
>> .
>>
>
>


String.valueOf


Esta clase sobra reporta sonar
http://157.253.238.75:9000/component_issues/index?id=co.edu.uniandes.csw.homeservices%3Ahome-services#resolved=false|assignees=jc.cerquera10


Typo


done. Wasn't sure about that :)


# GENIAL!!!


I can check the instance of the handler by using `OgGroupAudienceHelper::renderWidget($this->fieldDefinition, $widget_id)`


 @zhenhappy,@danielbh
change  Posts => Post  at  "  Router.route('/:postsLimit?' ... "


It's not really equal then but ok.


closes #2


1-5. Should the number be displayed? Wanted to keep it simple


This isn't, strictly speaking, a dependency - it checks for the existence of the IRouter service and only does things when it finds one. I'm actually sure I copied this pattern from somewhere else in Nette code in one of the DI bridges.. I can find which one it was once I'm at a computer and not in my phone.


the indent should be fine now


Does the AMLogic decoder actually benefit from 8 slices?


indeed... sorry


Yes, this has been changed in one of the following commits..


Este constructor debería estar privado ya que la clase no se instancia


yes i did quite a lot of stuff now. I had unforked this repo, made a backup of the *new* repo then put all over here due to the fact that it is a popular repo on my profile. I guess gotta revert this commit. Thanks for pointing out!


Should break here


hey cyberium, any info when you will implement all this bunch of updates?

Thank you!


I think I started something related to this that probably conflict that what you did. I should have a look to my stash but I think I started modifying the strings so that they are clearer. I can have a look tonight.


Looks pretty good!


I still need to do a little more cleanup, and I'll submit another pull request once I've finished.


It does :-) to return by reference, you must specify the '&' in the function signature and at any place you call it, but not in the return statement.


It probably needs some squashing.


wtf is this branch :v


[R/valid.R:123:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L123) *warning:* **local variable ‘re_icd10cm_major’ assigned but may not be used**
```r
  re_icd10cm_major  <- re_icd10cm_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~~~
```
[R/valid.R:124:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L124) *warning:* **local variable ‘re_icd10who_major’ assigned but may not be used**
```r
  re_icd10who_major <- re_icd10who_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~~~~
```
[R/valid.R:125:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L125) *warning:* **local variable ‘re_icd10_major’ assigned but may not be used**
```r
  re_icd10_major <- re_icd10_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~
```
[R/valid.R:131:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L131) *warning:* **local variable ‘re_icd10_short’ assigned but may not be used**
```r
  re_icd10_short <- re_icd10cm_short
  ^~~~~~~~~~~~~~
```
[R/valid.R:132:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L132) *warning:* **local variable ‘re_icd10_decimal’ assigned but may not be used**
```r
  re_icd10_decimal <- re_icd10cm_decimal
  ^~~~~~~~~~~~~~~~
```
[R/valid.R:133:3:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L133) *warning:* **local variable ‘re_icd10_any’ assigned but may not be used**
```r
  re_icd10_any <- re_icd10cm_any
  ^~~~~~~~~~~~
```
[R/valid.R:135:11:](https://github.com/jackwasey/icd9/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L135) *style:* **Use <-, not =, for assignment.**
```r
  cur_env = environment()
          ^
```


testing branch


@atakacs5280 DWMR. Good work Alex. Thank you. :+1:


Hi!

If you want to disable the header printing you can do it in the config file without modify the source code :)


[R/valid.R:123:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L123) *warning:* **local variable ‘re_icd10cm_major’ assigned but may not be used**
```r
  re_icd10cm_major  <- re_icd10cm_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~~~
```
[R/valid.R:124:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L124) *warning:* **local variable ‘re_icd10who_major’ assigned but may not be used**
```r
  re_icd10who_major <- re_icd10who_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~~~~
```
[R/valid.R:125:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L125) *warning:* **local variable ‘re_icd10_major’ assigned but may not be used**
```r
  re_icd10_major <- re_icd10_major_bare %>% re_just_ws
  ^~~~~~~~~~~~~~
```
[R/valid.R:131:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L131) *warning:* **local variable ‘re_icd10_short’ assigned but may not be used**
```r
  re_icd10_short <- re_icd10cm_short
  ^~~~~~~~~~~~~~
```
[R/valid.R:132:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L132) *warning:* **local variable ‘re_icd10_decimal’ assigned but may not be used**
```r
  re_icd10_decimal <- re_icd10cm_decimal
  ^~~~~~~~~~~~~~~~
```
[R/valid.R:133:3:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L133) *warning:* **local variable ‘re_icd10_any’ assigned but may not be used**
```r
  re_icd10_any <- re_icd10cm_any
  ^~~~~~~~~~~~
```
[R/valid.R:135:11:](https://github.com/jackwasey/icd/blob/a2243ec976a08088c8b5ec2d65d7fd6c28daf363/R/valid.R#L135) *style:* **Use <-, not =, for assignment.**
```r
  cur_env = environment()
          ^
```


Ok, thanks for you detailed explanation. Just had projects where optimization on this level was not mandatory. You're right, we don't need 8 bytes here for primary key.


I have using this for a while but still tank's may be tombed


Is there any way we can auto detect this? I'd prefer always reporting support for HEVC if we know the hardware can decode it. Then let the user force it off if they really don't want it.

Are the limits of resolution/fps different for H.264 and HEVC on AML chips?


nicely done


This looks unused


is it better than gitgutter?


uh, I have to dissapoint you. This was over 2 years ago, I don't use this anymore.


It may be a glob, but the problem is in cases like this:
- Consider the project directory being at `/home/folder (1)/project/` (call it S1)
- Consider the user gives glob as `tests/**/*.py` (S2)

Now we escape S1 and then concatenate it with S2. Then we pass it to `iglob`. So we perform a unescape to get the real glob we mean: `/home/folder (1)/project/tests/**/*.py`.


Certificate


Unlikely.


iC is not a valid command for this because it must be in sync with rabin2's flags


that's a codec recovery if something goes wrong


Nope, not gonna happen :-) one of the things I hate the most is when a package I want to use has some critical parameters or behaviour hard-wired and if I want to use it, I need to start messing with its code or overloading classes etc. It should be configurable, with sane defaults that you can use out of the box, but most definitely configurable.


Recomendacion:
La clase tiene bajo cubrimiento porque se prueba de forma indirecta y solo se están usando listEntity2DTO y fullDTO2Entity.

Podría establecerse política de no hacer todos los métodos sino los necesarios (o probar directament)


the codec_reset i mean, you can resume after something goes wrong


Right, I mean you should break out of the loop to avoid submitting more video data until the IDR frame.


There are a lot of comments regarding Globbing.py at https://github.com/hypothesist/coala/commit/93fd8dfe55edc352a388c9219b00a88919f52839


yeah finally done


In step 2, the snippet still reads ' mkdir develop '


misspelled canola


i did not test something in between but it was remarkable faster then without, i am sure crashoverride tested everthing in between


On CentOS 7, which wasn't installed


ok will fix that


The intention is to add support , in the future,for Sample to subquery expressions as well as multiple sample options within the same select  like  "select * from test blocksample 10 percent tuplesample 20 percent". Hence the code for the non-stored relation support.


Done for `acme` and `acme-client`.


why not use reference this time?


should be named storeBluscreen


And it's not ready.
This https://github.com/on-situ-repos/mpc-hc/commit/e289c0d78e676443a4b3a8d27c62dfeb54259645 doesn't make sense.


I return `count` here because I figure there could be a reverse race condition of sorts: it copies over a few bytes then errors, and before it can stat again, the file is removed and a directory is added. The file lock is on though, so I wouldn't think it's an issue.


Ok, fixed both. https://github.com/kasper93/mpc-hc/commit/7c6dd666d3663c34346cdbc7ee7c531568787a50

I found it only other occurrence in RenderingCache.cpp


jfy


I think it would make more sense to put the check for NOT_FOUND before the validation check.


as far as i know it's the bitrate on HEVC it can handle 50Mbit, we are working on a autodetect feature vor future commits


You are right Frank (I just did not see the light early on).  I will have to look at this, OR drop the sort by salt count.

What was the reason for the sort by number?  Did it actually gain us anything, and would it be a problem if it simply vanishes?