This is a client build check, not a WowPatch (content patch used in db) check. Those are done with compiler macros to make sure the core is compatible with the client, and that all mechanics function appropriately for the patch. In this case the TRANSFER_ABORT_ZONE_IN_COMBAT message used to prevent the zoning does not exist in game clients older than 1.11, so it does not make sense to ever send that when we know that the targeted client build does not support it.

Also you have to keep in mind that before 1.11, the 6 minute auto release timer applied in raids as well, so it was a legit tactic to run back when you died in the middle of a fight. If you knew the fight will take a while, and you didn't release and run back asap, you could lose your chance to loot the boss, as you don't get credit for creatures that die while you are a ghost and not inside the map.


Да се напише програма, която създава структура Firma с полета name, egn, duty и payment, указващи името на работник във фирмата, неговото ЕГН, длъжност и заплата. Да се въведе цяло число n и след него n на брой данни от тип Firma.  Да се изведат имената на тези работници, чиято заплата е по-малка от 700 лв


Udah benar kok, tapi jangan biasakan dalam 1 file melupakan tag penutup php ### ?>


@mingwandroid I still see a `xcb_shm_create_segment` error -- I believe the issue is that the list which was changed here, to`"-lxcb -lxcb-shm"`, is only a fallback set. By default pkgconfig is used, which prints out only `-lxcb`.

```
+ /mnt/bld/miniconda3/envs/slicerbuild/conda-bld/qt_1537911702885/work/pkg-config --libs-only-l xcb '>=' 1.5
> -lxcb
```

I added the following hack (?) in my local attempt with this branch, to make forward progress:

```
diff --git a/src/plugins/platforms/xcb/xcb_qpa_lib.pro.orig b/src/plugins/platforms/xcb/xcb_qpa_lib.pro
index 9c4797a..4d5127a 100644
--- a/src/plugins/platforms/xcb/xcb_qpa_lib.pro.orig
+++ b/src/plugins/platforms/xcb/xcb_qpa_lib.pro
@@ -86,6 +86,7 @@ qtConfig(vulkan) {

 !qtConfig(system-xcb) {
     QMAKE_USE += xcb-static xcb
+    QMAKE_LFLAGS += "-lxcb-shm"
 } else {
     qtConfig(xkb): QMAKE_USE += xcb_xkb
     qtConfig(xcb-render): QMAKE_USE += xcb_render
```


Aliasing failed with the following error:

~~~
Error! The alias akurulk-simple-now-app is a deployment URL or it's in use by a different team.
~~~


啊？不应该是 `false` 的时候进入下面的判断吗？ 因为为 `true` 的话，就代表在 `baseUrl` 里面有的了，就不用用继续下面了吧？
因为 `join` 是平台有关的


Automated Test Suite Message


確かに主キーが先頭のがわかりやすいですね。
かしこまりました。


Instead of updating through NPM, which I tried doing, but it wasn't working, I manually went in package-lock.json and switched the versions. GitHub was bugging me about security vulnerabilities and I believe this should fix it.


insert the bellow code to solve the syntax checking performance issue
```
  ;;Issue: flycheck syntax checking makes editing files really slow
  (setq flycheck-check-syntax-automatically '(save idle-change mode-enabled))
  (setq flycheck-idle-change-delay 10) ;; Set delay based on what suits you the best
```


・base64EncodedStringの戻り値はStringのため！は不要です。


<link href="normalize.css rel="stylesheet">


Good!


Successfully aliased the URL <https://d12-yjhlnhplta.now.sh> to the following alias.

* https://api.d12.tech


Successfully aliased the URL <https://d12-wuerzslfbc.now.sh> to the following alias.

* https://d12.tech


\\ you must make \\\ then do you see in the comments also slashes ome for tell it's not
a funktion and one for let show if you work with comments, and study the "markdown"

or what for slashes do you meant ? slashes in any line in the code ?
tell it directly .. plz more spezific :)

best regards
Blacky


