[R/calcSumKDA2.R:1:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L1) *style:* **Variable and function names should be all lowercase.**
```r
calcSumKDA2 <- function(S, N, I, theta, KDA) {
^~~~~~~~~~~
```
[R/calcSumKDA2.R:4:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L4) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  results <- matrix( 0, nrow = s, ncol = 1)
                   ^
```
[R/calcSumKDA2.R:7:28:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L7) *style:* **Put spaces around all infix operators.**
```r
    outcomes <- KDA[numbers+1] + (log(I[i]) * numbers)  -
                          ~^~
```
[R/calcSumKDA2.R:8:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L8) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      ( lgamma( theta + numbers ) - lgamma(theta) )
      ^
```
[R/calcSumKDA2.R:8:15:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L8) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      ( lgamma( theta + numbers ) - lgamma(theta) )
              ^
```
[R/calcSumKDA2.R:8:32:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L8) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      ( lgamma( theta + numbers ) - lgamma(theta) )
                               ^
```
[R/calcSumKDA2.R:8:50:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L8) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      ( lgamma( theta + numbers ) - lgamma(theta) )
                                                 ^
```
[R/calcSumKDA2.R:8:52:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L8) *style:* **Trailing whitespace is superfluous.**
```r
      ( lgamma( theta + numbers ) - lgamma(theta) )
                                                   ^
```
[R/calcSumKDA2.R:10:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L10) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    log_max <- max( outcomes )
                  ^
```
[R/calcSumKDA2.R:10:29:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L10) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    log_max <- max( outcomes )
                            ^
```
[R/calcSumKDA2.R:11:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L11) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    sumlist <- sum( exp(outcomes - log_max) )
                  ^
```
[R/calcSumKDA2.R:11:44:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/calcSumKDA2.R#L11) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    sumlist <- sum( exp(outcomes - log_max) )
                                           ^
```
[R/Condition.R:1:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L1) *style:* **Variable and function names should be all lowercase.**
```r
evaluateCondLik <- function(v, theta_x, theta_y, alpha_x, alpha_y, Nx, Ny) {
^~~~~~~~~~~~~~~
```
[R/Condition.R:5:27:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L5) *style:* **Put spaces around all infix operators.**
```r
  I_X <- alpha_x * nx * (J-1) / (1 - alpha_x * nx - alpha_y * ny)
                         ~^~
```
[R/Condition.R:6:27:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L6) *style:* **Put spaces around all infix operators.**
```r
  I_Y <- alpha_y * ny * (J-1) / (1 - alpha_x * nx - alpha_y * ny)
                         ~^~
```
[R/Condition.R:12:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L12) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:13:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L13) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(cnt in 1:length(I_X)) {
     ^
```
[R/Condition.R:14:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L14) *style:* **Use <-, not =, for assignment.**
```r
    b[cnt] = lgamma(I_X[cnt] + I_Y[cnt] + J) - lgamma(I_X[cnt] + I_Y[cnt])
           ^
```
[R/Condition.R:15:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L15) *style:* **Use <-, not =, for assignment.**
```r
    poch_X[cnt] = lgamma(I_X[cnt] + Nx) - lgamma(I_X[cnt])
                ^
```
[R/Condition.R:16:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L16) *style:* **Use <-, not =, for assignment.**
```r
    poch_Y[cnt] = lgamma(I_Y[cnt] + Ny) - lgamma(I_Y[cnt])
                ^
```
[R/Condition.R:18:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L18) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:20:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L20) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:21:36:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L21) *style:* **Put spaces around all infix operators.**
```r
  h <- poch_X + poch_Y - (lgamma(Nx+1) + lgamma(Ny+1))
                                  ~^~
```
[R/Condition.R:21:51:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L21) *style:* **Put spaces around all infix operators.**
```r
  h <- poch_X + poch_Y - (lgamma(Nx+1) + lgamma(Ny+1))
                                                 ~^~
```
[R/Condition.R:22:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L22) *style:* **Trailing whitespace is superfluous.**
```r

^~~
```
[R/Condition.R:23:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L23) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  k  <-  lgamma( (theta_x / 2) + (theta_y / 2) ) -
               ^
```
[R/Condition.R:23:47:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L23) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  k  <-  lgamma( (theta_x / 2) + (theta_y / 2) ) -
                                              ^
```
[R/Condition.R:23:51:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L23) *style:* **Trailing whitespace is superfluous.**
```r
  k  <-  lgamma( (theta_x / 2) + (theta_y / 2) ) -
                                                  ^
```
[R/Condition.R:24:53:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L24) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
          (lgamma(theta_x / 2) + lgamma(theta_y / 2) )
                                                    ^
