[R/analyze.merModLmerTest.R:39:67:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.merModLmerTest.R#L39) *style:* **Put spaces around all infix operators.**
```r
  fitsum$t <- paste("t(", fitsum$df, ") = ", fitsum$`t value`, sep="")
                                                                 ~^~
```
[R/analyze.merModLmerTest.R:52:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.merModLmerTest.R#L52) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=fitsum, values=values)
                    ~^~
```
[R/analyze.merModLmerTest.R:52:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.merModLmerTest.R#L52) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=fitsum, values=values)
                               ~^~
```
[R/analyze.merModLmerTest.R:52:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.merModLmerTest.R#L52) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=fitsum, values=values)
                                             ~^~
```
[R/analyze.merModLmerTest.R:52:62:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.merModLmerTest.R#L52) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=fitsum, values=values)
                                                            ~^~
```
[R/analyze.stanreg.R:41:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L41) *style:* **Put spaces around all infix operators.**
```r
  varnames <- varnames[grepl("b\\[", varnames)==FALSE]
                                             ~^~~
```
[R/analyze.stanreg.R:56:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **lines should not be more than 80 characters.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:56:44:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                          ~^~
```
[R/analyze.stanreg.R:56:48:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                              ~^~
```
[R/analyze.stanreg.R:56:50:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                ~^~
```
[R/analyze.stanreg.R:56:57:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                       ~^~
```
[R/analyze.stanreg.R:56:62:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                            ~^~
```
[R/analyze.stanreg.R:56:66:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                                ~^~
```
[R/analyze.stanreg.R:56:68:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                                  ~^~
```
[R/analyze.stanreg.R:56:79:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L56) *style:* **Put spaces around all infix operators.**
```r
    CI_values <- quantile(posterior, c((100-CI)/2/100, 1-(100-CI)/2/100), type=8)
                                                                             ~^~
```
[R/analyze.stanreg.R:60:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L60) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior>=0])/length(posterior)*100
                                      ~^~~
```
[R/analyze.stanreg.R:60:45:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L60) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior>=0])/length(posterior)*100
                                           ~^~
```
[R/analyze.stanreg.R:60:63:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L60) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior>=0])/length(posterior)*100
                                                             ~^~
```
[R/analyze.stanreg.R:69:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L69) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior<0])/length(posterior)*100
                                      ~^~
```
[R/analyze.stanreg.R:69:44:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L69) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior<0])/length(posterior)*100
                                          ~^~
```
[R/analyze.stanreg.R:69:62:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L69) *style:* **Put spaces around all infix operators.**
```r
      MPE <- length(posterior[posterior<0])/length(posterior)*100
                                                            ~^~
```
[R/analyze.stanreg.R:89:49:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L89) *style:* **Put spaces around all infix operators.**
```r
        name <- paste("effect of ", varname, sep="")
                                               ~^~
```
[R/analyze.stanreg.R:92:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L92) *style:* **lines should not be more than 80 characters.**
```r
    text <- paste("Concerning the ", name, ", there is a probability of ", format_digit(MPE), "% that its coefficient is between ", format_digit(MPE_values[1]), " and ", format_digit(MPE_values[2]), " (Median = ", format_digit(median), ", MAD = ", format_digit(mad), ", Mean = ", format_digit(mean), ", SD = ", format_digit(sd), ", ", CI, "% CI [", format_digit(CI_values[1]), ", ", format_digit(CI_values[2]), "]).", sep="")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:92:422:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L92) *style:* **Put spaces around all infix operators.**
```r
    text <- paste("Concerning the ", name, ", there is a probability of ", format_digit(MPE), "% that its coefficient is between ", format_digit(MPE_values[1]), " and ", format_digit(MPE_values[2]), " (Median = ", format_digit(median), ", MAD = ", format_digit(mad), ", Mean = ", format_digit(mean), ", SD = ", format_digit(sd), ", ", CI, "% CI [", format_digit(CI_values[1]), ", ", format_digit(CI_values[2]), "]).", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:95:35:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L95) *style:* **Put spaces around all infix operators.**
```r
    values[[varname]] <- list(name=varname,
                                 ~^~
```
[R/analyze.stanreg.R:96:37:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L96) *style:* **Put spaces around all infix operators.**
```r
                              median=median,
                                   ~^~
```
[R/analyze.stanreg.R:97:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L97) *style:* **Put spaces around all infix operators.**
```r
                              mad=mad,
                                ~^~
```
[R/analyze.stanreg.R:98:35:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L98) *style:* **Put spaces around all infix operators.**
```r
                              mean=mean,
                                 ~^~
```
[R/analyze.stanreg.R:99:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L99) *style:* **Put spaces around all infix operators.**
```r
                              sd=sd,
                               ~^~
```
[R/analyze.stanreg.R:100:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L100) *style:* **Put spaces around all infix operators.**
```r
                              CI_values=CI_values,
                                      ~^~
```
[R/analyze.stanreg.R:101:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L101) *style:* **Put spaces around all infix operators.**
```r
                              MPE=MPE,
                                ~^~
```
[R/analyze.stanreg.R:102:41:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L102) *style:* **Put spaces around all infix operators.**
```r
                              MPE_values=MPE_values,
                                       ~^~
```
[R/analyze.stanreg.R:103:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L103) *style:* **Put spaces around all infix operators.**
```r
                              posterior=posterior,
                                      ~^~
```
[R/analyze.stanreg.R:104:35:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L104) *style:* **Put spaces around all infix operators.**
```r
                              text=text)
                                 ~^~
```
[R/analyze.stanreg.R:111:18:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L111) *style:* **Put spaces around all infix operators.**
```r
  if (Effect_Size==T){
                ~^~~
```
[R/analyze.stanreg.R:112:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L112) *style:* **lines should not be more than 80 characters.**
```r
    print("Interpreting effect size following Cohen (1977, 1988)... Make sure your variables were standardized!")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:118:61:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L118) *style:* **Put spaces around all infix operators.**
```r
      verylarge_neg <- length(posterior[posterior <= -1.30])/length(posterior)
                                                           ~^~
```
[R/analyze.stanreg.R:119:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L119) *style:* **lines should not be more than 80 characters.**
```r
      large_neg <- length(posterior[posterior > -1.30 & posterior <= -0.80])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:119:77:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L119) *style:* **Put spaces around all infix operators.**
```r
      large_neg <- length(posterior[posterior > -1.30 & posterior <= -0.80])/length(posterior)
                                                                           ~^~
```
[R/analyze.stanreg.R:120:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L120) *style:* **lines should not be more than 80 characters.**
```r
      medium_neg <- length(posterior[posterior > -0.80 & posterior <= -0.50])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:120:78:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L120) *style:* **Put spaces around all infix operators.**
```r
      medium_neg <- length(posterior[posterior > -0.80 & posterior <= -0.50])/length(posterior)
                                                                            ~^~
```
[R/analyze.stanreg.R:121:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L121) *style:* **lines should not be more than 80 characters.**
```r
      small_neg <- length(posterior[posterior > -0.50 & posterior <= -0.20])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:121:77:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L121) *style:* **Put spaces around all infix operators.**
```r
      small_neg <- length(posterior[posterior > -0.50 & posterior <= -0.20])/length(posterior)
                                                                           ~^~
```
[R/analyze.stanreg.R:122:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L122) *style:* **lines should not be more than 80 characters.**
```r
      verysmall_neg <- length(posterior[posterior > -0.20 & posterior < 0])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:122:76:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L122) *style:* **Put spaces around all infix operators.**
```r
      verysmall_neg <- length(posterior[posterior > -0.20 & posterior < 0])/length(posterior)
                                                                          ~^~
```
[R/analyze.stanreg.R:124:60:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L124) *style:* **Put spaces around all infix operators.**
```r
      verylarge_pos <- length(posterior[posterior >= 1.30])/length(posterior)
                                                          ~^~
```
[R/analyze.stanreg.R:125:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L125) *style:* **lines should not be more than 80 characters.**
```r
      large_pos <- length(posterior[posterior < 1.30 & posterior >= 0.80])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:125:75:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L125) *style:* **Put spaces around all infix operators.**
```r
      large_pos <- length(posterior[posterior < 1.30 & posterior >= 0.80])/length(posterior)
                                                                         ~^~
```
[R/analyze.stanreg.R:126:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L126) *style:* **lines should not be more than 80 characters.**
```r
      medium_pos <- length(posterior[posterior < 0.80 & posterior >= 0.50])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:126:76:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L126) *style:* **Put spaces around all infix operators.**
```r
      medium_pos <- length(posterior[posterior < 0.80 & posterior >= 0.50])/length(posterior)
                                                                          ~^~
