[R/AES.R:76:34:](https://github.com/vsimko/digest/blob/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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/52f52fa72828162a5d3f9b603076bd101d03e528/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])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Remove this getter method since no other class has the need to access `percentage_`.


Remove this getter method.


Nah :p I'd rather do this


"Ignore media files containing any of the following word(s):" I don't have better idea.


I'm just not sure. I guess it is find this way. We can change if someone complains later.


It's the plan but I need to work more on this. I started some stuff but couldn't finish it yet. Also I will probably need some help to improve my SVG toolbar mock-up. :p


Yezzir!


Oops, getting it now. I think I hadn't pulled.


Yea sweet. Completely working now.


спасибо ⭐


That was my first idea but I think it wouldn't fit anymore. :/


IMHO this is a valid (should be expected) case and producing an offspring from a single parent is a fair solution.


Hmm, maybe we could ask on doom9. Maybe someone with more experience could do that for us. I have none experience in graphic really :)


[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])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Eh, no, oops.


@CatoTH Teste bitte vor dem Deployment, dass ich nichts zerschossen habe.


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


should this be autodetect also?


No hay pruebas automáticas


As a reminder, todos for next time :
[Todo] Use a filter condition "OR" to make a single query to fetch all VN info instead of fetching them 1 by 1.
[Todo] Sort VN list by status and create a list per status.
[Todo] Create a local DB and store all information inside (and just call the API at startup to update).


addresses (sort of) #369


1. Ok. I do think the legacy loot system will be more of a headache than it's worth. I removed it for now. https://github.com/EpochModTeam/DayZ-Epoch/commit/0e4ed37218a0b2066a442286396b0ea77e5f3375

2. Many of the new weapon classes are redundant, but some are unique. The M14_holo, AK_PSO+SD, AK_GL+SD, M1014_CCO/Holo, M240_CCO/Holo, M249_CCO, RPK_Kobra/PSO, the Mosins, etc. are all currently not possible in Epoch. They are using unique models from dayz_communityweapons that are not part of vanilla A2/OA. Currently if you want an M4 with an Acog for long range and a CCO for close up you need to carry two separate rifles (which is silly). Also being able to add camo to your DMR, M14, M24, etc. instead of needing to get an M40/SVD camo (which is also silly) is nice. The same goes for silencers.

IMO the new options and being able to swap out the scope, silencer, GL, FL, camo, etc. on the fly makes it worth it. But we can always make a poll on the forums.

 3 . Ok, I see now. I'll let you handle the ammo boxes. I'm done touching the loot tables now.

I've been working my way up through your commits, so I will be going through compiles next. After that I will get in game and start testing.


A bug that is to be fixed in Intel C++ compiler 17:
> This recent language change is implemented in our 17.0 release (currently in beta)

https://software.intel.com/en-us/forums/intel-c-compiler/topic/611948#comment-1863825


Could you please add a comment at the end of the line, similar to the adjacent lines? Thanks.


Fixed


Have you looked for other occurrences of this? I'm pretty sure that's not the only one. Also I'm not sure about the name `IsNearlyEqual` might be better.


imho je všechno tohle blbnutí s router zbytečný overengineering, použij fixní adresu


А зачем нам `callback` ?


why anyway?


Message should be moved to `i18n_message.js`


misspelled canola


@BoumSam13 DWMR. This is well done. Thank you.


oh right I see


Чтобы не закрыть БД раньше времени


let's do something simpler:

```python
def foo(string):
    new_string = ''
    forbidden_chars = "[]|()?"
    for char in string:
        if char in forbidden_chars:
            new_string += '[' + char + ']'
        else:
            new_string += char
```


It's actually Issue #62.


The LDAP_PASSWORD constant do not have any sprintf() placeholder.

If you use the user authentication mode, the LDAP_PASSWORD value should be set to null.


fix memory leaks


nitpick:

Object []params = new Object[]{gameID};


@Gerrrr I implemented the constraint specific exception handling for AlwaysNullConstraint as an example. Do you think we can do it like this for all of them? It will allow us to catch individual exceptions that we think deserve to be caught because they are a problem with data quality not wrong API usage.

We can then later also implement the general checks if we wanted (at the runner level).

Let me know what you think :)


`:param` missing


essentially you need to replace *all* occurrences of the regex `[.]`, right? Not only the special chars!


Probably after fixing the spelling error :-)


is this function needed? It's not like you can unglob a glob anyway without applying it to a FS...


I totally failed to check this! My feeling is that it should be `#include <cucumber-cpp/generic.hpp>` since we don't use any testing framework in those steps/hooks.