```
[R/Condition.R:25:10:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  l  <- ((theta_x / 2) - 1) * log(nx) + ((theta_y / 2) - 1) * log(ny)
         ^
```
[R/Condition.R:25:42:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  l  <- ((theta_x / 2) - 1) * log(nx) + ((theta_y / 2) - 1) * log(ny)
                                         ^
```
[R/Condition.R:26:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L26) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:32:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L32) *style:* **Variable and function names should be all lowercase.**
```r
calcConditional <- function(v, model, Nx, Ny) {
^~~~~~~~~~~~~~~
```
[R/Condition.R:33:3:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L33) *style:* **Variable and function names should be all lowercase.**
```r
  incorrectLength <- 0
  ^~~~~~~~~~~~~~~
```
[R/Condition.R:34:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L34) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(model == "D0" && length(v) != 2) incorrectLength <- 1
    ^
```
[R/Condition.R:34:39:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L34) *style:* **Variable and function names should be all lowercase.**
```r
  if(model == "D0" && length(v) != 2) incorrectLength <- 1
                                      ^~~~~~~~~~~~~~~
```
[R/Condition.R:35:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L35) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(model == "D1" && length(v) != 3) incorrectLength <- 1
    ^
```
[R/Condition.R:35:39:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L35) *style:* **Variable and function names should be all lowercase.**
```r
  if(model == "D1" && length(v) != 3) incorrectLength <- 1
                                      ^~~~~~~~~~~~~~~
```
[R/Condition.R:36:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L36) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:37:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L37) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(incorrectLength == 1) {
    ^
```
[R/Condition.R:37:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L37) *style:* **Variable and function names should be all lowercase.**
```r
  if(incorrectLength == 1) {
     ^~~~~~~~~~~~~~~
```
[R/Condition.R:37:28:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L37) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if(incorrectLength == 1) {
                           ^
```
[R/Condition.R:37:29:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L37) *style:* **Trailing whitespace is superfluous.**
```r
  if(incorrectLength == 1) {
                            ^
```
[R/Condition.R:38:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L38) *style:* **Use two spaces to indent, never tabs.**
```r
	x <- subplex(initVals, g)
^
```
[R/Condition.R:41:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L41) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:46:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L46) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:47:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L47) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(model == "D1") {
    ^
```
[R/Condition.R:50:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L50) *style:* **Trailing whitespace is superfluous.**
```r

^
```
[R/Condition.R:51:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L51) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(alpha_x < 0 ||
    ^
```
[R/Condition.R:55:18:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L55) *style:* **Put spaces around all infix operators.**
```r
     alpha_x > (1-(1e-8)) ||
                ~^~
```
[R/Condition.R:55:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L55) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_x > (1-(1e-8)) ||
                  ^
```
[R/Condition.R:56:13:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L56) *style:* **Put spaces around all infix operators.**
```r
     alpha_y>(1-(1e-8))
           ~^~
```
[R/Condition.R:56:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L56) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_y>(1-(1e-8))
             ^
```
[R/Condition.R:56:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L56) *style:* **Put spaces around all infix operators.**
```r
     alpha_y>(1-(1e-8))
              ~^~
```
[R/Condition.R:56:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L56) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_y>(1-(1e-8))
                ^
```
[R/Condition.R:58:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L58) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:60:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L60) *style:* **Trailing whitespace is superfluous.**
```r

^
```
[R/Condition.R:62:18:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L62) *style:* **Variable and function names should be all lowercase.**
```r
    return( -1 * evaluateCondLik(x, theta_x, theta_y,
                 ^~~~~~~~~~~~~~~
```
[R/Condition.R:62:54:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L62) *style:* **Trailing whitespace is superfluous.**
```r
    return( -1 * evaluateCondLik(x, theta_x, theta_y,
                                                     ^
```
[R/Condition.R:66:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L66) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:69:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L69) *style:* **Use <-, not =, for assignment.**
```r
 ymax = -1 * maxes$fmin
      ^
```
[R/Condition.R:70:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L70) *style:* **Use <-, not =, for assignment.**
```r
 xmax = maxes$xmin
      ^
```
[R/Condition.R:71:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L71) *style:* **Use <-, not =, for assignment.**
```r
 xlft = 0
      ^
```
[R/Condition.R:72:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L72) *style:* **Use <-, not =, for assignment.**
```r
 xrgt = 1
      ^
```
[R/Condition.R:73:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L73) *style:* **Use <-, not =, for assignment.**
```r
 eps = .Machine$double.eps
     ^
```
[R/Condition.R:75:2:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L75) *style:* **Variable and function names should be all lowercase.**
```r
 checkLeftX  = evaluateCondLik(eps, theta_x, theta_y,
 ^~~~~~~~~~
```
[R/Condition.R:75:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L75) *style:* **Use <-, not =, for assignment.**
```r
 checkLeftX  = evaluateCondLik(eps, theta_x, theta_y,
             ^
```
[R/Condition.R:75:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L75) *style:* **Variable and function names should be all lowercase.**
```r
 checkLeftX  = evaluateCondLik(eps, theta_x, theta_y,
               ^~~~~~~~~~~~~~~
```
[R/Condition.R:75:54:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L75) *style:* **Trailing whitespace is superfluous.**
```r
 checkLeftX  = evaluateCondLik(eps, theta_x, theta_y,
                                                     ^
```
[R/Condition.R:77:2:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L77) *style:* **Variable and function names should be all lowercase.**
```r
 checkRightX = evaluateCondLik(1 - eps, theta_x, theta_y,
 ^~~~~~~~~~~
```
[R/Condition.R:77:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L77) *style:* **Use <-, not =, for assignment.**
```r
 checkRightX = evaluateCondLik(1 - eps, theta_x, theta_y,
             ^
```
[R/Condition.R:77:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L77) *style:* **Variable and function names should be all lowercase.**
```r
 checkRightX = evaluateCondLik(1 - eps, theta_x, theta_y,
               ^~~~~~~~~~~~~~~
```
[R/Condition.R:80:4:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L80) *style:* **Place a space before left parenthesis, except in a function call.**
```r
 if(checkLeftX < 0) {
   ^
```
[R/Condition.R:80:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L80) *style:* **Variable and function names should be all lowercase.**
```r
 if(checkLeftX < 0) {
    ^~~~~~~~~~
```
[R/Condition.R:82:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L82) *style:* **Variable and function names should be all lowercase.**
```r
        return(evaluateCondLik(x, theta_x, theta_y,
               ^~~~~~~~~~~~~~~
```
[R/Condition.R:82:52:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L82) *style:* **Trailing whitespace is superfluous.**
```r
        return(evaluateCondLik(x, theta_x, theta_y,
                                                   ^
```
[R/Condition.R:85:32:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L85) *style:* **Commas should always have a space after.**
```r
     xlft <- (uniroot(g, c(eps,xmax)))$root
                               ^
```
[R/Condition.R:88:4:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L88) *style:* **Place a space before left parenthesis, except in a function call.**
```r
 if(checkRightX < 0) {
   ^
```
[R/Condition.R:88:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L88) *style:* **Variable and function names should be all lowercase.**
```r
 if(checkRightX < 0) {
    ^~~~~~~~~~~
```
[R/Condition.R:90:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L90) *style:* **Variable and function names should be all lowercase.**
```r
        return(evaluateCondLik(x, theta_x, theta_y,
               ^~~~~~~~~~~~~~~
```
[R/Condition.R:94:26:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L94) *style:* **Commas should always have a space after.**
```r
     xrgt <- (uniroot( h,c( xmax, 1 - eps)))$root
                         ^
```
[R/Condition.R:97:2:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L97) *style:* **Variable and function names should be all lowercase.**
```r
 calcLLEXP <- function(x) {
 ^~~~~~~~~
```
[R/Condition.R:98:15:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L98) *style:* **Variable and function names should be all lowercase.**
```r
   out <- exp(evaluateCondLik(x, theta_x, theta_y,
              ^~~~~~~~~~~~~~~
```
[R/Condition.R:104:24:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L104) *style:* **Variable and function names should be all lowercase.**
```r
  aux <- integrate(f = calcLLEXP,
                       ^~~~~~~~~
```
[R/Condition.R:111:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L111) *style:* **Trailing whitespace is superfluous.**
```r
  return(LL);
             ^~
```
[R/Condition.R:115:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L115) *style:* **Variable and function names should be all lowercase.**
```r
logLikelihood.Guilds.Conditional <- function(parameters, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:115:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L115) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
logLikelihood.Guilds.Conditional <- function(parameters, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:115:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L115) *style:* **Variable and function names should not be longer than 30 characters.**
```r
logLikelihood.Guilds.Conditional <- function(parameters, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:118:3:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L118) *warning:* **local variable ‘Sx’ assigned but may not be used**
```r
  Sx = length(SADX)
  ^~
```
[R/Condition.R:118:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L118) *style:* **Use <-, not =, for assignment.**
```r
  Sx = length(SADX)
     ^
```
[R/Condition.R:119:3:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L119) *warning:* **local variable ‘Sy’ assigned but may not be used**
```r
  Sy = length(SADY)
  ^~
```
[R/Condition.R:119:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L119) *style:* **Use <-, not =, for assignment.**
```r
  Sy = length(SADY)
     ^
```
[R/Condition.R:120:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L120) *style:* **Use <-, not =, for assignment.**
```r
  Nx = sum(SADX)
     ^
```
[R/Condition.R:121:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L121) *style:* **Use <-, not =, for assignment.**
```r
  Ny = sum(SADY)
     ^
```
[R/Condition.R:122:3:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L122) *warning:* **local variable ‘J’ assigned but may not be used**
```r
  J = Nx + Ny
  ^
```
[R/Condition.R:122:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L122) *style:* **Use <-, not =, for assignment.**
```r
  J = Nx + Ny
    ^
```
[R/Condition.R:123:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L123) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:126:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L126) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(verbose == TRUE) {
    ^
```
[R/Condition.R:128:55:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L128) *style:* **Trailing whitespace is superfluous.**
```r
   cat("Now starting to calculate likelihood of: \n");
                                                      ^
```
[R/Condition.R:130:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L130) *style:* **Place a space before left parenthesis, except in a function call.**
```r
   if(model == "D0") cat("Theta X =", x2[1],
     ^
```
[R/Condition.R:130:45:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L130) *style:* **Trailing whitespace is superfluous.**
```r
   if(model == "D0") cat("Theta X =", x2[1],
                                            ^
```
[R/Condition.R:131:50:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L131) *style:* **Trailing whitespace is superfluous.**
```r
                         " Theta Y =", "Theta X",
                                                 ^
```
[R/Condition.R:133:50:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L133) *style:* **Commas should never have a space before.**
```r
                         " Alpha Y =", "Alpha X" ,"\n")
                                                ~^
```
[R/Condition.R:133:51:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L133) *style:* **Commas should always have a space after.**
```r
                         " Alpha Y =", "Alpha X" ,"\n")
                                                  ^
```
[R/Condition.R:134:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L134) *style:* **Place a space before left parenthesis, except in a function call.**
```r
   if(model == "D1") cat("Theta X =", x2[1],
     ^
```
[R/Condition.R:134:45:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L134) *style:* **Trailing whitespace is superfluous.**
```r
   if(model == "D1") cat("Theta X =", x2[1],
                                            ^
```
[R/Condition.R:137:49:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L137) *style:* **Commas should never have a space before.**
```r
                         " Alpha Y =", x2[3]    ,"\n");
                                            ~~~~^
```
[R/Condition.R:137:50:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L137) *style:* **Commas should always have a space after.**
```r
                         " Alpha Y =", x2[3]    ,"\n");
                                                 ^
```
[R/Condition.R:141:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L141) *style:* **Trailing whitespace is superfluous.**
```r

^~~
```
[R/Condition.R:142:9:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L142) *style:* **Variable and function names should be all lowercase.**
```r
  LL <- logLikelihood.Guilds(parameters, model, SADX, SADY, verbose)
        ^~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:142:9:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L142) *warning:* **no visible global function definition for ‘logLikelihood.Guilds’**
```r
  LL <- logLikelihood.Guilds(parameters, model, SADX, SADY, verbose)
        ^~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:143:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L143) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:145:23:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L145) *style:* **Variable and function names should be all lowercase.**
```r
  conditional_part <- calcConditional(parameters, model, Nx, Ny)
                      ^~~~~~~~~~~~~~~
```
[R/Condition.R:145:23:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L145) *warning:* **no visible global function definition for ‘calcConditional’**
```r
  conditional_part <- calcConditional(parameters, model, Nx, Ny)
                      ^~~~~~~~~~~~~~~
```
[R/Condition.R:146:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L146) *style:* **Trailing whitespace is superfluous.**
```r

^~~
```
[R/Condition.R:151:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L151) *style:* **Variable and function names should be all lowercase.**
```r
conditional.LogLik <- function(v, model, J, Sx, Sy, Nx, Ny, KDA_X, KDA_Y,
^~~~~~~~~~~~~~~~~~
```
[R/Condition.R:152:72:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L152) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
                               prefactor1, prefactor2, verbose = TRUE) {
                                                                       ^
```
[R/Condition.R:152:73:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L152) *style:* **Trailing whitespace is superfluous.**
```r
                               prefactor1, prefactor2, verbose = TRUE) {
                                                                        ^~
```
[R/Condition.R:153:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L153) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:158:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L158) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:159:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L159) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(model == "D1") {
    ^
```
[R/Condition.R:162:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L162) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:163:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L163) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(alpha_x < 0 ||
    ^
```
[R/Condition.R:167:18:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L167) *style:* **Put spaces around all infix operators.**
```r
     alpha_x > (1-(1e-8)) ||
                ~^~
```
[R/Condition.R:167:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L167) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_x > (1-(1e-8)) ||
                  ^
```
[R/Condition.R:168:13:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L168) *style:* **Put spaces around all infix operators.**
```r
     alpha_y>(1-(1e-8))
           ~^~
```
[R/Condition.R:168:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L168) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_y>(1-(1e-8))
             ^
```
[R/Condition.R:168:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L168) *style:* **Put spaces around all infix operators.**
```r
     alpha_y>(1-(1e-8))
              ~^~
```
[R/Condition.R:168:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L168) *style:* **Place a space before left parenthesis, except in a function call.**
```r
     alpha_y>(1-(1e-8))
                ^
```
[R/Condition.R:170:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L170) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:171:9:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L171) *style:* **Variable and function names should be all lowercase.**
```r
  LL <- logLikguilds(theta_x, theta_y, alpha_x, alpha_y, J,
        ^~~~~~~~~~~~
```
[R/Condition.R:171:60:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L171) *style:* **Trailing whitespace is superfluous.**
```r
  LL <- logLikguilds(theta_x, theta_y, alpha_x, alpha_y, J,
                                                           ^
```
[R/Condition.R:174:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L174) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:175:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L175) *style:* **Variable and function names should be all lowercase.**
```r
  cond_LL <- calcConditional(v, model, Nx, Ny)
             ^~~~~~~~~~~~~~~
```
[R/Condition.R:175:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L175) *warning:* **no visible global function definition for ‘calcConditional’**
```r
  cond_LL <- calcConditional(v, model, Nx, Ny)
             ^~~~~~~~~~~~~~~
```
[R/Condition.R:180:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L180) *style:* **Variable and function names should be all lowercase.**
```r
maxLikelihood.Guilds.Conditional <- function(initVals, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:180:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L180) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
maxLikelihood.Guilds.Conditional <- function(initVals, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:180:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L180) *style:* **Variable and function names should not be longer than 30 characters.**
```r
maxLikelihood.Guilds.Conditional <- function(initVals, model,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Condition.R:180:46:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L180) *style:* **Variable and function names should be all lowercase.**
```r
maxLikelihood.Guilds.Conditional <- function(initVals, model,
                                             ^~~~~~~~
```
[R/Condition.R:181:53:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L181) *style:* **Trailing whitespace is superfluous.**
```r
                                             method,
                                                    ^
```
[R/Condition.R:184:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L184) *style:* **Variable and function names should be all lowercase.**
```r
  KDA_X <- calcKDA(SADX)
           ^~~~~~~
```
[R/Condition.R:184:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L184) *warning:* **no visible global function definition for ‘calcKDA’**
```r
  KDA_X <- calcKDA(SADX)
           ^~~~~~~
```
[R/Condition.R:185:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L185) *style:* **Variable and function names should be all lowercase.**
```r
  KDA_Y <- calcKDA(SADY)
           ^~~~~~~
```
[R/Condition.R:185:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L185) *warning:* **no visible global function definition for ‘calcKDA’**
```r
  KDA_Y <- calcKDA(SADY)
           ^~~~~~~
```
[R/Condition.R:186:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L186) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:189:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L189) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(i in 1:length(x)) freq_x[i] <- x[[i]]
     ^