There were the following issues with your Pull Request

  * A "License" and a "Signed-off-by" trailers are required. See [the guidelines about this](https://github.com/ipfs/community/blob/master/contribution-guidelines.md#a-license-and-a-signed-off-by-trailers-are-required)

We ask for a few features in the commit message for Open Source licensing hygiene and commit message clarity.
`git commit --amend` can often help you quickly improve the commit message.
[Guidelines](https://github.com/ipfs/community/blob/master/contribution-guidelines.md#commit-messages) and [a script](https://github.com/ipfs/community/blob/master/dev/hooks/setup_commit_msg_hook.sh) are available to help in the long run.
Your feedback on GitCop is welcome on [this issue](https://github.com/ipfs/infrastructure/issues/23).

---
This message was auto-generated by https://gitcop.com


Goodstuff


Successfully aliased the URL <https://d12-api-nerqcfnanm.now.sh> to the following alias.

* https://api.d12.tech


#include <iostream>
using namespace std;


Successfully aliased the URL <https://nathanielhillio-ivcmpbuekc.now.sh> to the following alias.

* https://www.nathanielhill.io


Successfully aliased the URL <https://d12-ibouwuqqwu.now.sh> to the following alias.

* https://d12.tech


Bot works as intended, GitHub isn't saying I have vulnerabilities! Looks like it worked!


Successfully aliased the URL <https://simple-now-app-bvlcajdgxj.now.sh> to the following alias.

* https://akurulk-10-simple-now-app.now.sh


#6982-EngRefEquationFixPart6 (RKStrand) - Win64-Windows-7-VisualStudio-14: OK (3037 of 3037 tests passed, 0 test warnings)

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


@MilosKozak If https://github.com/MilosKozak/AndroidAPS/commit/d707ea7fb0752a950dff8a9a293038ff374c4a7f should solve this issue it doesn't but opens a new one: If I enter "normal" carbs it couldn't added to treatments (dialog), if I enter a time offset of 1 minute it accepts the entry.
I don't know if this solution is acceptable for professionals like you but it `seems to work (line 33):
```
int carbTime = (int) ((time - now) / 1000 / 60 + 1);
``


#6982-EngRefEquationFixPart6 (RKStrand) - x86_64-Linux-Ubuntu-14.04-gcc-4.8-UnitTestsCoverage-Debug: OK (1773 of 1773 tests passed, 0 test warnings)

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


You should explain the method of error detection and correction with example bit string and highlight the problem to be improved.


Don't we have `-pluginspath` for the plugins base folder?
Does `-pluginspath` option becomes obsolete?
`-homepath` is the new replacement for it?


Successfully aliased the URL <https://d12-api-wwhjsmcqhx.now.sh> to the following alias.

* https://api.d12.tech


Should this not be changed from
'imap/kolab.example.org@EXAMPLE.ORG'
to
'smtp/kolab.example.org@EXAMPLE.ORG'
?

Re #6417


There's a lonely double quotation mark at the end of the last line.


Seems OK now.


Successfully aliased the URL <https://d12-api-gpgoccmmmj.now.sh> to the following alias.

* https://api.d12.tech


Why was this reverted ? WE DON'T WANT YOUR STUPID LOGIN TO DOWNLOAD !
Plus, are you compliant with GDPR ?


New World追加


XXXX


If this is stupid ignore it please but could the problem caused by line 523 in TreatmentsPlugin?
```
if (detailedBolusInfo.carbTime != 0 && detailedBolusInfo.carbs > 0) {
```


`HTTP SERVER OPTIONS` breaks document consistency, this should be `HTTP Server Options`.


b


As discussed, you should implement web hosting solution using kubenow and evaluate.
Also in the current presentation, you have mentioned "Progress Till Now". Here just list down the statements is not enough, you should provide screenshots showing the performed configurations and setup of the nodes.


Created multidev environment [sfgov#ci-1564](https://dashboard.pantheon.io/sites/91d50373-c4cf-40e4-a646-cb73e16a140c#ci-1564).

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


感觉你头有点昏, 两个问题回去再想... 第一个问题, 注意我的要求是不要特殊化 baseUrl 这一条规则, baseUrl/base 在这里顶天和 sideEffect 是平级的东西, 你看看 sideEffect 相关条件是啥时候进 tester? 第二个问题, 什么时候应该用平台相关的方法, 什么时候不应该用, 动下脑筋想清楚. 为什么这些方法有的平台相关, 为什么我们之前有的方法要用 posix 命名空间下的?


写在 logdir 下面一行啊


这个地方 用 方法调用比直接用值的区别在于如果 ip/hostname 被修改了 能保持更新


建议不要修改行为。


試しに送った第一号


Seems to be fixed at first glance, thanks!


is there any reason you specified mysql ? Can't we make use of the Schema so it can work on other databases ?

I am looking at https://www.doctrine-project.org/projects/doctrine-migrations/en/latest/reference/generating-migrations.html#line-number-038fd4281853ccb839c794d26ff71763174f95cf-14


good


Looks like a good start...


It actually doesn't, because `.toString()` maintains the scientific notation:

Error: Error: [number-to-bn] while converting number "1e+26" to BN.js instance, error: invalid number value. Value must be an integer, hex string, BN or BigNumber instance. Note, decimals are not supported. Given value: "1e+26"


update presentation with explanation of methods explained in the focus paper
You need to explain all steps of analysis with example tweets from pre-processing to classification


Your commit is broken.

src/golang.org/x/tools/go/analysis/internal/checker/checker.go:445:15: undefined: trace.NewTask
src/golang.org/x/tools/go/analysis/internal/checker/checker.go:447:2: undefined: trace.Log


Now could not deploy this pull request due to an error while parsing the `now.json` file:

> It should NOT have additional properties (`scripts`)

Click here to see the contents of `now.json`

{
  "scripts": {
    "start": "micro"
  },
  "dependencies": {
    "micro": "latest"
  }
}

For more information on now.json visit https://zeit.co/docs/features/configuration#now.json.


This almost left builds broken on Windows, good thing we have AppVeyor even though it doesn't work most of the time. 😅


@TribalNightOwl raise an issue and reference #37 issue

this is commit, not usual place to ask describe new/changed features


Deposit requierd credit ok


🤕 Fail when I try to connect with Firebase


This works though:

```
web3.utils.toWei('100000000')
```

Which is probably a bit easier to read.


Just in case it is useful, I once collected 30000 FENs with OCB as extracted from CCRL games, and annotated those with the result of the game, and a shallow eval of SF. Maybe this is useful:

https://groups.google.com/d/msg/fishcooking/thHGq-QhT_Y/Gz5_b2wODAAJ


But you use backslashes 🤔


> Можем узнать тип поезда по классу. От type в конструкторе можно избавиться.

Возможно, но это противоречит ТЗ:
Класс Train (Поезд):
•	Имеет номер (произвольная строка) и тип (грузовой, пассажирский) и количество вагонов, эти данные указываются при создании экземпляра класса


![](https://github.trello.services/images/mini-trello-icon.png) [as admin i can list of history of claim rewards](https://trello.com/c/5zUSR8v1/90-as-admin-i-can-list-of-history-of-claim-rewards)


贪心水题，对贪心的温故知新


Always write list of references in IEEE format.


No one.


WARNING: there's no parenthesis after `or`. This might be a problem.


Go solve everything you have.


You must not use DataPacketReceiveEvent to receive forms. You must use the `pocketmine\form\Form` interface.


> select_station

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


As discussed, you should include roman urdu in tweets and remove hashtags from tweets for classification
In the current presentation, add an example of tweet processing as per the focused paper from pre-processing to classification


А можно пробовать на 8.3.12?


Always write list of references in IEEE format


fixed bug


Wasn't sure where to leave a comment, but nice work! Having this work in C# was always my end goal but I never got the time to work on it. Kudos!


thanks for your great job.


Symbolic link is not sufficient here?


This code is generated when we run the command => **$rails db:migrate**


@DeejWilson, could you check whether maxIter_PP is correctly explained, previously you wrote "Maximum number of iterations used for updating". The explanation of parameter "useRho" is a bit confusing. If useRho is FALSE, fixed cell type proportion is still updated, then it is confusing to refer it as fixedCT?


Good move!


This could be done with `--mode` when image is "tarred".


Don't merge with main branch - it's just to show how the event bus works!!


不开辟新空间矩阵旋转


wow!


IBM Cloud [toolchain](https://console.ng.bluemix.net/devops/toolchains/623ac46c-aeaa-4433-a262-223430c2e0af?env_id=ibm%3Ayp%3Aus-south "googleDictionaryAPI"): [Delivery Pipeline](https://console.ng.bluemix.net/devops/pipelines/43a8bfc9-4989-4464-8299-979f59631a9c?env_id=ibm%3Ayp%3Aus-south "googleDictionaryAPI") deployed [googleDictionaryAPI](https://github.com/meetDeveloper/googleDictionaryAPI/releases/tag/deploy-ibm-yp-eu-gb-lifeplusplus-API-s-20180926-060006 "deploy-ibm-yp-eu-gb-lifeplusplus-API-s-20180926-060006") to [API's](https://console.bluemix.net/apps/0971aef0-04d8-454a-b263-f77d06d21309?env_id=ibm:yp:eu-gb "ibm:yp:eu-gb:lifeplusplus:API's"), including this commit


@DeejWilson, it is better to give a default value for Subj_CO. Otherwise it should not be listed as the last parameter.


IBM Cloud [toolchain](https://console.ng.bluemix.net/devops/toolchains/623ac46c-aeaa-4433-a262-223430c2e0af?env_id=ibm%3Ayp%3Aus-south "googleDictionaryAPI"): [Delivery Pipeline](https://console.ng.bluemix.net/devops/pipelines/43a8bfc9-4989-4464-8299-979f59631a9c?env_id=ibm%3Ayp%3Aus-south "googleDictionaryAPI") deployed [googleDictionaryAPI](https://github.com/meetDeveloper/googleDictionaryAPI/releases/tag/deploy-ibm-yp-eu-gb-lifeplusplus-API-s-20180926-060125 "deploy-ibm-yp-eu-gb-lifeplusplus-API-s-20180926-060125") to [API's](https://console.bluemix.net/apps/0971aef0-04d8-454a-b263-f77d06d21309?env_id=ibm:yp:eu-gb "ibm:yp:eu-gb:lifeplusplus:API's"), including this commit


With pleasure... You're welcome...


From a quick analysis, 3977 positions are just pawns + B, 679 of those are won. The statistics on the full set is 14748 wins out of 31948 positions.


Try:
2,3,5,8,12,16,20,25,31,38,46,53,62,71,91,92
5,6,9,15,23,30,41,53,66,83,101,119,142,170,196,215


First of all, it's a nice feature that let us imagine a lot of other optimisations:/

I wonder how much your heuristic can reduce the overall size on a set of images. Did you do some experiments on this?

It would be nice to factorize a bit the code you are adding with the existing code. Maybe by reusing the `store-path-to-layer` script in the existing code.

Regarding QEMU, `buildImage` only needs QEMU to some specific use cases that your are not covering I think (for instance, `chown root` some files in a layer).

The only drawback of this PR is that we are adding more code to `dockerTools` :/


`meson` configure step should be like:
```
meson -Dbuild-api-tests=false -Dfallback-version-number=<version_number>
```

First flag disables building api tests, second one sets version number seen inside scripts. for e.g. with `ksh --version`.


Thanks. Actually I'm hoping that all recent issues are fixed by r64849.


`depend: [CustomAlerts]` is repeated twice, delete one.


[R/default_params_doc.R:176:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/default_params_doc.R#L176) *style:* **Variable or function name should be snake_case.**
```r
  N,
  ^
```
[R/default_params_doc.R:188:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/default_params_doc.R#L188) *style:* **Variable or function name should be snake_case.**
```r
  Q,
  ^
```
[R/mbd_loglik_choosepar.R:23:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L23) *style:* **Lines should not be more than 80 characters.**
```r
  #This function provides a likelihood for a subset of parameters. This is built to work inside mbd_minusLL_vs_single_parameter or any optimizer like simplex, optim or subplex
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_choosepar.R:36:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L36) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/mbd_loglik_choosepar.R:43:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L43) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    {
    ^
```
[R/mbd_loglik_choosepar.R:45:23:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L45) *style:* **Put spaces around all infix operators.**
```r
      pars1 <- trpars1/(1 - trpars1)
                     ~^~
```
[R/mbd_loglik_choosepar.R:45:24:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L45) *style:* **Place a space before left parenthesis, except in a function call.**
```r
      pars1 <- trpars1/(1 - trpars1)
                       ^
```
[R/mbd_loglik_choosepar.R:47:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L47) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    {
    ^
```
[R/mbd_loglik_choosepar.R:63:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L63) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/mbd_loglik_choosepar.R:64:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_choosepar.R#L64) *style:* **Lines should not be more than 80 characters.**
```r
    cat("There are parameter values used which cause numerical problems:", trpars1, "\n")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:5:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
hyperA_HannoX <- function(N, k, q) {# HG function: fast O(N), updated after Moulis meeting
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:5:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L5) *style:* **Variable or function name should be snake_case.**
```r
hyperA_HannoX <- function(N, k, q) {# HG function: fast O(N), updated after Moulis meeting
^~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:5:27:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L5) *style:* **Variable or function name should be snake_case.**
```r
hyperA_HannoX <- function(N, k, q) {# HG function: fast O(N), updated after Moulis meeting
                          ^
```
[R/mbd_loglik_utils.R:5:36:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L5) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
hyperA_HannoX <- function(N, k, q) {# HG function: fast O(N), updated after Moulis meeting
                                   ^
```
[R/mbd_loglik_utils.R:7:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
  #it produces the structure q^(m-n)*(1-q)^(k+2*n-m)*sum_j 2^j choose(k, j)*choose(n, m-n-j)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:9:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L9) *style:* **Variable or function name should be snake_case.**
```r
  A1 <- (1-q)^(k) * choose(k, j) * (2)^j
  ^~
```
[R/mbd_loglik_utils.R:9:11:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L9) *style:* **Put spaces around all infix operators.**
```r
  A1 <- (1-q)^(k) * choose(k, j) * (2)^j
         ~^~
```
[R/mbd_loglik_utils.R:9:15:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L9) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  A1 <- (1-q)^(k) * choose(k, j) * (2)^j
              ^
```
[R/mbd_loglik_utils.R:10:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L10) *style:* **Variable or function name should be snake_case.**
```r
  N <- N + 1
  ^
```
[R/mbd_loglik_utils.R:11:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L11) *style:* **Variable or function name should be snake_case.**
```r
  A <- diag(A1[1], nrow=N+2, ncol=N+2)
  ^
```
[R/mbd_loglik_utils.R:11:24:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L11) *style:* **Put spaces around all infix operators.**
```r
  A <- diag(A1[1], nrow=N+2, ncol=N+2)
                      ~^~
```
[R/mbd_loglik_utils.R:11:26:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L11) *style:* **Put spaces around all infix operators.**
```r
  A <- diag(A1[1], nrow=N+2, ncol=N+2)
                        ~^~
```
[R/mbd_loglik_utils.R:11:34:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L11) *style:* **Put spaces around all infix operators.**
```r
  A <- diag(A1[1], nrow=N+2, ncol=N+2)
                                ~^~
```
[R/mbd_loglik_utils.R:11:36:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L11) *style:* **Put spaces around all infix operators.**
```r
  A <- diag(A1[1], nrow=N+2, ncol=N+2)
                                  ~^~
```
[R/mbd_loglik_utils.R:12:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L12) *style:* **Put spaces around all infix operators.**
```r
  A[1:(k+1),1] <- A1
       ~^~
```
[R/mbd_loglik_utils.R:12:13:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L12) *style:* **Commas should always have a space after.**
```r
  A[1:(k+1),1] <- A1
            ^
```
[R/mbd_loglik_utils.R:15:20:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L15) *style:* **Commas should always have a space after.**
```r
    s <- src:min(N,2*src+k-1)
                   ^
```
[R/mbd_loglik_utils.R:15:21:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L15) *style:* **Put spaces around all infix operators.**
```r
    s <- src:min(N,2*src+k-1)
                   ~^~
```
[R/mbd_loglik_utils.R:15:25:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L15) *style:* **Put spaces around all infix operators.**
```r
    s <- src:min(N,2*src+k-1)
                       ~^~
```
[R/mbd_loglik_utils.R:15:27:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L15) *style:* **Put spaces around all infix operators.**
```r
    s <- src:min(N,2*src+k-1)
                         ~^~
```
[R/mbd_loglik_utils.R:16:8:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L16) *style:* **Put spaces around all infix operators.**
```r
    A[s+2, dst] <- A[s, src] + A[s+1, src]
      ~^~
```
[R/mbd_loglik_utils.R:16:35:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L16) *style:* **Put spaces around all infix operators.**
```r
    A[s+2, dst] <- A[s, src] + A[s+1, src]
                                 ~^~
```
[R/mbd_loglik_utils.R:17:11:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L17) *style:* **Put spaces around all infix operators.**
```r
    m <- s-1; n <- src-1;
         ~^~
```
[R/mbd_loglik_utils.R:17:23:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L17) *style:* **Put spaces around all infix operators.**
```r
    m <- s-1; n <- src-1;
                     ~^~
```
[R/mbd_loglik_utils.R:18:32:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                               ^
```
[R/mbd_loglik_utils.R:18:34:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Put spaces around all infix operators.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                ~^~
```
[R/mbd_loglik_utils.R:18:37:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Put spaces around all infix operators.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                   ~^~
```
[R/mbd_loglik_utils.R:18:38:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                     ^
```
[R/mbd_loglik_utils.R:18:40:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Put spaces around all infix operators.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                      ~^~
```
[R/mbd_loglik_utils.R:18:44:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                           ^
```
[R/mbd_loglik_utils.R:18:46:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Put spaces around all infix operators.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                            ~^~
```
[R/mbd_loglik_utils.R:18:48:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L18) *style:* **Put spaces around all infix operators.**
```r
    A[s, src] <- A[s, src] * q^(m-n)*(1-q)^(2*n-m)
                                              ~^~
```
[R/mbd_loglik_utils.R:20:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Commas should always have a space after.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
      ^
```
[R/mbd_loglik_utils.R:20:10:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Use <-, not =, for assignment.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
         ^
```
[R/mbd_loglik_utils.R:20:16:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Commas should always have a space after.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
               ^
```
[R/mbd_loglik_utils.R:20:23:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Put spaces around all infix operators.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
                     ~^~
```
[R/mbd_loglik_utils.R:20:27:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
                          ^
```
[R/mbd_loglik_utils.R:20:29:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L20) *style:* **Put spaces around all infix operators.**
```r
  A[N,N] = A[N,N] * (1-q)^(N-1);
                           ~^~
```
[R/mbd_loglik_utils.R:21:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L21) *style:* **Commas should always have a space after.**
```r
  A[1:N,1:N]
        ^
```
[R/mbd_loglik_utils.R:24:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L24) *style:* **Commented code should be removed.**
```r
# if (.Platform$OS.type=="windows"){matrix_builder = hyperA:::hyperA}
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:25:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L25) *style:* **Lines should not be more than 80 characters.**
```r
# if (.Platform$OS.type=="unix")   {matrix_builder = hyperA_HannoX} #this is set to work with home directory of the cluster
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:25:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L25) *style:* **Commented code should be removed.**
```r
# if (.Platform$OS.type=="unix")   {matrix_builder = hyperA_HannoX} #this is set to work with home directory of the cluster
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:31:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L31) *style:* **Lines should not be more than 80 characters.**
```r
create_A0 <- function(max_number_of_species, lambda, mu, q, k, matrix_builder = hyperA_HannoX){
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:31:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L31) *style:* **Variable or function name should be snake_case.**
```r
create_A0 <- function(max_number_of_species, lambda, mu, q, k, matrix_builder = hyperA_HannoX){
^~~~~~~~~
```
[R/mbd_loglik_utils.R:32:8:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L32) *style:* **Use <-, not =, for assignment.**
```r
  nvec = 0:max_number_of_species
       ^
```
[R/mbd_loglik_utils.R:33:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L33) *style:* **Variable or function name should be snake_case.**
```r
  M = lambda * matrix_builder(N = max_number_of_species, k = k, q = q)
  ^
```
[R/mbd_loglik_utils.R:33:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L33) *style:* **Use <-, not =, for assignment.**
```r
  M = lambda * matrix_builder(N = max_number_of_species, k = k, q = q)
    ^
```
[R/mbd_loglik_utils.R:35:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L35) *style:* **Lines should not be more than 80 characters.**
```r
  # diag(M) = (-lambda)*c( (1-(1-q)^(k+( nvec[1:max_number_of_species] ) )),0 ) - mu*(nvec+k)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:35:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L35) *style:* **Commented code should be removed.**
```r
  # diag(M) = (-lambda)*c( (1-(1-q)^(k+( nvec[1:max_number_of_species] ) )),0 ) - mu*(nvec+k)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:36:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L36) *style:* **Lines should not be more than 80 characters.**
```r
  diag(M) = (-lambda) * ( 1 - (1 - q)^(k + nvec) ) - mu * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:36:11:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L36) *style:* **Use <-, not =, for assignment.**
```r
  diag(M) = (-lambda) * ( 1 - (1 - q)^(k + nvec) ) - mu * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
          ^
```
[R/mbd_loglik_utils.R:36:26:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L36) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  diag(M) = (-lambda) * ( 1 - (1 - q)^(k + nvec) ) - mu * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
                         ^
```
[R/mbd_loglik_utils.R:36:39:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L36) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  diag(M) = (-lambda) * ( 1 - (1 - q)^(k + nvec) ) - mu * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
                                      ^
```
[R/mbd_loglik_utils.R:36:49:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L36) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  diag(M) = (-lambda) * ( 1 - (1 - q)^(k + nvec) ) - mu * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
                                                ^
```
[R/mbd_loglik_utils.R:38:27:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L38) *style:* **Use <-, not =, for assignment.**
```r
  M[row(M) == col(M) - 1] = mu * nvec[2:(max_number_of_species + 1)]
                          ^
```
[R/mbd_loglik_utils.R:46:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L46) *style:* **Lines should not be more than 80 characters.**
```r
create_B0 <- function(max_number_of_species, q, k, b, matrix_builder = hyperA_HannoX){#lambda * choose(k, b) * q^b  is going to be added in logB in the main script
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:46:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L46) *style:* **Variable or function name should be snake_case.**
```r
create_B0 <- function(max_number_of_species, q, k, b, matrix_builder = hyperA_HannoX){#lambda * choose(k, b) * q^b  is going to be added in logB in the main script
^~~~~~~~~
```
[R/mbd_loglik_utils.R:46:86:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L46) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
create_B0 <- function(max_number_of_species, q, k, b, matrix_builder = hyperA_HannoX){#lambda * choose(k, b) * q^b  is going to be added in logB in the main script
                                                                                ^
```
[R/mbd_loglik_utils.R:48:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L48) *style:* **Variable or function name should be snake_case.**
```r
  B <- matrix_builder(N = max_number_of_species, k = k2, q = q)
  ^
```
[R/mbd_loglik_utils.R:57:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L57) *style:* **Variable or function name should be snake_case.**
```r
create_A <- function(lambda, mu, nu, q, k, max_number_of_species){
^~~~~~~~
```
[R/mbd_loglik_utils.R:59:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L59) *style:* **Variable or function name should be snake_case.**
```r
  M <- create_A0(max_number_of_species = max_number_of_species,
  ^
```
[R/mbd_loglik_utils.R:61:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L61) *style:* **Lines should not be more than 80 characters.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:61:97:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L61) *style:* **Put spaces around all infix operators.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
                                                                                ~^~
```
[R/mbd_loglik_utils.R:61:99:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L61) *style:* **Put spaces around all infix operators.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
                                                                                ~^~
```
[R/mbd_loglik_utils.R:63:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L63) *style:* **Lines should not be more than 80 characters.**
```r
  # M[row(M) == col(M)] = M[row(M) == col(M)] - c(lambda*(nvec[-length(nvec)]+k),0)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:63:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L63) *style:* **Commented code should be removed.**
```r
  # M[row(M) == col(M)] = M[row(M) == col(M)] - c(lambda*(nvec[-length(nvec)]+k),0)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:64:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L64) *style:* **Lines should not be more than 80 characters.**
```r
  M[row(M) == col(M)] <- M[row(M) == col(M)] - lambda * (nvec + k) #new version to avoid the dumpster problem at the end of the matrix
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:74:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L74) *style:* **Variable or function name should be snake_case.**
```r
create_B <- function(lambda, nu, q, k, b, max_number_of_species){
^~~~~~~~
```
[R/mbd_loglik_utils.R:75:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L75) *style:* **Lines should not be more than 80 characters.**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:75:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L75) *style:* **Variable or function name should be snake_case.**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
  ^
```
[R/mbd_loglik_utils.R:75:8:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L75) *warning:* **no visible global function definition for ‘create_B0’**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
       ^~~~~~~~~
```
[R/mbd_loglik_utils.R:76:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L76) *style:* **Lines should not be more than 80 characters.**
```r
  B <- lambda * k * diag(max_number_of_species + 1) * (b == 1) + nu * choose(k, b) * (q^b) * M
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:76:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L76) *style:* **Variable or function name should be snake_case.**
```r
  B <- lambda * k * diag(max_number_of_species + 1) * (b == 1) + nu * choose(k, b) * (q^b) * M
  ^
```
[R/mbd_loglik_utils.R:85:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L85) *style:* **Variable or function name should be snake_case.**
```r
create_A.no_mbd = function(
^~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:85:17:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L85) *style:* **Use <-, not =, for assignment.**
```r
create_A.no_mbd = function(
                ^
```
[R/mbd_loglik_utils.R:95:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L95) *style:* **Lines should not be more than 80 characters.**
```r
  M <- create_A0(max_number_of_species = max_number_of_species, lambda = nu, mu = mu, q = q, k = k)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:95:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L95) *style:* **Variable or function name should be snake_case.**
```r
  M <- create_A0(max_number_of_species = max_number_of_species, lambda = nu, mu = mu, q = q, k = k)
  ^
```
[R/mbd_loglik_utils.R:95:8:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L95) *warning:* **no visible global function definition for ‘create_A0’**
```r
  M <- create_A0(max_number_of_species = max_number_of_species, lambda = nu, mu = mu, q = q, k = k)
       ^~~~~~~~~
```
[R/mbd_loglik_utils.R:96:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L96) *style:* **Lines should not be more than 80 characters.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:96:97:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L96) *style:* **Put spaces around all infix operators.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
                                                                                ~^~
```
[R/mbd_loglik_utils.R:96:99:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L96) *style:* **Put spaces around all infix operators.**
```r
  M[row(M) == col(M) + 1] <- M[row(M) == col(M) + 1] + lambda * (nvec[1:(max_number_of_species)]+2*k)
                                                                                ~^~
```
[R/mbd_loglik_utils.R:97:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L97) *style:* **Lines should not be more than 80 characters.**
```r
  M[row(M) == col(M)]     <- M[row(M) == col(M)] - c(lambda * (nvec[-length(nvec)] + k), 0)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:107:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L107) *style:* **Lines should not be more than 80 characters.**
```r
create_B.no_mbd = function(lambda, nu, q, k, b, max_number_of_species, minimum_multiple_births){
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:107:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L107) *style:* **Variable or function name should be snake_case.**
```r
create_B.no_mbd = function(lambda, nu, q, k, b, max_number_of_species, minimum_multiple_births){
^~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:107:17:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L107) *style:* **Use <-, not =, for assignment.**
```r
create_B.no_mbd = function(lambda, nu, q, k, b, max_number_of_species, minimum_multiple_births){
                ^
```
[R/mbd_loglik_utils.R:108:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L108) *style:* **Lines should not be more than 80 characters.**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:108:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L108) *style:* **Variable or function name should be snake_case.**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
  ^
```
[R/mbd_loglik_utils.R:108:8:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L108) *warning:* **no visible global function definition for ‘create_B0’**
```r
  M <- create_B0(max_number_of_species = max_number_of_species, q = q, k = k, b = b)
       ^~~~~~~~~
```
[R/mbd_loglik_utils.R:109:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L109) *style:* **Lines should not be more than 80 characters.**
```r
  B <- lambda * k * diag(max_number_of_species + 1) * (b == 1) + nu * choose(k, b) * (q^b) * M
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:109:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L109) *style:* **Variable or function name should be snake_case.**
```r
  B <- lambda * k * diag(max_number_of_species + 1) * (b == 1) + nu * choose(k, b) * (q^b) * M
  ^
```
[R/mbd_loglik_utils.R:110:48:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L110) *style:* **Use <-, not =, for assignment.**
```r
  B[row(B) > col(B) + minimum_multiple_births] = 0
                                               ^
```
[R/mbd_loglik_utils.R:119:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L119) *style:* **Variable or function name should be snake_case.**
```r
A_operator <- function(Q, transition_matrix, time_interval, precision = 50L,
^~~~~~~~~~
```
[R/mbd_loglik_utils.R:119:24:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L119) *style:* **Variable or function name should be snake_case.**
```r
A_operator <- function(Q, transition_matrix, time_interval, precision = 50L,
                       ^
```
[R/mbd_loglik_utils.R:130:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L130) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/mbd_loglik_utils.R:132:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L132) *style:* **Commented code should be removed.**
```r
    # exp_matrix <- rsexpm:::sexpm(transition_matrix * time_interval)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:133:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L133) *style:* **Commented code should be removed.**
```r
    # result     <- exp_matrix %*% Q
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:137:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L137) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/mbd_loglik_utils.R:138:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L138) *style:* **Variable or function name should be snake_case.**
```r
    result.nan <- result.negative <- 1
    ^~~~~~~~~~
```
[R/mbd_loglik_utils.R:138:19:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L138) *style:* **Variable or function name should be snake_case.**
```r
    result.nan <- result.negative <- 1
                  ^~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:140:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L140) *style:* **Lines should not be more than 80 characters.**
```r
    while ((result.nan == 1| result.negative == 1) & repetition < max_repetitions)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:140:28:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L140) *style:* **Put spaces around all infix operators.**
```r
    while ((result.nan == 1| result.negative == 1) & repetition < max_repetitions)
                          ~^
```
[R/mbd_loglik_utils.R:141:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L141) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    {
    ^
```
[R/mbd_loglik_utils.R:142:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L142) *style:* **Lines should not be more than 80 characters.**
```r
      result <- try(expoRkit::expv(v = Q, x = transition_matrix, t = time_interval, m = precision), silent = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:144:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L144) *style:* **Variable or function name should be snake_case.**
```r
      result.nan <- (any(!is.numeric(result)) || any(is.nan(result)))
      ^~~~~~~~~~
```
[R/mbd_loglik_utils.R:146:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L146) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
      {
      ^
```
[R/mbd_loglik_utils.R:149:7:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L149) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
      {
      ^
```
[R/mbd_loglik_utils.R:150:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L150) *style:* **Variable or function name should be snake_case.**
```r
        result.negative <- (any(result < 0))
        ^~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:152:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L152) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
        {
        ^
```
[R/mbd_loglik_utils.R:155:11:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L155) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
          {
          ^
```
[R/mbd_loglik_utils.R:165:20:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L165) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (!bad_result) {bad_result <- (any(result < 0))}
                   ^
```
[R/mbd_loglik_utils.R:165:52:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L165) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
  if (!bad_result) {bad_result <- (any(result < 0))}
                                                   ^
```
[R/mbd_loglik_utils.R:168:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L168) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/mbd_loglik_utils.R:171:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L171) *style:* **Lines should not be more than 80 characters.**
```r
    R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol = a_abstol, rtol = a_reltol)[2,-1], timeout = 1001)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:171:78:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L171) *warning:* **no visible binding for global variable ‘mbd_loglik_rhs’**
```r
    R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol = a_abstol, rtol = a_reltol)[2,-1], timeout = 1001)
                                                                             ^~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:171:150:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L171) *style:* **Commas should always have a space after.**
```r
    R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol = a_abstol, rtol = a_reltol)[2,-1], timeout = 1001)
                                                                                ^