unrelated change


`#include <cucumber-cpp/generic.hpp>` as below?


Could you, please, provide the name of the code artifact and instruction
line number? That could make the location of the offending code much
easier...

Em 12-03-2016 16:59, David Pinho escreveu:
>
> Is it necessary to test the last condition |antiPatterns.size() > 0| ?
> If the user is only looking for metric values and he is not interested
> in anti-patterns, this last condition will not let the visminer
> analyze the metrics. I agree with testing if the antiPatterns is null,
> but the user can still set an empty list. I checked out and the
> antiPatterns list is only being used in a foreach in the method
> ASTProcessor.process, in this case, even if it is an empty list it
> will not result in an exception like an NPE. @luispscarvalho
> <https://github.com/luispscarvalho> , @felipegustavo
> <https://github.com/felipegustavo> what do you think?
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/visminer/Visminer/commit/24e86bd801a87156f8792756f116e1e88fbcdf6a#commitcomment-16664074>.
>


Wow, that's really simple and beautiful! Why didn't I think of that?

Will change.


I'm probably missing something but I'm not completely sure why we need that `+ oldDelay` here.


can we rather name it `glob_escape` since you don't escape a glob but a string that is actually *not* a glob, that's the point of it, right?


Should we rename this to `getUserBlogsList`?


Also we could merge PR161 if everyone is up to that. I'm ok with those changes.


see, listen to the old man :D

Sincerely,

Lasse Schuirmann

contact@viperdev.io
http://viperdev.io/

2016-03-13 18:46 GMT+01:00 Adhityaa Chandrasekar <notifications@github.com>:

> Wow, that's really simple and beautiful! Why didn't I think of that?
>
> Will change.
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/hypothesist/coala/commit/178f6281a0f5b03dcc8cd0f8f4ff6c52bbfb8441#commitcomment-16668608>
> .
>


Классы вроде с заглавных лучше называть, по конвенции об именовании.
И не глаголами.


Форматирование съехало.


{rsx::thread} Exception: Unknow surface depth format 0
(in file C:\rpcs3\rpcs3\Emu\RSX\GCM.cpp:869, in function rsx::to_surface_depth_format)

{rsx::thread} Exception: unknow surface color format 0
(in file C:\rpcs3\rpcs3\Emu\RSX\GCM.cpp:938, in function rsx::to_surface_color_format)


can you please do another commit *before* this one and rename `bear_dir` to `bear_glob` because it's a glob, then you can also name `escaped_bear_dir` just `bear_dir` and it's much clearer what is what, right?


nerd


Kemal Aydın 12253008


12253008 Kemal Aydın


Уверен, что число вообще ввели? Может там какая-то хрень, а не число?


`SetTime` does `m_rtNow = rtNow - m_rtSubtitleDelay;` so `m_rtNow` is already shifted. I've added old delay to get real time without delay. Fiddly but will work. Other solution would be to add another member variable holding real time.


Опять форматирование съехало.


I'd log something scary in the "default" branch.


ОМГ пиши в одном стиле.


Both toolbar and logo. Maybe it's also time to ditch all non-default logos from our package.
About how do it, maybe create a branch in the main repo and make pull request from it. So we all can contribute.


Updated [the release notes](https://github.com/mapbox/mapbox-gl-native/releases/tag/ios-v3.1.0). Thanks!


Either this or the parent commit broke darwin stdenv completely. http://hydra.nixos.org/build/33206231/nixlog/1


latex-documentation (Myoldmopar) - Win64-Windows-7-VisualStudio-12: OK (2135 of 2135 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.svg) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.svg)


Also, maybe it's worth using a map here instead of cases.


В read.java проверяет


is this actually a dir name or a dir glob?


No it's ok, I was just too lazy to actually check what `SetTime` was doing.


Буду знать.


I don't know those changes in this file don't look like sane behaviour to me, on what behaviour did we agree btw.? HAve we written that down somewhere?


what the fuck !!


Ouai je sais pas pourquoi un moment t'as disparu des membres :p

Je viens de te rajouter


Ambigious argument name - I would expect planet objects from this name but these are actually planet ids.


환경변수의 문제가 있음.


You are in sponsorship team. -_-


프로그램의 채점 결과를 받아오는 무언가가 필요!


Although I left this in, I was thinking of changing things up so that instead of having an owners localization it uses the localization of the residents list.


`Used `shlex` module to split arguments in subprocess.call() command` it says in your commit message but it doesn't seem your commit has anything to do with shlex


Why do you need to copy the list of queries here? Aren't all the references still pointing to the same queries?