```
[R/Condition.R:190:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L190) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:191:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L191) *style:* **Use <-, not =, for assignment.**
```r
  prefactor1 = -( sum(log(SADX)) + sum(lgamma(1 + freq_x)) )
             ^
```
[R/Condition.R:191:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L191) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  prefactor1 = -( sum(log(SADX)) + sum(lgamma(1 + freq_x)) )
                ^
```
[R/Condition.R:192:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L192) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:195:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L195) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(i in 1:length(x2)) freq_y[i] <- x2[[i]]
     ^
```
[R/Condition.R:196:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L196) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:197:14:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L197) *style:* **Use <-, not =, for assignment.**
```r
  prefactor2 = -( sum(log(SADY)) + sum(lgamma(1 + freq_y)) )
             ^
```
[R/Condition.R:197:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L197) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  prefactor2 = -( sum(log(SADY)) + sum(lgamma(1 + freq_y)) )
                ^
```
[R/Condition.R:199:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L199) *style:* **Use <-, not =, for assignment.**
```r
  Sx = length(SADX)
     ^
```
[R/Condition.R:200:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L200) *style:* **Use <-, not =, for assignment.**
```r
  Sy = length(SADY)
     ^
```
[R/Condition.R:201:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L201) *style:* **Use <-, not =, for assignment.**
```r
  Nx = sum(SADX)
     ^
```
[R/Condition.R:202:6:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L202) *style:* **Use <-, not =, for assignment.**
```r
  Ny = sum(SADY)
     ^
```
[R/Condition.R:203:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L203) *style:* **Use <-, not =, for assignment.**
```r
  J = Nx + Ny
    ^
```
[R/Condition.R:206:17:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L206) *style:* **Variable and function names should be all lowercase.**
```r
    out <- -1 * conditional.LogLik(x, model, J, Sx, Sy, Nx, Ny,
                ^~~~~~~~~~~~~~~~~~
```
[R/Condition.R:211:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L211) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/Condition.R:213:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L213) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(method == "simplex") {
    ^
```
[R/Condition.R:214:10:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L214) *warning:* **no visible global function definition for ‘simplex’, Did you mean 'complex'?**
```r
    x <- simplex(initVals, g, verbose)
         ^~~~~~~
```
[R/Condition.R:214:18:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L214) *style:* **Variable and function names should be all lowercase.**
```r
    x <- simplex(initVals, g, verbose)
                 ^~~~~~~~
```
[R/Condition.R:215:4:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L215) *style:* **Trailing whitespace is superfluous.**
```r
  }
   ^