```
[R/mbd_loglik_utils.R:181:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L181) *style:* **Lines should not be more than 80 characters.**
```r
#' A_operator_old <- function(Q, transition_matrix, time_interval, precision = 50L,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:192:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L192) *style:* **Lines should not be more than 80 characters.**
```r
#'     result <- try(expoRkit::expv(v = Q, x = transition_matrix, t = time_interval, m = precision), silent = T)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:193:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L193) *style:* **Lines should not be more than 80 characters.**
```r
#'     while ( ( any(!is.numeric(result)) || any(is.nan(result)) ) && precision < precision_limit )
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:196:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L196) *style:* **Lines should not be more than 80 characters.**
```r
#'       result <- try(expoRkit::expv(v = Q, x = transition_matrix, t = time_interval, m = precision), silent = T)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:202:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L202) *style:* **Lines should not be more than 80 characters.**
```r
#'         result <- try(expoRkit::expv(v = Q, x = transition_matrix, t = time_interval, m = precision), silent = T)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:209:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L209) *style:* **Lines should not be more than 80 characters.**
```r
#'     # result<-deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:210:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L210) *style:* **Lines should not be more than 80 characters.**
```r
#'     R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1], timeout = 1000)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:213:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L213) *style:* **Lines should not be more than 80 characters.**
```r
#'   if (any(!is.numeric(result)) || any(is.nan(result))) #sometimes expoRkit gives weird negative values. In this case perform standard lsoda integration.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:217:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L217) *style:* **Lines should not be more than 80 characters.**
```r
#'     # result<-deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:218:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L218) *style:* **Lines should not be more than 80 characters.**
```r
#'     R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1], timeout = 1000)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:220:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L220) *style:* **Lines should not be more than 80 characters.**
```r
#'   else if (any(result < 0)) #sometimes expoRkit gives weird negative values. In this case perform standard lsoda integration.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:224:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L224) *style:* **Lines should not be more than 80 characters.**
```r
#'     # result=deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:225:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L225) *style:* **Lines should not be more than 80 characters.**
```r
#'     R.utils::withTimeout(result <- deSolve::ode(y = Q, times = times, func = mbd_loglik_rhs, parms = ode_matrix, atol=a_abstol, rtol=a_reltol)[2,-1], timeout = 1000)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:228:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L228) *style:* **Lines should not be more than 80 characters.**
```r
#'   # if ( ( any(!is.numeric(result)) || any(is.nan(result)) ) && methode!="sexpm"){
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:229:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L229) *style:* **Lines should not be more than 80 characters.**
```r
#'   #     # to run this you actually need sexpm to be installed which, on the cluster, might not be the case.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:245:21:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L245) *style:* **Use <-, not =, for assignment.**
```r
    starting_vector = x
                    ^
```
[R/mbd_loglik_utils.R:246:23:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L246) *style:* **Use <-, not =, for assignment.**
```r
    transition_matrix = pars
                      ^
```
[R/mbd_loglik_utils.R:247:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L247) *style:* **Use <-, not =, for assignment.**
```r
    dx  = rep(0, length(starting_vector))
        ^
```
[R/mbd_loglik_utils.R:248:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L248) *style:* **Use <-, not =, for assignment.**
```r
    dx  = drop(transition_matrix %*% starting_vector)
        ^
```
[R/mbd_loglik_utils.R:249:9:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L249) *style:* **Use <-, not =, for assignment.**
```r
    out = (dx)
        ^
```
[R/mbd_loglik_utils.R:250:16:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L250) *style:* **Use <-, not =, for assignment.**
```r
    names(out) = names(x)
               ^
```
[R/mbd_loglik_utils.R:260:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L260) *style:* **Lines should not be more than 80 characters.**
```r
determine_k_limit <- function(pars, brts, lx, soc, methode, abstol = 1e-16, reltol = 1e-10) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:261:22:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L261) *warning:* **local variable ‘mu’ assigned but may not be used**
```r
  lambda <- pars[1]; mu <- pars[2]; nu <- pars[3]; q <- pars[4]
                     ^~