```
[R/analyze.stanreg.R:127:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L127) *style:* **lines should not be more than 80 characters.**
```r
      small_pos <- length(posterior[posterior < 0.50 & posterior >= 0.20])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:127:75:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L127) *style:* **Put spaces around all infix operators.**
```r
      small_pos <- length(posterior[posterior < 0.50 & posterior >= 0.20])/length(posterior)
                                                                         ~^~
```
[R/analyze.stanreg.R:128:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L128) *style:* **lines should not be more than 80 characters.**
```r
      verysmall_pos <- length(posterior[posterior < 0.20 & posterior > 0])/length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:128:75:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L128) *style:* **Put spaces around all infix operators.**
```r
      verysmall_pos <- length(posterior[posterior < 0.20 & posterior > 0])/length(posterior)
                                                                         ~^~
```
[R/analyze.stanreg.R:130:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L130) *style:* **lines should not be more than 80 characters.**
```r
      EffSize <- data.frame(Direction=c("Negative", "Negative", "Negative", "Negative", "Negative", "Positive", "Positive", "Positive", "Positive", "Positive"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:130:38:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L130) *style:* **Put spaces around all infix operators.**
```r
      EffSize <- data.frame(Direction=c("Negative", "Negative", "Negative", "Negative", "Negative", "Positive", "Positive", "Positive", "Positive", "Positive"),
                                    ~^~
```
[R/analyze.stanreg.R:131:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L131) *style:* **lines should not be more than 80 characters.**
```r
                                Size=c("VeryLarge", "Large", "Medium", "Small", "VerySmall", "VerySmall", "Small", "Medium", "Large", "VeryLarge"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:131:37:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L131) *style:* **Put spaces around all infix operators.**
```r
                                Size=c("VeryLarge", "Large", "Medium", "Small", "VerySmall", "VerySmall", "Small", "Medium", "Large", "VeryLarge"),
                                   ~^~
```
[R/analyze.stanreg.R:132:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L132) *style:* **lines should not be more than 80 characters.**
```r
                                Probability=c(verylarge_neg, large_neg, medium_neg, small_neg, verysmall_neg, verysmall_pos, small_pos, medium_pos, large_pos, verylarge_pos))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:132:44:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L132) *style:* **Put spaces around all infix operators.**