```
[R/Condition.R:216:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L216) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(method == "subplex") {
    ^
```
[R/Condition.R:217:7:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L217) *warning:* **no visible global function definition for ‘subplex’**
```r
	x <- subplex(initVals, g)
      ^~~~~~~
```
[R/Condition.R:217:11:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L217) *style:* **Put spaces around all infix operators.**
```r
	x <- subplex(initVals, g)
         ~^~~
```
[R/Condition.R:217:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/Condition.R#L217) *style:* **Variable and function names should be all lowercase.**
```r
	x <- subplex(initVals, g)
                     ^~~~~~~~
```
[R/drawLocal.R:1:23:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L1) *style:* **Commas should always have a space after.**
```r
pm_sad <- function(th,I,j) {
                      ^
```
[R/drawLocal.R:1:25:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L1) *style:* **Commas should always have a space after.**
```r
pm_sad <- function(th,I,j) {
                        ^
```
[R/drawLocal.R:3:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Use two spaces to indent, never tabs.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
^
```
[R/drawLocal.R:3:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **lines should not be more than 80 characters.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/drawLocal.R:3:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Use two spaces to indent, never tabs.**
```r
	y = matrix(0,nrow=size(x)[1],ncol=size(x)[2]);
^
```
[R/drawLocal.R:3:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Use <-, not =, for assignment.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
           ^
```
[R/drawLocal.R:3:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Put spaces around all infix operators.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
          ~^~
```
[R/drawLocal.R:3:29:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Put spaces around all infix operators.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
                           ~^~
```
[R/drawLocal.R:3:43:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Put spaces around all infix operators.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
                                         ~^~
```
[R/drawLocal.R:3:50:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Put spaces around all infix operators.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
                                                ~^
```
[R/drawLocal.R:3:57:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L3) *style:* **Commented code should be removed.**
```r
	k1 = unique(round(10^seq(0,log10(j-1),len=1000)))     #k1=unique(round(logspace(0,log10(j-1),1000)));
                                                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/drawLocal.R:4:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Use two spaces to indent, never tabs.**
```r
	res=rep(0,length(k1))  								  #res=zeros(1,length(k1));
^
```
[R/drawLocal.R:4:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Use two spaces to indent, never tabs.**
```r
	idx0=which(x==0);
^
```
[R/drawLocal.R:4:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Use <-, not =, for assignment.**
```r
	res=rep(0,length(k1))  								  #res=zeros(1,length(k1));
           ^
```
[R/drawLocal.R:4:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Put spaces around all infix operators.**
```r
	res=rep(0,length(k1))  								  #res=zeros(1,length(k1));
          ~^~
```
[R/drawLocal.R:4:25:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Use two spaces to indent, never tabs.**
```r
	res=rep(0,length(k1))  								  #res=zeros(1,length(k1));
                        ^~~~~~~~
```
[R/drawLocal.R:4:36:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L4) *style:* **Commented code should be removed.**
```r
	res=rep(0,length(k1))  								  #res=zeros(1,length(k1));
                                   ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/drawLocal.R:5:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L5) *style:* **Use two spaces to indent, never tabs.**
```r
	for(cnt in 1:length(k1)) {
^
```
[R/drawLocal.R:5:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L5) *style:* **Use two spaces to indent, never tabs.**
```r
	if(length(idx0)) {
^
```
[R/drawLocal.R:5:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L5) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	for(cnt in 1:length(k1)) {
           ^
```
[R/drawLocal.R:6:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L6) *style:* **Use two spaces to indent, never tabs.**
```r
		k = k1[cnt];
^~
```
[R/drawLocal.R:6:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L6) *style:* **Use two spaces to indent, never tabs.**
```r
		aux = log(th) + lgamma(I) - lgamma(I+j) +
^~
```
[R/drawLocal.R:6:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L6) *style:* **Use <-, not =, for assignment.**
```r
		k = k1[cnt];
                  ^
```
[R/drawLocal.R:7:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L7) *style:* **Use two spaces to indent, never tabs.**
```r
		f <- function(x) {
^~
```
[R/drawLocal.R:7:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L7) *style:* **Use two spaces to indent, never tabs.**
```r
			  lgamma(j+1) - lgamma(k+1) - lgamma(j-k+1) +
^~~
```
[R/drawLocal.R:7:19:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L7) *style:* **Put spaces around all infix operators.**
```r
		f <- function(x) {
                 ~^~~
```
[R/drawLocal.R:8:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L8) *style:* **Use two spaces to indent, never tabs.**
```r
			return(-1 * pm_sadaux(x,I,th,j,k));
^~~
```
[R/drawLocal.R:8:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L8) *style:* **Use two spaces to indent, never tabs.**
```r
			  lgamma(k) +   lgamma(I+j-k) - lgamma(I) + log(I);
^~~
```
[R/drawLocal.R:8:16:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L8) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
			return(-1 * pm_sadaux(x,I,th,j,k));
               ^~~~~~~~~
```
[R/drawLocal.R:8:35:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L8) *style:* **Put spaces around all infix operators.**
```r
			return(-1 * pm_sadaux(x,I,th,j,k));
                                 ~^~
```
[R/drawLocal.R:9:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L9) *style:* **Use two spaces to indent, never tabs.**
```r
		}
^~
```
[R/drawLocal.R:9:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L9) *style:* **Use two spaces to indent, never tabs.**
```r
		y[idx0] = aux;
^~
```
[R/drawLocal.R:10:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L10) *style:* **Use two spaces to indent, never tabs.**
```r
		xmax = optimize(f,c(0,1))$minimum
^~
```
[R/drawLocal.R:10:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L10) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/drawLocal.R:10:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L10) *style:* **Use <-, not =, for assignment.**
```r
		xmax = optimize(f,c(0,1))$minimum
                     ^
```
[R/drawLocal.R:10:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L10) *style:* **Put spaces around all infix operators.**
```r
		xmax = optimize(f,c(0,1))$minimum
                    ~^~
```
[R/drawLocal.R:11:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L11) *style:* **Use two spaces to indent, never tabs.**
```r
		ymax = pm_sadaux(xmax,I,th,j,k)
^~
```
[R/drawLocal.R:11:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L11) *style:* **Use two spaces to indent, never tabs.**
```r
	idx1=which(x==1);
^
```
[R/drawLocal.R:11:10:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L11) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
		ymax = pm_sadaux(xmax,I,th,j,k)
         ^~~~~~~~~
```
[R/drawLocal.R:11:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L11) *style:* **Use <-, not =, for assignment.**
```r
		ymax = pm_sadaux(xmax,I,th,j,k)
                     ^
```
[R/drawLocal.R:11:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L11) *style:* **Put spaces around all infix operators.**
```r
		ymax = pm_sadaux(xmax,I,th,j,k)
                    ~^~
```
[R/drawLocal.R:12:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L12) *style:* **Use two spaces to indent, never tabs.**
```r
		y0 = pm_sadaux(0,I,th,j,k);
^~
```
[R/drawLocal.R:12:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L12) *style:* **Use two spaces to indent, never tabs.**
```r
	if(length(idx1)) {
^
```
[R/drawLocal.R:12:8:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L12) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
		y0 = pm_sadaux(0,I,th,j,k);
       ^~~~~~~~~
```
[R/drawLocal.R:12:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L12) *style:* **Use <-, not =, for assignment.**
```r
		y0 = pm_sadaux(0,I,th,j,k);
                   ^
```
[R/drawLocal.R:12:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L12) *style:* **Put spaces around all infix operators.**
```r
		y0 = pm_sadaux(0,I,th,j,k);
                  ~^~
```
[R/drawLocal.R:13:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L13) *style:* **Use two spaces to indent, never tabs.**
```r
		if(ymax<(y0+1)) {
^~
```
[R/drawLocal.R:13:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L13) *style:* **Use two spaces to indent, never tabs.**
```r
		  if ((k<j)||((k==j)&&(th>1))) {
^~
```
[R/drawLocal.R:14:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L14) *style:* **Use two spaces to indent, never tabs.**
```r
			xmin = 0;
^~~
```
[R/drawLocal.R:14:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L14) *style:* **Use two spaces to indent, never tabs.**
```r
			  y[idx1] = -Inf;
^~~
```
[R/drawLocal.R:14:30:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L14) *style:* **Use <-, not =, for assignment.**
```r
			xmin = 0;
                             ^
```
[R/drawLocal.R:15:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L15) *style:* **Use two spaces to indent, never tabs.**
```r
		} else {
^~
```
[R/drawLocal.R:15:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L15) *style:* **Use two spaces to indent, never tabs.**
```r
		  } else if ((k==j)&&(th==1)) {
^~
```
[R/drawLocal.R:16:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L16) *style:* **Use two spaces to indent, never tabs.**
```r
			f <- function(x) {
^~~
```
[R/drawLocal.R:16:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L16) *style:* **Use two spaces to indent, never tabs.**
```r
		      y[idx1] = 0;
^~
```
[R/drawLocal.R:17:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L17) *style:* **Use two spaces to indent, never tabs.**
```r
				return(pm_sadaux(x,I,th,j,k) - ymax + 1);
^~~~
```
[R/drawLocal.R:17:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L17) *style:* **Use two spaces to indent, never tabs.**
```r
		  } else if ((k==j)&&(th< 1)) {
^~
```
[R/drawLocal.R:17:12:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L17) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
				return(pm_sadaux(x,I,th,j,k) - ymax + 1);
           ^~~~~~~~~
```
[R/drawLocal.R:18:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L18) *style:* **Use two spaces to indent, never tabs.**
```r
			}
^~~
```
[R/drawLocal.R:18:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L18) *style:* **Use two spaces to indent, never tabs.**
```r
			  y[idx1] = Inf;
^~~
```
[R/drawLocal.R:19:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L19) *style:* **Use two spaces to indent, never tabs.**
```r
			#xL = f(1e-10);
^~~
```
[R/drawLocal.R:19:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L19) *style:* **Use two spaces to indent, never tabs.**
```r
		   }
^~
```
[R/drawLocal.R:19:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L19) *style:* **Commented code should be removed.**
```r
			#xL = f(1e-10);
    ^~~~~~~~~~~~~~
```
[R/drawLocal.R:20:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L20) *style:* **Use two spaces to indent, never tabs.**
```r
			#xR = f(xmax);
^~~
```
[R/drawLocal.R:20:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L20) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/drawLocal.R:20:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L20) *style:* **Commented code should be removed.**
```r
			#xR = f(xmax);
    ^~~~~~~~~~~~~
```
[R/drawLocal.R:21:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L21) *style:* **Use two spaces to indent, never tabs.**
```r
			#cat(cnt,xL,xR,"\n"); flush.console();
^~~
```
[R/drawLocal.R:21:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L21) *style:* **Use two spaces to indent, never tabs.**
```r
	idxp = which((x>0)&(x<1));
^
```
[R/drawLocal.R:21:5:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L21) *style:* **Commented code should be removed.**
```r
			#cat(cnt,xL,xR,"\n"); flush.console();
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/drawLocal.R:22:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L22) *style:* **Use two spaces to indent, never tabs.**
```r
			xmin = uniroot(f,c(1e-10,xmax))$root;
^~~
```
[R/drawLocal.R:22:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L22) *style:* **Use two spaces to indent, never tabs.**
```r
	xx=x[idxp];
^
```
[R/drawLocal.R:22:30:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L22) *style:* **Use <-, not =, for assignment.**
```r
			xmin = uniroot(f,c(1e-10,xmax))$root;
                             ^
```
[R/drawLocal.R:22:30:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L22) *style:* **Put spaces around all infix operators.**
```r
			xmin = uniroot(f,c(1e-10,xmax))$root;
                            ~^~
```
[R/drawLocal.R:23:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L23) *style:* **Use two spaces to indent, never tabs.**
```r
		}
^~
```
[R/drawLocal.R:23:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L23) *style:* **Use two spaces to indent, never tabs.**
```r
	aux = log(th) + lgamma(I)-lgamma(I+j) +
^
```
[R/drawLocal.R:24:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L24) *style:* **Use two spaces to indent, never tabs.**
```r
		x1 = (xmax+1)/2;
^~
```
[R/drawLocal.R:24:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L24) *style:* **Use two spaces to indent, never tabs.**
```r
		  lgamma(j+1) - lgamma(k+1) - lgamma(j-k+1) +
^~
```
[R/drawLocal.R:24:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L24) *style:* **Use <-, not =, for assignment.**
```r
		x1 = (xmax+1)/2;
                   ^
```
[R/drawLocal.R:25:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L25) *style:* **Use two spaces to indent, never tabs.**
```r
		y1 = pm_sadaux(x1,I,th,j,k);
^~
```
[R/drawLocal.R:25:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L25) *style:* **Use two spaces to indent, never tabs.**
```r
		  lgamma(I*xx+k) - lgamma(I*xx) +
^~
```
[R/drawLocal.R:25:8:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L25) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
		y1 = pm_sadaux(x1,I,th,j,k);
       ^~~~~~~~~
```
[R/drawLocal.R:25:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L25) *style:* **Use <-, not =, for assignment.**
```r
		y1 = pm_sadaux(x1,I,th,j,k);
                   ^
```
[R/drawLocal.R:25:20:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L25) *style:* **Put spaces around all infix operators.**
```r
		y1 = pm_sadaux(x1,I,th,j,k);
                  ~^~
```
[R/drawLocal.R:26:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L26) *style:* **Use two spaces to indent, never tabs.**
```r
		while(ymax < (y1+1)) {
^~
```
[R/drawLocal.R:26:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L26) *style:* **Use two spaces to indent, never tabs.**
```r
		  lgamma(I*(1-xx)+j-k)-lgamma(I*(1-xx)) +
^~
```
[R/drawLocal.R:26:22:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L26) *style:* **Place a space before left parenthesis, except in a function call.**
```r
		while(ymax < (y1+1)) {
                     ^
```
[R/drawLocal.R:27:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L27) *style:* **Use two spaces to indent, never tabs.**
```r
			x1 = (x1 + 1) / 2;
^~~
```
[R/drawLocal.R:27:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L27) *style:* **Use two spaces to indent, never tabs.**
```r
		  (th-1)*log(1-xx)-log(xx);
^~
```
[R/drawLocal.R:27:28:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L27) *style:* **Use <-, not =, for assignment.**
```r
			x1 = (x1 + 1) / 2;
                           ^
```
[R/drawLocal.R:28:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L28) *style:* **Use two spaces to indent, never tabs.**
```r
			y1 = pm_sadaux(x1,I,th,j,k);
^~~
```
[R/drawLocal.R:28:1:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L28) *style:* **Use two spaces to indent, never tabs.**
```r
	y[idxp] = aux;
^
```
[R/drawLocal.R:28:9:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L28) *warning:* **no visible global function definition for ‘pm_sadaux’**
```r
			y1 = pm_sadaux(x1,I,th,j,k);
        ^~~~~~~~~
```
[R/drawLocal.R:28:28:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L28) *style:* **Use <-, not =, for assignment.**
```r
			y1 = pm_sadaux(x1,I,th,j,k);
                           ^
```
[R/drawLocal.R:28:28:](https://github.com/thijsjanzen/GUILDS/blob/40bba2e75b9c39db855fa25d30685a8b57a57f98/R/drawLocal.R#L28) *style:* **Put spaces around all infix operators.**
```r
			y1 = pm_sadaux(x1,I,th,j,k);
                          ~^~
```


This is a very important optimization for a large scale.
I'm exploring more options as well, like max-ttl, cache-size/dns-forward-max (both have defaults of a 150, which is too low!), and the most important thing is to verify the caching as actually working for the cluster domain name resolve requests! It seems that dnsmasq not always caches by design, see https://groups.google.com/forum/#!topic/consul-tool/NQDkxOj5Bks
http://lists.thekelleys.org.uk/pipermail/dnsmasq-discuss/2015q1/009231.html


Same comment here : why excluding angles in user product ?


a


Same here


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1095](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13848&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


Version 2


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1094](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13842&buildTypeId=ota_plus_RviSotaServer_Ci) outcome was **UNKNOWN**
Summary: Canceled (Tests passed: 208, ignored: 3; exit code 137 (new)) Build time: 00:07:31


Version 3


TeamCity NEventStore :: MongoDB :: Build [Build 5.3.6-beta.5](http://build.prxm.it:8813/viewLog.html?buildId=3673&buildTypeId=nes_mongo_build&guest=1) outcome was **SUCCESS**
Summary: Tests passed: 72 Build time: 00:02:41


提交代码


**[unitTests_js_branches run failed](http://jenkins.wikia-prod:8080/job/unitTests_js_branches/33187/testReport/) for this commit**


@hocinebendou this means that user cannot enter 'A' to get units numbered eg A,B,C or AA,AB,AC.  I previously reverted this line, but if you like it, okay!


> (it would help if cabal would emit the info "using $N threads")

See https://github.com/haskell/cabal/pull/3884.


Initial commit
moneroj


@hocinebendou here too!


I tamed it on my dev center using an admin toon and the /createcreature mittens baby command lol


just make the text either "here" or the link text.


I don't known what is the more natural solution. Previously, SelectableStream could assume that it owned any file descriptor created by a subclass, and factored out the responsibility for closing it. But now, it is the derived class that knows whether it has created or borrowed a socket, and whether it should close it. But moving the `close` to the destructor of every derived class is a quick way to introduce a future bug. And it would be a shame to oblige every derived class to remember this step, for the one atypical case of `PollStream`.

Perhaps a virtual method `shutdownFd` called by `SelectableStream~SelectableStream` to close file descriptors if necessary, that could be overridden by `PollStream` to do nothing?


capitalization


don't use abbreviation "u"


Readme


The main problem is that add-ons:
> game.libretro.2048
game.libretro.4do
game.libretro.beetle-bsnes
game.libretro.beetle-gba
game.libretro.beetle-lynx
game.libretro.beetle-ngp
game.libretro.beetle-pce-fast
game.libretro.beetle-psx
game.libretro.bluemsx
game.libretro.bnes
game.libretro.bsnes-mercury-accuracy
game.libretro.bsnes-mercury-balanced
game.libretro.bsnes-mercury-performance
game.libretro.dosbox
game.libretro.fceumm
game.libretro.gambatte
game.libretro.genplus
game.libretro.handy
game.libretro.lutro
game.libretro.mame
game.libretro.meteor
game.libretro.mgba
game.libretro.mupen64plus
game.libretro.nestopia
game.libretro.pcsx-rearmed
game.libretro.picodrive
game.libretro.pocketsnes
game.libretro.prboom
game.libretro.quicknes
game.libretro.quicknes
game.libretro.reicast
game.libretro.scummvm
game.libretro.snes9x
game.libretro.snes9x-next
game.libretro.stella
game.libretro.vba-next
game.libretro.vbam
game.libretro.yabause

require MinGW but the only one that actually has the FindMinGW.cmake module is

> game.libretro.quicknes

The last build that successfully built (some of the) add-ons was http://mirrors.kodi.tv/test-builds/win32/KodiSetup-20160913-05843f9-retroplayer-17beta2.exe
That's a build based on my retroplayer-17beta2 branch with the 2 reverted commits you cherry-picked. Now, real question is: what changed between Sep 13th and now? Why is it complaining about MinGW now and it didn't before?


> In the past the `-j` value was overestimated for Travis' VMs.

Could they've been using hyperthreading?


OK, so we can stay with OLD audio libraries and old vidc libraries. OK?


ah ok didnt see you also added the comment on top saying that they need to comment where not needed, i prefer the other way but your call :)


Great efficiency! 👍


+1 for `Print more info`


自个练习


TeamCity NEventStore :: MongoDB :: Build [Build 5.3.6-PullRequest.47+6](http://build.prxm.it:8813/viewLog.html?buildId=3674&buildTypeId=nes_mongo_build&guest=1) outcome was **SUCCESS**
Summary: Tests passed: 72 Build time: 00:02:52


TeamCity NEventStore :: MongoDB :: Build [Build 5.3.6-PullRequest.47+6](http://build.prxm.it:8813/viewLog.html?buildId=3674&buildTypeId=nes_mongo_build&guest=1) outcome was **SUCCESS**
Summary: Tests passed: 72 Build time: 00:02:54


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1095](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13848&buildTypeId=ota_plus_RviSotaServer_Ci) outcome was **SUCCESS**
Summary: Tests passed: 246, ignored: 3 Build time: 00:08:34


delete this


OK!


Merge from master


If you remove copy, fonts dont get copied :(


Don't know. What particularly series you need from me? If it is new game -
12, it already inside the folder

>


That was not a good idea. Now we all permanently get connection errors every few moments. And the email boxes remain empty. After logging out and logging in again everything seems to work as usual but a moment later you again get connection errors.
It would be better to withdraw this change as before everything worked perfectly without any connection error.


ASDdasdf


Remove empty styles


Don't use `<table>` tags


thanks


Ahh see then that isnt a real test :-)  need somebody to clear (or just spawn) a baby on live  and then a real CH use the actual train skill :-)


121784677-OAControllerFixes4633 (mjwitte) - Win64-Windows-7-VisualStudio-12: OK (2339 of 2341 tests passed, 570 test warnings)

 * 572 tests had: AUD diffs.
 * 11 tests had: RDD diffs.
 * 9 tests had: EIO diffs.
 * 2 tests had: ESO big diffs.
 * 2 tests had: MTR small diffs.
 * 4 tests had: Table small diffs.
 * 7 tests had: ESO small diffs.

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


I created a private repo and added you as a collaborator.


I don't. Just took that from the MetadataElement parseAll(Element) method. Indeed, no need to exclude them.


Do we need a null check for entity.getContent() ?


Test commenting on your commit, Tom!
What's with the hello again?
Better make it go away...
Cheers
T


Are you sure? I don't see how it could be. Part of this is not used at all and part only on caches "closing" so, really it would be strange. Are you using memcache? What connection errors?


There was a comment about this rename at https://translatewiki.net/wiki/Thread:User_talk:FuzzyBot/Postposition_/ko but everything looks alright.


- update quick_filter database view
- create filter/quick and filter/advanced
- update tests
- update users controller
- add tsv index to career and education tables


thanksss

Joana Soldado Magraner
PhD candidate
Gatsby Computational Neuroscience Unit
University College London
25 Howland St, London

On Thu, Sep 22, 2016 at 10:10 AM, Wittawat Jitkrittum <
notifications@github.com> wrote:

> I created a private repo and added you as a collaborator.
>
> —
> You are receiving this because you were mentioned.
> Reply to this email directly, view it on GitHub
> <https://github.com/wittawatj/gatsby-bootcamp-2016/commit/5455da5ab8a74c75e5b842a26447cf689b8c3b3c#commitcomment-19127023>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AHpyHCxIASifEs2bhQ4LQWs1D3Qaxby5ks5qskYBgaJpZM4KDoZk>
> .
>


finish


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1096](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13853&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


dfgdgdgdsgre


this is untested as I dont have a working test environment at the moment


Hi! This breaks simple configuration:

main_loader:
  cron: '* * * * *'
  class: 'Worker::FetchLoader'
  queue: main
  args:
    type: main

comments_loader:
  cron: '* * * * *'
  class: 'Worker::FetchLoader'
  queue: comments
  args:
    type: comments

 Now Worker::FetchLoader always executes in the default queue.


I answer to your points in order:
* yes you are right, but I think one can use DecayTreeFitter to compute the B mass with the Jpsi mass constraint. Actually even a simple rescaling of the electron energy to get m(ee)=m(Jpsi) makes the B-mass resolution much much better. See below the effect on data.
![image](https://cloud.githubusercontent.com/assets/15674880/18742438/833d0b12-80b4-11e6-9fe8-921fa8fd45dc.png)

* OK, then maybe we can drop it. In any case the normal B-reco mass info has to be used. I mean, the HOP mass cannot substitute the normal reco mass, so the easiest is to cut on HOP and then fit the B-mass as usual.
* Some time ago I found that cutting on HopMee rather than reco m(ee) allowed to have a little bit less q2 bin migration. So it's definitely worth including it in the output of the tool.

For the generalisation:
* I think the Jpsi constraint is no very useful. I mean if one knows the intermediate state mass, one can use DecayTreeFitter or a normal rescaling of momenta.
* I completely agree there should be a HOP tool for CaloPhotons! Yesterday Zhirui presented some impressive results at RD (see below)
![image](https://cloud.githubusercontent.com/assets/15674880/18742740/2811dfe0-80b6-11e6-8a7c-b17330b89681.png)


[No problem](http://s2.quickmeme.com/img/4e/4e7c4fec1974025c4aeae464c3f566df46c55a3bff664ac3afb28164535db7b8.jpg).


CM implements sysinit for init.d by default for all builds, this is unneeded


And potentially this too


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1097](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13857&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


This one closes #5873


ohh okay


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1096](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13853&buildTypeId=ota_plus_RviSotaServer_Ci) outcome was **SUCCESS**
Summary: Tests passed: 245, ignored: 3 Build time: 00:09:42


These comments make sense, Peter, and I'll address them / reword them later when I can get back to this. Thanks for getting them in there in the meantime.


@mangui when these changes are planed and be available as next minor release: `0.6.2-7` ?


TaskCluster: @cgsheeh does not have permission to trigger tasks.


can you explain shortly why? I fear it will puzzle readers. Maybe something like
```
# long-term connection, so there is always at least one connection visible in the the httpd view
```


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1098](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13860&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1099](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13861&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


TeamCity OTA+ :: rvi_sota_server :: ci [Build 1100](http://teamcity.prod01.internal.advancedtelematic.com:8111/viewLog.html?buildId=13862&buildTypeId=ota_plus_RviSotaServer_Ci) is now running


TaskCluster-GitHub: https://tools.taskcluster.net/task-graph-inspector/#ERI_h8FWR06IxRxSzFJDqA


why not `runtime_id`?