```
[R/mbd_loglik_utils.R:263:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L263) *style:* **Variable or function name should be snake_case.**
```r
  Qi <- c(1, rep(0, lx))
  ^~
```
[R/mbd_loglik_utils.R:265:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L265) *style:* **Variable or function name should be snake_case.**
```r
  T0 <- create_A(lambda = lambda, mu = 0, nu = nu, q = q, k = soc,
  ^~
```
[R/mbd_loglik_utils.R:266:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L266) *style:* **Lines should not be more than 80 characters.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:266:54:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L266) *style:* **Commented code should be removed.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
                                                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:267:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L267) *style:* **Variable or function name should be snake_case.**
```r
  Pm <- A_operator(Q = Qi, transition_matrix = T0, time_interval = total_time,
  ^~
```
[R/mbd_loglik_utils.R:268:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L268) *style:* **Lines should not be more than 80 characters.**
```r
                         precision = 250L, methode = methode, a_abstol = abstol, a_reltol = reltol)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:269:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L269) *style:* **Commented code should be removed.**
```r
  # graphics::plot((Pm/sum(Pm)))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:270:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L270) *style:* **Lines should not be more than 80 characters.**
```r
  k_limit <- soc + max(mvec[(mvec %in% which((cumsum(Pm/sum(Pm))) <= 0.95))]); k_limit
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:270:56:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L270) *style:* **Put spaces around all infix operators.**
```r
  k_limit <- soc + max(mvec[(mvec %in% which((cumsum(Pm/sum(Pm))) <= 0.95))]); k_limit
                                                      ~^~
```
[R/mbd_loglik_utils.R:279:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L279) *style:* **Variable and function names should not be longer than 30 characters.**
```r
calculate_conditional_probability <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:285:13:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L285) *style:* **Only use double-quotes.**
```r
  methode = 'expo',
            ^~~~~~