```r
                                Probability=c(verylarge_neg, large_neg, medium_neg, small_neg, verysmall_neg, verysmall_pos, small_pos, medium_pos, large_pos, verylarge_pos))
                                          ~^~
```
[R/analyze.stanreg.R:140:67:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L140) *style:* **Put spaces around all infix operators.**
```r
        opposite_prob <- sum(EffSize$Probability[EffSize$Direction=="Negative"])
                                                                 ~^~~
```
[R/analyze.stanreg.R:141:45:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L141) *style:* **Put spaces around all infix operators.**
```r
        if (length(posterior[posterior > 0])>0){
                                           ~^~
```
[R/analyze.stanreg.R:152:67:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L152) *style:* **Put spaces around all infix operators.**
```r
        opposite_prob <- sum(EffSize$Probability[EffSize$Direction=="Positive"])
                                                                 ~^~~
```
[R/analyze.stanreg.R:153:45:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L153) *style:* **Put spaces around all infix operators.**
```r
        if (length(posterior[posterior > 0])>0){
                                           ~^~
```
[R/analyze.stanreg.R:165:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **lines should not be more than 80 characters.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:165:113:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:177:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:237:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:297:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:360:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:430:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:165:529:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L165) *style:* **Put spaces around all infix operators.**
```r
      EffSize_text <- paste("Based on Cohen (1988) recommandations, there is a probability of ", round(verylarge*100, 2), "% that this effect size is very large, ", round(large*100, 2), "% that this effect size is large, ", round(medium*100, 2), "% that this effect size is medium, ", round(small*100, 2), "% that this effect size is small, ", round(verysmall*100, 2), "% that this effect is very small and ", round(opposite_prob*100, 2), "% that it has an opposite direction (between 0 and ", signif(opposite_max, 2), ").", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:207:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L207) *style:* **Put spaces around all infix operators.**
```r
  summary <- data.frame(Variable=names(values), MPE=MPEs, Median=medians,
                               ~^~
```
[R/analyze.stanreg.R:207:52:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L207) *style:* **Put spaces around all infix operators.**
```r
  summary <- data.frame(Variable=names(values), MPE=MPEs, Median=medians,
                                                  ~^~
```
[R/analyze.stanreg.R:207:65:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L207) *style:* **Put spaces around all infix operators.**
```r
  summary <- data.frame(Variable=names(values), MPE=MPEs, Median=medians,
                                                               ~^~
```
[R/analyze.stanreg.R:208:28:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L208) *style:* **Put spaces around all infix operators.**
```r
                        MAD=mads, Mean=means, SD=sds,
                          ~^~
```
[R/analyze.stanreg.R:208:39:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L208) *style:* **Put spaces around all infix operators.**
```r
                        MAD=mads, Mean=means, SD=sds,
                                     ~^~
```
[R/analyze.stanreg.R:208:49:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L208) *style:* **Put spaces around all infix operators.**
```r
                        MAD=mads, Mean=means, SD=sds,
                                               ~^~
```
[R/analyze.stanreg.R:209:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L209) *style:* **Put spaces around all infix operators.**
```r
                        CI_lower=CIs[seq(1, length(CIs), 2)],
                               ~^~
```
[R/analyze.stanreg.R:210:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L210) *style:* **Put spaces around all infix operators.**
```r
                        CI_higher=CIs[seq(2, length(CIs), 2)])
                                ~^~
```
[R/analyze.stanreg.R:212:18:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L212) *style:* **Put spaces around all infix operators.**
```r
  if (Effect_Size==T){
                ~^~~
```
[R/analyze.stanreg.R:231:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L231) *style:* **lines should not be more than 80 characters.**
```r
  info <- paste("We fitted a Markov Chain Monte Carlo [type] model to predict [Y] with [X] (formula =", fit$formula, "). Priors were set as follow: [INSERT INFO ABOUT PRIORS].", sep="")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:231:182:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L231) *style:* **Put spaces around all infix operators.**
```r
  info <- paste("We fitted a Markov Chain Monte Carlo [type] model to predict [Y] with [X] (formula =", fit$formula, "). Priors were set as follow: [INSERT INFO ABOUT PRIORS].", sep="")
                                                                                ~^~
```
[R/analyze.stanreg.R:237:20:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L237) *style:* **Put spaces around all infix operators.**
```r
    if (Effect_Size==T){
                  ~^~~
```
[R/analyze.stanreg.R:250:21:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L250) *style:* **Put spaces around all infix operators.**
```r
    rename_(Variable="key", Coefficient="value") %>%
                   ~^~
```
[R/analyze.stanreg.R:250:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L250) *style:* **Put spaces around all infix operators.**
```r
    rename_(Variable="key", Coefficient="value") %>%
                                      ~^~
```
[R/analyze.stanreg.R:251:24:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L251) *style:* **Put spaces around all infix operators.**
```r
    ggplot(aes_string(x="Variable", y="Coefficient", fill="Variable")) +
                      ~^~
```
[R/analyze.stanreg.R:251:38:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L251) *style:* **Put spaces around all infix operators.**
```r
    ggplot(aes_string(x="Variable", y="Coefficient", fill="Variable")) +
                                    ~^~
```
[R/analyze.stanreg.R:251:58:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L251) *style:* **Put spaces around all infix operators.**
```r
    ggplot(aes_string(x="Variable", y="Coefficient", fill="Variable")) +
                                                        ~^~
```
[R/analyze.stanreg.R:253:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L253) *style:* **Put spaces around all infix operators.**
```r
    geom_boxplot(fill="grey", alpha=0.3, outlier.shape=NA) +
                    ~^~
```
[R/analyze.stanreg.R:253:36:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L253) *style:* **Put spaces around all infix operators.**
```r
    geom_boxplot(fill="grey", alpha=0.3, outlier.shape=NA) +
                                  ~^~
```
[R/analyze.stanreg.R:253:55:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L253) *style:* **Put spaces around all infix operators.**
```r
    geom_boxplot(fill="grey", alpha=0.3, outlier.shape=NA) +
                                                     ~^~
```
[R/analyze.stanreg.R:254:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L254) *style:* **lines should not be more than 80 characters.**
```r
    stat_summary(fun.y = "mean", geom = "errorbar", aes_string(ymax = "..y..", ymin = "..y.."), width = .75, linetype = "dashed", colour="red") +
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:254:137:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L254) *style:* **Put spaces around all infix operators.**
```r
    stat_summary(fun.y = "mean", geom = "errorbar", aes_string(ymax = "..y..", ymin = "..y.."), width = .75, linetype = "dashed", colour="red") +
                                                                                ~^~
```
[R/analyze.stanreg.R:255:30:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L255) *style:* **Put spaces around all infix operators.**
```r
    geom_hline(aes(yintercept=0)) +
                            ~^~
```
[R/analyze.stanreg.R:258:30:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L258) *style:* **Put spaces around all infix operators.**
```r
    scale_fill_brewer(palette="Set1") +
                            ~^~
```
[R/analyze.stanreg.R:259:32:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L259) *style:* **Put spaces around all infix operators.**
```r
    scale_colour_brewer(palette="Set1")
                              ~^~
```
[R/analyze.stanreg.R:262:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L262) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                    ~^~
```
[R/analyze.stanreg.R:262:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L262) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                               ~^~
```
[R/analyze.stanreg.R:262:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L262) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                             ~^~
```
[R/analyze.stanreg.R:262:63:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/analyze.stanreg.R#L262) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                                             ~^~
```
[R/assess.R:23:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L23) *style:* **lines should not be more than 80 characters.**
```r
assess <- function(score, mean=0, sd=1, linecolor="#E91E63", fillcolor="#2196F3", verbose=T) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/assess.R:31:50:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L31) *style:* **Put spaces around all infix operators.**
```r
  values$distribution <- stats::rnorm(50000, mean=mean, sd=sd)
                                                ~^~
```
[R/assess.R:31:59:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L31) *style:* **Put spaces around all infix operators.**
```r
  values$distribution <- stats::rnorm(50000, mean=mean, sd=sd)
                                                         ~^~
```
[R/assess.R:33:27:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L33) *style:* **Put spaces around all infix operators.**
```r
  values$z_score <- (score-mean)/sd
                         ~^~
```
[R/assess.R:33:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L33) *style:* **Put spaces around all infix operators.**
```r
  values$z_score <- (score-mean)/sd
                               ~^~
```
[R/assess.R:37:30:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L37) *style:* **Put spaces around all infix operators.**
```r
  summary <- data.frame(Score=score)
                            ~^~
```
[R/assess.R:46:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L46) *style:* **lines should not be more than 80 characters.**
```r
      warning('Multiple scores were provided. Returning a list containing summmary and values.')
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/assess.R:46:15:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L46) *style:* **Only use double-quotes.**
```r
      warning('Multiple scores were provided. Returning a list containing summmary and values.')
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/assess.R:48:27:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L48) *style:* **Put spaces around all infix operators.**
```r
    output <- list(summary=summary, values=values)
                         ~^~
```
[R/assess.R:48:43:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L48) *style:* **Put spaces around all infix operators.**
```r
    output <- list(summary=summary, values=values)
                                         ~^~
```
[R/assess.R:65:42:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L65) *style:* **Put spaces around all infix operators.**
```r
                as.character(round((score-mean)/sd, 2)),
                                        ~^~
```
[R/assess.R:65:48:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L65) *style:* **Put spaces around all infix operators.**
```r
                as.character(round((score-mean)/sd, 2)),
                                              ~^~
```
[R/assess.R:74:54:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L74) *style:* **Put spaces around all infix operators.**
```r
                as.character((round(values$percentile*100, 2))),
                                                    ~^~
```
[R/assess.R:75:53:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L75) *style:* **Put spaces around all infix operators.**
```r
                " % of the general population.", sep="")
                                                   ~^~
```
[R/assess.R:79:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L79) *style:* **Put spaces around all infix operators.**
```r
  plot <- data.frame(Distribution=values$distribution) %>%
                                ~^~
```
[R/assess.R:80:24:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L80) *style:* **Put spaces around all infix operators.**
```r
    ggplot(aes_string(x="Distribution")) +
                      ~^~
```
[R/assess.R:81:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L81) *style:* **Put spaces around all infix operators.**
```r
    geom_density(fill=fillcolor, colour="white", adjust = 3, na.rm=TRUE) +
                    ~^~
```
[R/assess.R:81:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L81) *style:* **Put spaces around all infix operators.**
```r
    geom_density(fill=fillcolor, colour="white", adjust = 3, na.rm=TRUE) +
                                      ~^~
```
[R/assess.R:81:67:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L81) *style:* **Put spaces around all infix operators.**
```r
    geom_density(fill=fillcolor, colour="white", adjust = 3, na.rm=TRUE) +
                                                                 ~^~
```
[R/assess.R:82:26:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L82) *style:* **Put spaces around all infix operators.**
```r
    geom_vline(xintercept=score, size = 2, color=linecolor) +
                        ~^~
```
[R/assess.R:82:49:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L82) *style:* **Put spaces around all infix operators.**
```r
    geom_vline(xintercept=score, size = 2, color=linecolor) +
                                               ~^~
```
[R/assess.R:86:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L86) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                    ~^~
```
[R/assess.R:86:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L86) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                               ~^~
```
[R/assess.R:86:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L86) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                             ~^~
```
[R/assess.R:86:63:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/assess.R#L86) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                                             ~^~
```
[R/correlation.R:39:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L39) *style:* **lines should not be more than 80 characters.**
```r
correlation <- function(df, df2=NULL, type="full", method="pearson", adjust="holm") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:48:11:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L48) *style:* **Put spaces around all infix operators.**
```r
  if (type=="full"){
         ~^~~
```
[R/correlation.R:49:32:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L49) *style:* **Put spaces around all infix operators.**
```r
    r <- psych::corr.test(df, y=df2, use="pairwise", method=method)$r
                              ~^~
```
[R/correlation.R:49:41:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L49) *style:* **Put spaces around all infix operators.**
```r
    r <- psych::corr.test(df, y=df2, use="pairwise", method=method)$r
                                       ~^~
```
[R/correlation.R:49:60:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L49) *style:* **Put spaces around all infix operators.**
```r
    r <- psych::corr.test(df, y=df2, use="pairwise", method=method)$r
                                                          ~^~
```
[R/correlation.R:57:13:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L57) *style:* **Put spaces around all infix operators.**
```r
    if (type=="partial"){
           ~^~~
```
[R/correlation.R:58:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L58) *style:* **Put spaces around all infix operators.**
```r
      r <- ppcor::pcor(df, method=method)$estimate
                                ~^~
```
[R/correlation.R:60:13:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L60) *style:* **Put spaces around all infix operators.**
```r
    if (type=="semi"){
           ~^~~
```
[R/correlation.R:61:35:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L61) *style:* **Put spaces around all infix operators.**
```r
      r <- ppcor::spcor(df, method=method)$estimate
                                 ~^~
```
[R/correlation.R:68:34:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L68) *style:* **Put spaces around all infix operators.**
```r
  p <- psych::corr.p(r, n, adjust=adjust)$p
                                ~^~
```
[R/correlation.R:69:35:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L69) *style:* **Put spaces around all infix operators.**
```r
  ci <- psych::corr.p(r, n, adjust=adjust)$ci
                                 ~^~
```
[R/correlation.R:73:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L73) *style:* **lines should not be more than 80 characters.**
```r
  mystars <- ifelse(p < .001, "***", ifelse(p < .01, "** ", ifelse(p < .05, "* ", " ")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:76:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L76) *style:* **lines should not be more than 80 characters.**
```r
  ## build a new matrix that includes the correlations with their apropriate stars
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:77:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L77) *style:* **Put spaces around all infix operators.**
```r
  table <- matrix(paste(r_format, mystars, sep=""), ncol=ncol(df))
                                             ~^~
```
[R/correlation.R:77:57:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L77) *style:* **Put spaces around all infix operators.**
```r
  table <- matrix(paste(r_format, mystars, sep=""), ncol=ncol(df))
                                                       ~^~
```
[R/correlation.R:78:48:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L78) *style:* **Put spaces around all infix operators.**
```r
  diag(table) <- paste(diag(r_format), " ", sep="")
                                              ~^~
```
[R/correlation.R:80:49:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L80) *style:* **Put spaces around all infix operators.**
```r
  colnames(table) <- paste(colnames(df), "", sep="")
                                               ~^~
```
[R/correlation.R:86:39:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L86) *style:* **Put spaces around all infix operators.**
```r
  table <- cbind(table[1:length(table)-1])
                                     ~^~
```
[R/correlation.R:91:19:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L91) *style:* **Put spaces around all infix operators.**
```r
  values <- list(r=r, p=p, ci=ci, table=table)
                 ~^~
```
[R/correlation.R:91:24:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L91) *style:* **Put spaces around all infix operators.**
```r
  values <- list(r=r, p=p, ci=ci, table=table)
                      ~^~
```
[R/correlation.R:91:30:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L91) *style:* **Put spaces around all infix operators.**
```r
  values <- list(r=r, p=p, ci=ci, table=table)
                            ~^~
```
[R/correlation.R:91:40:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L91) *style:* **Put spaces around all infix operators.**
```r
  values <- list(r=r, p=p, ci=ci, table=table)
                                      ~^~
```
[R/correlation.R:120:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L120) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                    ~^~
```
[R/correlation.R:120:33:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L120) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                               ~^~
```
[R/correlation.R:120:47:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L120) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                             ~^~
```
[R/correlation.R:120:63:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/correlation.R#L120) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=text, plot=plot, summary=summary, values=values)
                                                             ~^~
```
[R/find_season.R:18:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/find_season.R#L18) *style:* **lines should not be more than 80 characters.**
```r
  season <- factor(quarters(d), labels = c("Winter", "Spring", "Summer", "Fall"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/format_p.R:12:1:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/format_p.R#L12) *style:* **lines should not be more than 80 characters.**
```r
                                  ifelse(pvalues < 0.1, paste(round(pvalues, 2), "\xB0", sep=""), "> .1"))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/format_p.R:12:93:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/R/format_p.R#L12) *style:* **Put spaces around all infix operators.**
```r
                                  ifelse(pvalues < 0.1, paste(round(pvalues, 2), "\xB0", sep=""), "> .1"))))
                                                                                ~^~
```
[tests/testthat/test-analyze.stanreg.R:8:9:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-analyze.stanreg.R#L8) *style:* **Put spaces around all infix operators.**
```r
    data=mtcars,
       ~^~
```
[tests/testthat/test-analyze.stanreg.R:9:11:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-analyze.stanreg.R#L9) *style:* **Put spaces around all infix operators.**
```r
    family=binomial(link = "logit"),
         ~^~
```
[tests/testthat/test-analyze.stanreg.R:10:10:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-analyze.stanreg.R#L10) *style:* **Put spaces around all infix operators.**
```r
    prior=NULL,
        ~^~
```
[tests/testthat/test-analyze.stanreg.R:11:9:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-analyze.stanreg.R#L11) *style:* **Put spaces around all infix operators.**
```r
    seed=666)
       ~^~
```
[tests/testthat/test-correlation.R:4:21:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-correlation.R#L4) *style:* **Put spaces around all infix operators.**
```r
  df <- data.frame(A=c(1,2,3,4,5), B=c(2,5,1,4,2), C=c(2,5,1,6,2))
                   ~^~
```
[tests/testthat/test-correlation.R:4:37:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-correlation.R#L4) *style:* **Put spaces around all infix operators.**
```r
  df <- data.frame(A=c(1,2,3,4,5), B=c(2,5,1,4,2), C=c(2,5,1,6,2))
                                   ~^~
```
[tests/testthat/test-correlation.R:4:53:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-correlation.R#L4) *style:* **Put spaces around all infix operators.**
```r
  df <- data.frame(A=c(1,2,3,4,5), B=c(2,5,1,4,2), C=c(2,5,1,6,2))
                                                   ~^~
```
[tests/testthat/test-plot.psychobject.R:4:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-plot.psychobject.R#L4) *style:* **Put spaces around all infix operators.**
```r
  output <- list(plot=1)
                    ~^~
```
[tests/testthat/test-print.psychobject.R:4:22:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-print.psychobject.R#L4) *style:* **Put spaces around all infix operators.**
```r
  output <- list(text=1)
                    ~^~
```
[tests/testthat/test-values.psychobject.R:4:24:](https://github.com/vsimko/psycho.R/blob/8e04d4c22c294ad95018b8310c30426fbc669d1b/tests/testthat/test-values.psychobject.R#L4) *style:* **Put spaces around all infix operators.**
```r
  output <- list(values=1)
                      ~^~
```


I think that is not the best idea. Instead we need an index file in the root folder. The example should be named as what it is. We can have an index file in examples too, that indexes the examples. (or link them only from the wiki, if Henrique prefers that.

I will revert the rename, and create those two index files in a very simple form. I understand that we need an easier way to access the examples. :-)


this change seems to have caused problems with angular-cli bundling.  It seems to bundle two copies of core.


c


Yup baobab, eog, file-roller, gnome-calc, etc all work.


In IntelliJ, this exception is thrown... Running with `java` it works!


Compilers aren't very fond of this cast.


# # # _**пива**_


Übelst nice!!


test path


Task 2.3
figure();
subplot(3,1,1), plot(ecgDetrend), xlim([3100 3600]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');

subplot(3,1,2), plot(ecgf5), xlim([3100 3600]);
title('Поліноміальний фільтр');
xlabel('t'), ylabel('A');

subplot(3,1,3),plot(y), xlim([3100 3600]);
title('Фільтр Хеннінга');
xlabel('t'), ylabel('A');


Ele cria  um texto em negrito pra você como se fosse um título pras variáveis de baixo, é bem útil pra organizar.


Task 3.1
br = [1 0.618 1];
ar = 1;
n =  512;
fs = 200;
figure();
[h,w] = freqz(br, ar, n, fs);
mag = abs(h);
phase = angle(h)*180/pi;
subplot(2,1,1), plot(w/(2*pi)*fs, mag), grid on;
title('АЧХ');
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w/(2*pi)*fs, unwrap(phase)), grid on;
title('ФЧХ');
xlabel('fs'), ylabel('P');

disp('Нулі режекторного фільтру');
xr = roots(br)
figure();
zp = zplane(xr);
disp('Передавальна функція');
H = filt (br, ar)


good


Didn't take you for a mathematician ;)


Created multidev environment [natalie-sandbox#pr-narrativ](https://dashboard.pantheon.io/sites/ee1a9f88-1cc8-4eca-a8a6-7dc1433bb37e#pr-narrativ).

[![Visit Site](https://raw.githubusercontent.com/pantheon-systems/ci-drops-8/0.1.0/data/img/visit-site-36.png)](https://pr-narrativ-natalie-sandbox.pantheonsite.io/)


cdba


:joy: :joy:


Task 3.2
fs = 60;
ecg = load('ecg2x60.dat');
ecgD = detrend(ecg);
ecgFilt = filter(br, ar, ecgD);
t = (0:length(ecgD)-1)/fs;
figure();
subplot(2,1,1), plot(t, ecgD), xlim([2 7.3]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(2,1,2), plot(t, ecgFilt), xlim([2 7.3]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');


probably needs a `if (subscriber != null)` here


return the index not the element


doesn't need the `Component`.

`Component` should only be used when you need to manage `state` or need to include helper functions that assist the rendering.


Set the low as the index not the element.


Set the high as the index not the element.


Task 4.1
fs = 1000;
bd1 = [1 -1];
ad1 = 1;
bd2 = [1 -1]/2;
ad2 = 1;
n = 512;
figure();
[h1,w1] = freqz(bd1, ad1, n);
mag1 = abs(h1);
phase1 = angle(h1)*180/pi;
subplot(2,1,1), plot(w1/(2*pi)*fs, mag1), grid on;
title('АЧХ №1');
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w1/(2*pi)*fs, unwrap(phase1)), grid on;
title('ФЧХ №1');
xlabel('fs'), ylabel('P');
figure();
[h2,w2] = freqz(bd2, ad2, n);
mag2 = abs(h2);
phase2 = angle(h2)*180/pi;
subplot(2,1,1), plot(w2/(2*pi)*fs, mag2), grid on;
title('АЧХ №2');
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w2/(2*pi)*fs, unwrap(phase2)), grid on;
title('ФЧХ №2');
xlabel('fs'), ylabel('P');

H1 = filt (bd1, ad1)
H2 = filt (bd2, ad2)
H1 =1 - z^-1
 H2 =0.5 - 0.5 z^-1


Just fixed the windows "\" issue, new binaries available https://github.com/yosh778/YsVIII-tools/releases


`Preview` is rendered by all React apps in the page by some reason and a shadow of piece images looks bolder if there are multiple `Kifu`. Added signature for each `Kifu` and used it for checking if the piece being dragged is on the `Kifu` or not.


locally I've fixed this by replacing
```reinterpret_cast<void*>(sizeof(float) * offset)```
with
```(const float*)(0) +  offset```
which compiles.

Haven't pushed to prevent merge collisions


Task 4.2
fs = 1000;
ecg = load('ecg117.dat');
ecgd1 = filter(bd1, ad1, ecg);
t1 = (0:length(ecgd1)-1)/fs;
figure();
subplot(2,1,1), plot(t1, ecg), xlim([1.1 1.6]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(2,1,2), plot(t1, ecgd1), xlim([1.1 1.6]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');

ecgd2 = filter(bd2, ad2, ecg);
t2 = (0:length(ecgd2)-1)/fs;
figure();
subplot(2,1,1), plot(t2, ecg), xlim([1.1 1.6]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(2,1,2), plot(t2, ecgd2), xlim([1.1 1.6]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');


Neat :) But if it's an error, should it still be labeled "Impossible"?


**Nice comit bro!**


Thanks for clarifying it! I've opened a [PR](https://github.com/NixOS/nixpkgs/pull/30132) to remove the now unused file kde-locale-5.nix.


Some people would want to stay downgraded for no reason. People will complain about this. I agree its useless though. They should just update.


Lines 29 and 33 should be swapped


> I have been wondering why do you still keep QMPlay2 as Qt4 compatible? when Qt4 has been EOL for a long time now

Just removed Qt4 support in master branch

> QML is like JS on steroids and it's great for UI stuff...as many do find QML to be better for UI than C++

Maybe on mobile devices (I still miss C++ UI designing - QtQuick is written i C++, so why don't make public classes?), but on desktop it works horrible (see their designer in QtCreator - mouse event bugs, mouse is released when window loses focus (e.g. press mouse button and do alt+tab - on QtWidgets mouse still is pressed in app makes it more convenient to use), lags, flickers when resizing, etc.).

> KDE remade their plasma desktop to use QML instead of C++ as it was more slower..

KDE is slow no matter which technology they use. I was a big KDE fan for many years, but now I use something more simple and faster. A desktop which doesn't use 100% CPU core and also GPU power when moving icons or selecting them 😄

QML engine is written in C++, QtQuick is written in C++.
Maybe QtQuick2 can be faster in complicated UI because of OpenGL rendering. QtWidgets uses CPU only, but when `QOpenGLWidget` or `QQuickWidget` is used, it still paints every other widget on CPU and then Qt uploads it into OpenGL probably not using the fastest methods (also possible BGR<->RGB conversion on CPU depends on drivers, etc.). But this is Qt issue, not C++.

> have u heard about OVD (Open Video Decode)

No


The patch is committed and uploaded :) Thanks for reporting and fixing the bug


Não entendi muito bem, seria algo tipo:

bool alemDaVisao = distancia > status.DistanciaDeVisao;


I have no Idea, this is 1st time.


Is there any reason to use the `(symbol, id)` form, then? If so, should we document what the difference is?


add add add, clean clean clean


Thank you!


It is not possible with any PHP script we use... The supervisor api was worse, I'd say.
But we could somehow create another mini-API as external container and send commands there.


Essa variável só tá marcando o tempo mesmo como um timer


Whoops! I bundled in another change here! It was what I was trying to change when I noticed the problem.


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/feb60323-3b1c-4541-8392-6e7a92980b22 "application1234"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/578c35b7-d2d0-46cb-b810-80d37b63f1c2 "application1234") deployed [application1234](https://github.com/Namish123/application1234/releases/tag/deploy-ibm-yp-au-syd-LNMIIT-1-project-20171005-175910 "deploy-ibm-yp-au-syd-LNMIIT-1-project-20171005-175910") to [project](https://console.bluemix.net/apps/783a3310-22f2-4ac4-b420-b522a68fc5ed?env_id=ibm:yp:au-syd "ibm:yp:au-syd:LNMIIT 1:project"), including this commit


associating with #4


Eu também tentei quando fui criar a variável hehe


extraida


Правильнее было бы назвать getEncodedOutput.


Coloquei numa variável public pra depois poder balancear se necessário


comme pour les types de contenus, je vais faire un tableau de correspondance qui sera la référence. Comme discuté et mentionné dans la notes :
* les Thématiques sont abandonnés en tant que mot-clé et deviennent un attribut de classement de l'article : [soit déclaré, soit calculé](https://github.com/timoguic/sp_hub/blob/master/doc/20170914_RecapReunion9sept.md#th%C3%A9matiques).
* Les "regroupements thématiques" deviennent les "sujets"


doesn't do the trick :(
http://buildbot.springrts.com/builders/full-windows-x64/builds/1718/steps/buildConfigNinja/logs/stdio


Getting blank items now. You forgot two more references to mdChipItems.


Se eu tivesse fazendo pra mim eu iria usar o mathf.clamp talvez eu possa até usar uma vez pra mostrar


my version doesn't work, will apply yours


could you please push this to maven central?


si tu as une solution plus pertinente, ça me va très bien.


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/017bb02b-c8a3-4577-ae4f-73c618b69b33 "simple-toolchain-20171005165859929"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/f2417e94-1922-4daf-a759-237f4e2c515e "simple-toolchain-20171005165859929") deployed [simple-toolchain-20171005165859929](https://github.com/kentrubin-ibm/simple-toolchain-20171005165859929/releases/tag/deploy-ibm-yp-us-south-kent.rubin-ibm.com-API-Labs-20171005-180352 "deploy-ibm-yp-us-south-kent.rubin-ibm.com-API-Labs-20171005-180352") to [API Labs](https://console.bluemix.net/apps/c94a795d-cd4d-4192-96da-32037eeec071?env_id=ibm:yp:us-south "ibm:yp:us-south:kent.rubin@ibm.com:API Labs"), including this commit


Will be fixed soon...


그렇게 merge실패하고 이전 커밋으로 되돌리다가 돌아버릴뻔했습니다


un mot-clé auteur pourrait être aligné (les interfaces vont nous pousser à aligner un maximum de mots, même les mots-clés auteurs). Et par ailleurs, c'est une information suffisamment pertinente d'un point de vue "métier" pour qu'elle soit présente.
à valider avec @marviro @ServanneMo


[Jenkins vg tests](http://jenkins.cgcloud.info/job/vg/740/) complete for merge to master.  View the [full report here](http://cgl-pipeline-inputs.s3.amazonaws.com/vg_cgl/vg_ci/jenkins_reports/branch/master/index.html).

10 tests passed, 0 tests failed and 11 tests skipped in 10622 seconds

Tests produced 1978 warnings. 1973 were for lower-than-expected alignment scores


Why not just use `DECLARATION_NAME`?


@Vicsta Normally Github is not made for committing Binary files. See this for creating releases: https://help.github.com/articles/creating-releases/


Also `?: callableDeclaration?.valueParameterList`, for the case of expected extension and actual non-extension.


Bluemix [toolchain](https://console-regional.stage1.ng.bluemix.net/devops/toolchains/41151e63-f76a-4fea-ac66-4d4b3d0c8a23 "simple-toolchain-elobeto-ys1"): [Delivery Pipeline](https://console-regional.stage1.ng.bluemix.net/devops/pipelines/5e026325-9066-479b-a5b8-57afd37deac7 "simple-toolchain-elobeto-ys1") deployed [simple-toolchain-elobeto-ys1](https://github.com/eLobeto/simple-toolchain-elobeto-ys1/releases/tag/deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-180916 "deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-180916") to [dev](https://console.stage1.bluemix.net/apps/c037a3c8-73e8-40b1-9235-46ee466f5beb?env_id=ibm:ys1:us-south "ibm:ys1:us-south:elobeto@us.ibm.com:dev"), including this commit


Isso é uma implementação do Unity as Coroutines aqui funcionam diferente ela pode parar a execução retornando o que foi realizado até agora e depois continuar de onde parou


Hi, JeanPaul.

I joined github with the purpose of asking your help, because I am a nppcrypt user and I had a problem with one encrypted file. My file and my nppcrypt plugin where right until May... in May, Notepad++ updated and it seems that didn't updated properly and when I try to decrypt my file with AES256 ECB it says: Failed to read Hex!...
I probbed to encrypt and decrypt another file and it works, so it seems the file has now some kind of problem...
I am worried because I don't know what to do... any clue or help about what to do would be great... thanks in advance.

Julian.


Thanks y'all. <3  Good to be back - I've got a lot of catching up to do, but hopefully this weekend or next week I'll be caught up enough on pri 1 tasks internally that I'll be able to go through the Github issues that have been added recently!


I can live with this, thanks!


Bluemix [toolchain](https://console-regional.stage1.ng.bluemix.net/devops/toolchains/41151e63-f76a-4fea-ac66-4d4b3d0c8a23 "simple-toolchain-elobeto-ys1"): [Delivery Pipeline](https://console-regional.stage1.ng.bluemix.net/devops/pipelines/5e026325-9066-479b-a5b8-57afd37deac7 "simple-toolchain-elobeto-ys1") deployed [simple-toolchain-elobeto-ys1](https://github.com/eLobeto/simple-toolchain-elobeto-ys1/releases/tag/deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-181206 "deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-181206") to [dev](https://console.stage1.bluemix.net/apps/2ab83cfd-27ed-4205-99fc-21e06230a8c9?env_id=ibm:ys1:us-south "ibm:ys1:us-south:elobeto@us.ibm.com:dev"), including this commit


I'd prefer reporting this on the declaration's name, not on the `enum` modifier. Diagnostics on modifiers make me think I messed up with that modifier and I need to delete or replace it, but here the problem is not in the modifier, it's in the class body.


whyyyyyy thooooooo


Thanks!


Bluemix [toolchain](https://console-regional.stage1.ng.bluemix.net/devops/toolchains/41151e63-f76a-4fea-ac66-4d4b3d0c8a23 "simple-toolchain-elobeto-ys1"): [Delivery Pipeline](https://console-regional.stage1.ng.bluemix.net/devops/pipelines/5e026325-9066-479b-a5b8-57afd37deac7 "simple-toolchain-elobeto-ys1") deployed [simple-toolchain-elobeto-ys1](https://github.com/eLobeto/simple-toolchain-elobeto-ys1/releases/tag/deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-181423 "deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-181423") to [dev](https://console.stage1.bluemix.net/apps/91fa21a9-255d-4eca-82a7-428a7b62df84?env_id=ibm:ys1:us-south "ibm:ys1:us-south:elobeto@us.ibm.com:dev"), including this commit


По дизайну все норм. Код не запускал. Но по общепринятым правилам  утилитные классы принято помечать как  final и определять в них приватный конструктор по умолчанию.
https://stackoverflow.com/questions/32375149/is-it-mandatory-utility-class-should-be-final-and-private-constructor


I recommended they commit the APK so you'll have an easier time testing it
:)
How are you planning on grading it without actually running the app?

On Thu, Oct 5, 2017 at 2:07 PM, Amanpreet Singh <notifications@github.com>
wrote:

> @Vicsta <https://github.com/vicsta> Normally Github is not made for
> committing Binary files. See this for creating releases:
> https://help.github.com/articles/creating-releases/
>
> —
> You are receiving this because you are subscribed to this thread.
> Reply to this email directly, view it on GitHub
> <https://github.com/yoav-zibin/GamePortalAndroid/commit/bc75a19d92996d60d575e1edce16047765bfb97c#commitcomment-24787450>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/ABzZHYkWVHn1LAxj1JndM1-C4Leq7_kGks5spRrbgaJpZM4PveoO>
> .
>


You deleted `resources/EOS.gif`?


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/017bb02b-c8a3-4577-ae4f-73c618b69b33 "simple-toolchain-20171005165859929"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/f2417e94-1922-4daf-a759-237f4e2c515e "simple-toolchain-20171005165859929") deployed [simple-toolchain-20171005165859929](https://github.com/kentrubin-ibm/simple-toolchain-20171005165859929/releases/tag/deploy-ibm-yp-us-south-kent.rubin-ibm.com-API-Labs-20171005-181537 "deploy-ibm-yp-us-south-kent.rubin-ibm.com-API-Labs-20171005-181537") to [API Labs](https://console.bluemix.net/apps/d64151b3-b68c-4baa-899b-a2cf306ebb0c?env_id=ibm:yp:us-south "ibm:yp:us-south:kent.rubin@ibm.com:API Labs"), including this commit


> Did you check somewhere that MAX_THOUSANDTHS_COST <= 1000?

Should I check also constants?


WTF??


I'll check your improvement. But must split my extension into two different branches for TYPO3 7 and 8, cause they have important changes, which can not be in same Version of mine.


great


xD, i know, i didn't have the time to push fixed commit yet. C haven't sunk deep enough yet


tu vas trouver des informations là-dessus [ici](https://github.com/EcrituresNumeriques/sensPublicApp/blob/master/doc/cahiersDesCharges.md#types-de-contenu) et [ici](https://github.com/EcrituresNumeriques/sensPublicApp/blob/master/doc/specifications_Conversation.md), et bien-sûr [dans les métadonnées](https://github.com/EcrituresNumeriques/chaineEditorialeSP/blob/master/yamlSP.md) de l'article sur lesquelles on se base.
L'information est assez éclatée sur les diff. projets et par ailleurs, on ne l'avait pas encore abordé pour SP_hub puisqu'on était encore dans la logique d'un prototype rapide où toutes les données éditoriales n'étaient pas abordées.
Mais le type d'article est bien une caractérisation de contenu qu'on va conserver dans la plateforme.


will do


Also set `errors='replace'` to be consistent with other usage of `utf-8` in this project.


test


Что за ад тут с форматированием произошел? :flushed:


Sure! ;)


[R/irlba.R:228:1:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/irlba.R#L228) *style:* **Lines should not be more than 130 characters.**
```r
    warning("The deflation options are deprecated and have been removed as formal arugments. Please modify your code to not use them.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/irlba.R:322:28:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/irlba.R#L322) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  fastpath <- fastpath && (("Matrix" %in% attributes(class(A)) && ("dgCMatrix" %in% class(A))) || "matrix" %in% class(A))
                           ^
```
[R/irlba.R:330:1:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/irlba.R#L330) *style:* **Lines should not be more than 130 characters.**
```r
      if (verbose) message("Initializing starting vector v with samples from standard normal distribution.\nUse `set.seed` first for reproducibility.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/prcomp.R:94:35:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/prcomp.R#L94) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        f <- function(i) sqrt(sum((x[, i] - center[i]) ^ 2) / (nrow(x) - 1L))
                                  ^
```
[R/svdr.R:112:7:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/svdr.R#L112) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(max(abs((d1 - d) / d)) < tol) break
      ^
```
[R/svdr.R:112:16:](https://github.com/bwlewis/irlba/blob/579eb63298dc6ce03319d4908c8e1ee32fb0f3bc/R/svdr.R#L112) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(max(abs((d1 - d) / d)) < tol) break
               ^
```


Awesome! Thank you @unional!


effectivement, il y a des données "dont on se sert", et des données pertinentes pour l'édition. Auteur et éditeur, sont deux métadonnées bien distinctes et relativement standards. Même Dublin Core les intègre (c'est pour dire). Donc oui, il faudra probablement retenir ces deux infos dans le modèle.
@ServanneMo @marviro , qu'en pensez vous ?


Bluemix [toolchain](https://console-regional.stage1.ng.bluemix.net/devops/toolchains/41151e63-f76a-4fea-ac66-4d4b3d0c8a23 "simple-toolchain-elobeto-ys1"): [Delivery Pipeline](https://console-regional.stage1.ng.bluemix.net/devops/pipelines/5e026325-9066-479b-a5b8-57afd37deac7 "simple-toolchain-elobeto-ys1") deployed [simple-toolchain-elobeto-ys1](https://github.com/eLobeto/simple-toolchain-elobeto-ys1/releases/tag/deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-182305 "deploy-ibm-ys1-us-south-elobeto-us.ibm.com-dev-20171005-182305") to [dev](https://console.stage1.bluemix.net/apps/939ca968-0f76-454e-864f-56c8b2f7a102?env_id=ibm:ys1:us-south "ibm:ys1:us-south:elobeto@us.ibm.com:dev"), including this commit


nice, thanks for the quick fix. Now all we need is to set getTranslationsFromFiles to public and you've made my night 🥇  One thing I noticed that langman does not do is actually clean old strings that no longer exist in our files. So we just run this to overwrite old 'base' translation file

            $manager = app(Manager::class);
            $keysFromFiles = array_collapse($manager->getTranslationsFromFiles());
            $newStrings = array_combine($keysFromFiles, $keysFromFiles);
            ksort($newStrings);
            $manager->saveTranslations(['en' => $newStrings]);

would prefer to use your getTranslationsFromFiles rather than copying whole method, or manually change to public 😈


Better use `__DIR__` ?  This way you do not rely on the webserver config in any case and would work in CLI context, too.


Or put a short bash/Python script into the SOGo container that creates a socket file on a volume shared between the SOGo and PHP containers. When the latter writes a certain string to the socket, the former restarts the SOGo surface. Should be pretty easy, doesn’t require another container and has even less attack surface than the supervisor API because it doesn‘t run over TCP and can only execute a single task.


Tested - you can also use `open(_CONFIG_FILE, 'rb')`, and `ruamel.yaml` handles the decoding.

It should be different because `open()` uses the default encoding on the machine, which is `utf-8` on most machines but `ascii` in the docker image; and `ruamel.yaml` uses `utf-8` when encoding is not specified.


could you share answers of week 4 quiz ?


Yes, should be changed everywhere. :o :)


a


Wrong committed messages it's chained from here 0839f5


This results in a but due to https://github.com/rollup/rollup-plugin-commonjs/issues/232

Should probably be kept at 15.6.1 until it's fixed


je valide


@banderson5144 What error did you see?  I am now seeing the latest version produce full path names instead of just the last chunk after the path separator.  #24


I guess there is no test with a plot created with one of the active option true and the other one false.


Xjxjxjxjzjzjzjzjzjak


Spelling nit: `recommended` :-)


remove comments...


Some cursor tests have to be fixed after this change :)


I was seeing the error you were seeing. But the fix I put in just gives me the file names.


all hail the firmware


@jollaman999 you didn't get memory corruption in the kernel log?
It's for that https://android.googlesource.com/kernel/common/+/ab10c4d8d6f5a42665e61acec78d64e021f4b68c


[R/Authentication.R:45:5:](https://github.com/RTMC/tmc-rstudio/blob/87b6cf0c2241976c7880eb8f1d8d94be222f2af7/R/Authentication.R#L45) *style:* **Commented code should be removed.**
```r
  # url <- "https://tmc.mooc.fi/api/v8/core/org/hy/courses"
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/TMC_plugin.R:60:9:](https://github.com/RTMC/tmc-rstudio/blob/87b6cf0c2241976c7880eb8f1d8d94be222f2af7/R/TMC_plugin.R#L60) *warning:* **local variable ‘test_name’ assigned but may not be used**
```r
        test_name <- results[[i]]$name
        ^~~~~~~~~
```
[tests/testthat/testLintr.R:2:5:](https://github.com/RTMC/tmc-rstudio/blob/87b6cf0c2241976c7880eb8f1d8d94be222f2af7/tests/testthat/testLintr.R#L2) *style:* **Commented code should be removed.**
```r
#   context("lints")
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/testLintr.R:4:7:](https://github.com/RTMC/tmc-rstudio/blob/87b6cf0c2241976c7880eb8f1d8d94be222f2af7/tests/testthat/testLintr.R#L4) *style:* **Commented code should be removed.**
```r
#     lintr::expect_lint_free()
      ^~~~~~~~~~~~~~~~~~~~~~~~~
```


@jeffswartz can probably say more but here are the logs:

[Log] [LOG] 2017-09-14T22:00:02.269Z - rtcApp.js: – "Initializing app" (utils.js, line 25)
[Log] [LOG] 2017-09-14T22:00:02.290Z - roomController.js: – "/room/xyx" (utils.js, line 25)
[Log] [LOG] 2017-09-14T22:00:02.290Z - roomController.js: – "?userName=xx" (utils.js, line 25)
[Log] [LOG] 2017-09-14T22:00:02.306Z - OTHelper.js: – "checkSystemRequirements:" – 1 (utils.js, line 25)
[Log] [LOG] 2017-09-14T22:00:02.573Z - roomController.js: – "New participant, total:" – 1 – "user:" – "xx" (utils.js, line 25)
[Log] [LOG] 2017-09-14T22:00:02.574Z - roomController.js: – "New participant, total:" – 2 – "user:" – "xx" (utils.js, line 25)
[Error] SyntaxError: JSON Parse error: Unexpected identifier "undefined"
	parse (snoop.js:1:905)
	peerconnection (snoop.js:1:905)
	exports (opentok.min.js:40:305930)
	exports (opentok.min.js:40:410906)
	(anonymous function) (opentok.min.js:40:418070)
	re (opentok.min.js:40:416933)
	ne (opentok.min.js:40:416882)
	p (opentok.min.js:40:282511)
	exports (opentok.min.js:40:282771)
	te (opentok.min.js:40:415511)
	le (opentok.min.js:40:418057)
	processMessage (opentok.min.js:40:420858)
	processMessage (opentok.min.js:40:448842)
	processMessage (opentok.min.js:40:545717)
	(anonymous function) (opentok.min.js:40:384548)
	forEach
	u (opentok.min.js:40:384519)
	u
	(anonymous function) (opentok.min.js:40:247405)
	forEach
	(anonymous function) (opentok.min.js:40:247364)
	trigger (opentok.min.js:40:248598)
	trigger (opentok.min.js:40:246360)
	dispatchJsep (opentok.min.js:40:367097)
	dispatchSubscriber (opentok.min.js:40:367865)
	dispatch (opentok.min.js:40:365230)
	(anonymous function)
	Z (opentok.min.js:40:397851)
	onmessage (opentok.min.js:40:389871)
[Error] OT.exception :: title: undefined (1554) msg: OT.Subscriber PeerConnection Error: OT.Subscriber failed to subscribe to a stream in a reasonable amount of time
	error
	r (opentok.min.js:40:402694)
	handleJsException (opentok.min.js:40:404631)
	De (opentok.min.js:40:540795)
	(anonymous function) (opentok.min.js:40:556562)
[Error] OT_ICE_WORKFLOW_FAILED: ICEWorkflow: Subscriber PeerConnection with connection (not found) failed: OT.Subscriber failed to subscribe to a stream in a reasonable amount of time
	error
	be (opentok.min.js:40:511475)
	(anonymous function) (opentok.min.js:40:516146)
	i (opentok.min.js:40:246011)
	(anonymous function) (opentok.min.js:40:247658)
[Error] OT.exception :: title: undefined (1554) msg: ICEWorkflow: Subscriber PeerConnection with connection (not found) failed: OT.Subscriber failed to subscribe to a stream in a reasonable amount of time
	error
	r (opentok.min.js:40:402694)
	handleJsException (opentok.min.js:40:404631)
	be (opentok.min.js:40:511523)
	(anonymous function) (opentok.min.js:40:516146)
	i (opentok.min.js:40:246011)
	(anonymous function) (opentok.min.js:40:247658)
[Log] [ERROR] 2017-09-14T22:00:34.567Z - roomController.js: – "Error susbscribing new participant. ICEWorkflow: Subscriber PeerConnection with connection (not found) failed: OT.Subscriber failed t…" (utils.js, line 25)
[Error] Unhandled Promise Rejection: TypeError: undefined is not an object (evaluating 'aSubscriber.stream')
	setPreferredResolution (OTHelper.js:523)
	(anonymous function) (roomController.js:178)
	promiseReactionJob


[R/analyze.stanreg.R:57:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L57) *style:* **lines should not be more than 80 characters.**
```r
                          probs = c((100 - CI) / 2 / 100, 1 - (100 - CI) / 2 / 100),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:126:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L126) *style:* **lines should not be more than 80 characters.**
```r
    print("Interpreting effect size following Cohen (1977, 1988)... Make sure your variables were standardized!")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:133:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L133) *style:* **lines should not be more than 80 characters.**
```r
      large_neg <- length(posterior[posterior > -1.30 & posterior <= -0.80]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:134:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L134) *style:* **lines should not be more than 80 characters.**
```r
      medium_neg <- length(posterior[posterior > -0.80 & posterior <= -0.50]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:135:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L135) *style:* **lines should not be more than 80 characters.**
```r
      small_neg <- length(posterior[posterior > -0.50 & posterior <= -0.20]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:136:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L136) *style:* **lines should not be more than 80 characters.**
```r
      verysmall_neg <- length(posterior[posterior > -0.20 & posterior < 0]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:139:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L139) *style:* **lines should not be more than 80 characters.**
```r
      large_pos <- length(posterior[posterior < 1.30 & posterior >= 0.80]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:140:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L140) *style:* **lines should not be more than 80 characters.**
```r
      medium_pos <- length(posterior[posterior < 0.80 & posterior >= 0.50]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:141:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L141) *style:* **lines should not be more than 80 characters.**
```r
      small_pos <- length(posterior[posterior < 0.50 & posterior >= 0.20]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:142:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L142) *style:* **lines should not be more than 80 characters.**
```r
      verysmall_pos <- length(posterior[posterior < 0.20 & posterior > 0]) / length(posterior)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:145:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L145) *style:* **lines should not be more than 80 characters.**
```r
        Direction = c("Negative", "Negative", "Negative", "Negative", "Negative", "Positive", "Positive", "Positive", "Positive", "Positive"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:146:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L146) *style:* **lines should not be more than 80 characters.**
```r
        Size = c("VeryLarge", "Large", "Medium", "Small", "VerySmall", "VerySmall", "Small", "Medium", "Large", "VeryLarge"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:147:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L147) *style:* **lines should not be more than 80 characters.**
```r
        Probability = c(verylarge_neg, large_neg, medium_neg, small_neg, verysmall_neg, verysmall_pos, small_pos, medium_pos, large_pos, verylarge_pos)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/analyze.stanreg.R:190:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/analyze.stanreg.R#L190) *style:* **lines should not be more than 80 characters.**
```r
        round(opposite_prob * 100, 2), "% that it has an opposite direction (between 0 and ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/assess.R:51:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/assess.R#L51) *style:* **lines should not be more than 80 characters.**
```r
      warning("Multiple scores were provided. Returning a list containing summmary and values.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:39:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/correlation.R#L39) *style:* **lines should not be more than 80 characters.**
```r
correlation <- function(df, df2=NULL, type="full", method="pearson", adjust="holm") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:73:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/correlation.R#L73) *style:* **lines should not be more than 80 characters.**
```r
  mystars <- ifelse(p < .001, "***", ifelse(p < .01, "** ", ifelse(p < .05, "* ", " ")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/correlation.R:76:1:](https://github.com/vsimko/psycho.R/blob/cabb2ed7d3ce90a0cc5d7b8b86fa622995f5830e/R/correlation.R#L76) *style:* **lines should not be more than 80 characters.**
```r
  ## build a new matrix that includes the correlations with their apropriate stars
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


I have no interest whatsoever to argue with qml vs. C++ for UI.. But kde is whole other story..

So when was the last time you tested kde as nowadays it's even lighter than gnome.. Which may not say much... But still.. Also if you do test kde again don't use Ubuntu as there has been plenty of tests that have shown that Ubuntu with kde is way slower than it should be.. At least comparing to openSUSE or arch (or manjaro, Chakra, KaOS)...

Also try to remember to use the clazy tool

Anyway to another topic.. Jolla's SailfishOS is officially supporting Sony Xperia X phone (together with Sony Mobile) https://jolla.com/sailfishx/


@zwhitchcox see https://github.com/yamafaktory/babel-react-rollup-starter/issues/90. I'll create a new version when rollup-plugin-commonjs will be ready.


@Martinusbe


done


Done


I see, that makes sense


@keyesatimarc extra credit if you can bullet out your items for discussion here


maybe to make it self documented we could rename this parameter to `String signedCertificate`


I'm fairly certain this function won't need to be patched. It's fine like this, the TODO can be removed in a next revision. Great work!


or `signedCert`


Are you sure to put this condition on the artifact and not in the character ?

If the heir get all the artifacts, it cannot study books whereas he has never done it.


coin


I don't know what you are referring to!  Anyway we decided that only the beta server needs bcrypt, not all developers, so this addition is not needed.

Did this commit get merged with no PR?  I want to revert it.


Have you been able to test if just the EXE is needed?


oi,conseguiria rodar essa planilha em delphi?é um codigo pequeno.,ele gera 3 numeros em comuns.tentei mais deu certo.obrigado.
https://drive.google.com/open?id=0B0fFYvtiiepRSVBUamdGUmFzV2M


O problema seria se ele não encontrasse uma posição rápido aí o jogo travaria.

Eu poderia fazer de duas formas ou se demorar muito pra encontrar instanciar independente da posição e deixar o Unity lidar com o problema de física

ou jogar isso pra uma coroutine que não travaria no while (foi o que fiz)


Created multidev environment [bc-reports#ci-1](https://dashboard.pantheon.io/sites/41998b1f-8fb9-45c7-a1b0-8657308e315e#ci-1).

[![Visit Site](https://raw.githubusercontent.com/pantheon-systems/ci-drops-8/0.1.0/data/img/visit-site-36.png)](https://ci-1-bc-reports.pantheonsite.io/)


![](https://github.trello.services/images/mini-trello-icon.png) [Validations](https://trello.com/c/sFQmPUZg/47-validations)


Why isn't this on the `inner`?


Same question here. Looks like the error should be on the `companion`


Funciona mas como você acha que ficaria mais claro pro aluno? Eu pensei nisso também mas fiquei pensando em implementações de setter e getter que ficasse tão claro quanto essa. (fora criar um método pra fazer isso, que pode ser tb)


Força do hábito.


Thanks sir.


[Table] Turn off text truncation by default and raise fixed truncation limit (#1656)

Preview: documentation
Coverage: core | datetime


This commit message gives me life


@cjihrig There's no PR-URL on this commit message. (`core-validate-commit` FTW as usual!)


1.1
fs = 1000;
b = [1 2 1]/4;
a = 1;
n = 1028;
figure(1);
[h,w] = freqz(b,a,n);
mag = abs(h);
phase = angle(h)*180/pi;
subplot(2,1,1), plot(w/(2*pi)*fs, mag), grid on;
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w/(2*pi)*fs, unwrap(phase)), grid on;
xlabel('fs'), ylabel('P');


My attempt at the perceptron implementation


Due to line 163 this probably should be `fullbinarypath = None`, although .... I think you could even remove it completely.


1.2
disp('Нулі фільтра Хеннінга')
x = roots(b);
disp(x);
Нулі фільтра Хеннінга
    -1
    -1


1.3
fs = 1000;
b = [1 2 1]/4;
a = 1;
n = 1024;
ecg = load('ecg117.dat');
ecgDetr = detrend(ecg);
y = filter(b, a, ecgDetr);
t = (0:length(ecgDetr)-1)/fs;
figure(1);
subplot(3,1,1),plot(t,ecg), xlim([1.1 1.6]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(3,1,2),plot(t,ecgDetr), xlim([1.1 1.6]);
title('Без постійної складової');
xlabel('t'), ylabel('A');
subplot(3,1,3),plot(t,y), xlim([1.1 1.6]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');


wnwn


2.1
fs = 1000;
bp = [-3 12 17 12 -3]/35;
ap = 1;
n = 1024;
figure(1);
[h,w] = freqz(bp, ap, n);
mag = abs(h);
phase = angle(h)*180/pi;
subplot(2,1,1), plot(w/(2*pi)*fs, mag), grid on;
title('АЧХ');
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w/(2*pi)*fs, unwrap(phase)), grid on;
title('ФЧХ');
xlabel('fs'), ylabel('P');
disp('Нулі поліноміального фільтру')
xp = roots(bp);
disp(xp);
figure(2);
zp = zplane(xp);
Нулі поліноміального фільтру
   5.2242 + 0.0000i
  -0.7078 + 0.7064i
  -0.7078 - 0.7064i
   0.1914 + 0.0000i


new


2.2
ecg = load('ecg117.dat');
ecgDetrend = detrend(ecg);
ecgf5 = filter(bp, ap, ecgDetrend);
t = (0:length(ecgDetrend)-1)/fs;
figure();
subplot(2,1,1), plot(ecgDetrend), xlim([3100 3600]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(2,1,2), plot(ecgf5), xlim([3100 3600]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');


2.3
figure();
subplot(3,1,1), plot(ecgDetrend), xlim([3100 3600]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(3,1,2), plot(ecgf5), xlim([3100 3600]);
title('Поліноміальний фільтр');
xlabel('t'), ylabel('A');
subplot(3,1,3),plot(y), xlim([3100 3600]);
title('Фільтр Хеннінга');
xlabel('t'), ylabel('A');


3.1
br = [1 0.618 1];
ar = 1;
n =  1024;
fs = 200;
figure();
[h,w] = freqz(br, ar, n, fs);
mag = abs(h);
phase = angle(h)*180/pi;
subplot(2,1,1), plot(w/(2*pi)*fs, mag), grid on;
title('АЧХ');
xlabel('fs'), ylabel('A');
subplot(2,1,2), plot(w/(2*pi)*fs, unwrap(phase)), grid on;
title('ФЧХ');
xlabel('fs'), ylabel('P');

disp('Нулі режекторного фільтру');
xr = roots(br)
figure();
zp = zplane(xr);
disp('Передавальна функція');
H = filt (br, ar)

Нулі режекторного фільтру
xr =
  -0.3090 + 0.9511i
  -0.3090 - 0.9511i

Передавальна функція
H =
   1 + 0.618 z^-1 + z^-2


It works on my machine. It was a config on the travis CI.
![screenshot_20171005_205250](https://user-images.githubusercontent.com/7250584/31246886-3042b152-aa0f-11e7-9ba7-ef920da08d8a.png)


No, the point is to not return "None" if there's a binary in path.


3.2
fs = 60;
ecg = load('ecg2x60.dat');
ecgD = detrend(ecg);
ecgFilt = filter(br, ar, ecgD);
t = (0:length(ecgD)-1)/fs;
figure();
subplot(2,1,1), plot(t, ecgD), xlim([2 7.3]);
title('Нефільтрований сигнал');
xlabel('t'), ylabel('A');
subplot(2,1,2), plot(t, ecgFilt), xlim([2 7.3]);
title('Фільтрований сигнал');
xlabel('t'), ylabel('A');


Ok, cool


done.


Essa div é desnecessária