```
[R/mbd_loglik_utils.R:293:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L293) *style:* **Variable or function name should be snake_case.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
  ^~~~~~~~~~~
```
[R/mbd_loglik_utils.R:293:31:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L293) *style:* **Put spaces around all infix operators.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
                             ~^~
```
[R/mbd_loglik_utils.R:293:32:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L293) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
                               ^
```
[R/mbd_loglik_utils.R:294:25:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L294) *style:* **Put spaces around all infix operators.**
```r
  one_over_qm_binom <- 1/choose((m + soc), soc); length(one_over_qm_binom)
                       ~^~
```
[R/mbd_loglik_utils.R:295:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L295) *style:* **Commented code should be removed.**
```r
  # Qi <- c(1, rep(0, lx)); length(Qi)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:296:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L296) *style:* **Lines should not be more than 80 characters.**
```r
  Qi <- rep(0, lx + 1);  Qi[3] <- 1 #starting with k = 0 and m = 2 missing species
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:296:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L296) *style:* **Variable or function name should be snake_case.**
```r
  Qi <- rep(0, lx + 1);  Qi[3] <- 1 #starting with k = 0 and m = 2 missing species
  ^~
```
[R/mbd_loglik_utils.R:297:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L297) *warning:* **local variable ‘k’ assigned but may not be used**
```r
  k <- 0 #assuming 0 species
  ^
```
[R/mbd_loglik_utils.R:299:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L299) *style:* **Variable or function name should be snake_case.**
```r
  TM <- create_A(lambda = lambda, mu = mu, nu = nu, q = q, k = 0,
  ^~
```
[R/mbd_loglik_utils.R:300:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L300) *style:* **Lines should not be more than 80 characters.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:300:54:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L300) *style:* **Commented code should be removed.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
                                                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:302:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L302) *style:* **Lines should not be more than 80 characters.**
```r
  A2_v1 <- A_operator(Q = Qi, transition_matrix = TM, time_interval = total_time,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:302:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L302) *style:* **Variable or function name should be snake_case.**
```r
  A2_v1 <- A_operator(Q = Qi, transition_matrix = TM, time_interval = total_time,
  ^~~~~
```
[R/mbd_loglik_utils.R:303:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L303) *style:* **Lines should not be more than 80 characters.**
```r
                            precision = 250L, methode = methode, a_abstol = abstol, a_reltol = reltol); A2_v1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:305:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L305) *style:* **Lines should not be more than 80 characters.**
```r
  # A2_v1 <- try(expoRkit::expv(v = Qi, x = TM, t = total_time, m = 50L), silent = T)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:305:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L305) *style:* **Commented code should be removed.**
```r
  # A2_v1 <- try(expoRkit::expv(v = Qi, x = TM, t = total_time, m = 50L), silent = T)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:308:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L308) *style:* **Lines should not be more than 80 characters.**
```r
  tips_components <- 1 + 0:1 #these are the components I want to exclude (the one corresponding to 0 and 1 tips)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:309:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L309) *style:* **Variable or function name should be snake_case.**
```r
  Pc <- 1 - sum(total_product[tips_components]); Pc
  ^~
```
[R/mbd_loglik_utils.R:310:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L310) *style:* **Commented code should be removed.**
```r
  # Pc <- sum(total_product)
    ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:321:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L321) *style:* **Variable and function names should not be longer than 30 characters.**
```r
calculate_conditional_probability0 <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:327:13:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L327) *style:* **Only use double-quotes.**
```r
  methode = 'expo',
            ^~~~~~
```
[R/mbd_loglik_utils.R:335:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L335) *style:* **Variable or function name should be snake_case.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
  ^~~~~~~~~~~
```
[R/mbd_loglik_utils.R:335:31:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L335) *style:* **Put spaces around all infix operators.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
                             ~^~
```
[R/mbd_loglik_utils.R:335:32:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L335) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  one_over_Cm <- (3 * (m + 1))/(m + 3); length(one_over_Cm)
                               ^
```
[R/mbd_loglik_utils.R:336:25:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L336) *style:* **Put spaces around all infix operators.**
```r
  one_over_qm_binom <- 1/choose((m + soc), soc); length(one_over_qm_binom)
                       ~^~
```
[R/mbd_loglik_utils.R:337:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L337) *style:* **Variable or function name should be snake_case.**
```r
  Qi <- c(1, rep(0, lx)); length(Qi)
  ^~
```
[R/mbd_loglik_utils.R:339:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L339) *style:* **Variable or function name should be snake_case.**
```r
  TM <- create_A(lambda = lambda, mu = mu, nu = nu, q = q, k = soc,
  ^~
```
[R/mbd_loglik_utils.R:340:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L340) *style:* **Lines should not be more than 80 characters.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:340:54:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L340) *style:* **Commented code should be removed.**
```r
                       max_number_of_species = lx); #dim(TM); max(is.na(TM)); max(is.infinite(TM))
                                                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:342:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L342) *style:* **Lines should not be more than 80 characters.**
```r
  A2_v1 <- A_operator(Q = Qi, transition_matrix = TM, time_interval = total_time,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:342:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L342) *style:* **Variable or function name should be snake_case.**
```r
  A2_v1 <- A_operator(Q = Qi, transition_matrix = TM, time_interval = total_time,
  ^~~~~
```
[R/mbd_loglik_utils.R:345:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L345) *style:* **Lines should not be more than 80 characters.**
```r
  # A2_v1 <- try(expoRkit::expv(v = Qi, x = TM, t = total_time, m = 50L), silent = T)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:345:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L345) *style:* **Commented code should be removed.**
```r
  # A2_v1 <- try(expoRkit::expv(v = Qi, x = TM, t = total_time, m = 50L), silent = T)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:348:54:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L348) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  missingspecies_min <- max((tips_interval[1] - 2), 0 )
                                                     ^
```
[R/mbd_loglik_utils.R:350:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L350) *style:* **Lines should not be more than 80 characters.**
```r
  tips_components <- 1 + c(missingspecies_min, missingspecies_max) # +1 is because of the zero-th component
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:351:3:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L351) *style:* **Variable or function name should be snake_case.**
```r
  Pc <- sum(total_product[tips_components[1]:tips_components[2]])
  ^~
```
[R/mbd_loglik_utils.R:352:5:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L352) *style:* **Commented code should be removed.**
```r
  # Pc <- sum(total_product)
    ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:363:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L363) *style:* **Variable and function names should not be longer than 30 characters.**
```r
calculate_conditional_probability0PB <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:363:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L363) *style:* **Variable or function name should be snake_case.**
```r
calculate_conditional_probability0PB <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/mbd_loglik_utils.R:369:13:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L369) *style:* **Only use double-quotes.**
```r
  methode = 'expo',
            ^~~~~~
```
[R/mbd_loglik_utils.R:375:1:](https://github.com/Giappo/mbd/blob/9d535e24e73f0a074f057050f56ba4b82dc18e38/R/mbd_loglik_utils.R#L375) *style:* **Lines should not be more than 80 characters.**
```r
  if (mu != 0){cat('mu is supposed to be equal zero to use this function'); return(Pc <- NA)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Here is the path:

- BalanceToJSON() [src/omnicore/rpc.cpp]
- getMPbalance() [src/omnicore/omnicore.cpp]
- getMoney() [src/omnicore/tally.cpp]


引数app、recordsは必須項目なのでnilの許可は不要です


@gdamore I guess you meant to tag @janjaapbos instead of @janjaap ;)


引数app、id、recordは必須項目なのでnilの許可は不要です


引数app、updateKey、recordは必須項目なのでnilの許可は不要です


Successfully aliased the URL <https://spotted-hqlvnwwnaw.now.sh> to the following alias.

* https://spotted-city.com


No origin and no licensing information for fonts... :(


Copy of this build can be found at
https://www.mewbuilds.com/build/52eec57db25b3b63475a46fa8b64730f29743d75/index.html
                       https://www.cloudflare-ipfs.com/ipfs/QmSXfVNk9P2WPo2CsC1atm4ahq23Rix1EWEXK2UWephCFC


Comment corrected


first branch commit


Successfully aliased the URL <https://chartcomposer-uievzqxwsj.now.sh> to the following alias.

* https://chartcomposer.com


Aliasing failed with the following error:

~~~
Error! We couldn't verify the propagation of the DNS settings for arclightfabrication.com
~~~


#6982-EngRefEquationFixPart6 (RKStrand) - x86_64-Linux-Ubuntu-14.04-gcc-4.8-IntegrationCoverage-Debug: OK (2409 of 2409 tests passed, 0 test warnings)

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


引数app、idsは必須項目なのでnilの許可は不要です


Successfully aliased the URL <https://arclightfabrication-gkyxnygsgu.now.sh> to the following alias.

* https://staging.arclightfabrication.com


#6982-EngRefEquationFixPart6 (RKStrand) - x86_64-Linux-Ubuntu-14.04-custom_check: OK (0 of 0 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png)


thanks

https://styleoflady.com/latest-blouse-designs/


Is there a reason you have moved U16 to type NetworkPort? Just readability?


This code is unsafe until I sanitize (filter ";") names


引数app、record、assigneesは必須項目なのでnilの許可は不要です


Hi @harikt,

It'll most certainly work on MySQL, Postgres _and_ SQLite. This is just the prototype of what i'm working on. Before it reaches alpha, it won't ship with pre-made migrations, but it'll create the schema on the fly, according to the configured DB. :-)


引数app、id、actionは必須項目なのでnilの許可は不要です


black sheep wall


Ah yeah, i forgot about the client. My bad.


引数app、recordsは必須項目なのでnilの許可は不要です


> Shouldn't the hasInstance be defined on the QueryResult class?

Nope, in jQuery you have `$` carting the prototype of `fn.init` so that you check `obj instanceof $`. Here the class is not even directly exposed (but reachable by evil code anyway) so checking via `$` should feel natural for jQuery users.

> And might it not be better to duck-type within hasInstance in case the instance being checked is from another QueryResult (e.g., different frame)?

Not really. If you have your own `$` you also have your own `.extend(...)` calls. A similar object from an iframe wouldn't necessarily have the same extend so assuming it's a duck doesn't mean it squeaks.

This also introduces a lot of boilerplate to the transpiled version due usage of symbols so I am thinking to actually probably just drop it instead since all you need to do to be sure something is an `$` is just `$(something)` ... that's it: that can be an Array, a QueryResult, a node, a CSS, a window, a document ... it's OK.


After updating my packages I'm now getting the error 'Symbol's value as variable is void: sml/projectile-replacement-format'


FUCK SJW. It will destroy linux.


Just curious, why are you not returning immediately if `toJSON` exists?


@k0kubun

I think you've got it working, but due to a bunch of things with spec tests, I've finally seen a failure I saw earlier.

By chance, can you cancel Appveyor tests?  This [patch](https://raw.githubusercontent.com/MSP-Greg/ruby-loco/master/patches_spec/ruby-core-encoding-converter-search_convpath_spec.rb.patch) seems to fix the MinGW spec issue.  It probably points to a bug, but don't know if one could come up with a short repro for it.

The doc's for the method seem to show strings for parameters, but it works elsewhere with encodings.  In  a console:
```ruby
Encoding::Converter.search_convpath(Encoding::ASCII_8BIT, Encoding::Emacs_Mule)
```
generates an error.  But in the spec tests, it seems to generate a silent SEGV.  Adding `.to_s` to each encoding parameter fixes the issue.


В репе Railway.rb, должен быть railway.rb


Alfabethical order please.


Спасибо


What with those extra spaces after `const`?


Spaces.


Reis çalışıyon yaw :D