Hi,

The loan.csv file was in the dataset I received as part of a recruitment process.

I believe it is available on kaggle as part of Lending Club loan data.

https://www.kaggle.com/wendykan/lending-club-loan-data

I am traveling till October 25th. Please let me know if you find the dataset, else I can send it once I am back. Let me know your email ID.

Regards,

Nisseem

Get Outlook for Android

From: Dr. Shiulee Chakraborty

Sent: Friday, 14 October, 19:48

Subject: Re: [nissimnabar/lending-club-loan-data] initial data analysis, logistic model and random forests (a3438fe)

To: nissimnabar/lending-club-loan-data

Cc: Nissim Nabar, Author

Hello,

I follow your coding but unable to fetch loan.csv file. Would you please help me in this matter?

—

You are receiving this because you authored the thread.

Reply to this email directly, view it on GitHub, or mute the thread.


I believe this was causing change detection to fail on my machine with a download of the latest development branch.  Is `--no-lock-index` a standard option for `git status`?  I could not find any reference to it, and when I attempt to run using the bundled vendor git it fails with an unknown option error.

Thanks much for any info.


A port on the interface of a composite arrow is both an inport and an outport depending on which way you are looking from.

When we compose them we need to take that into account.


Ну во первых на сайте могут изменить значение (в данном варианте запятая) на другое (скажем точку) и пойдут проблемы.
Во вторых, скорость. Вон в последнем изменении у Вас идет несколько раз чтение значения, то есть сначала получаете 1,234 Copies, из него убираете запятую, потом опять читаете полученное значение 1234 Copies и от сюда убираете "Copies", потом его переводите в инт. Много лишних действий.


the change must be below of this line, check:
https://github.com/otland/forgottenserver/commit/3fbdb48a6bc48b7bf81c386f3a10675e081d23ff


Trivial change to test the contribution process from a new account.


We are using other eslint plugins that require eslint 2.

We resolved it by pinning eslint-plugin-meteor 4.0.0 explicitly instead of `^4.0.0`, but obviously that doesn't survive indefinitely.

Does eslint-plugin-meteor 4.0.0 actually require eslint 3 and it was just a metadata error (ie, and we should downgrade to elint-plugin-meteor 3.x?)


Repro steps? E.g.
- bring up fake ~zod, ~binzod, ~marzod
- federate their /test in a triad
- connect fake ~samzod to ~zod/test
- watch the notifications roll in


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


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


I wouldn't know. I caused it by pushing the update to the live network, at which point presence notifications spammed for a few hours until I got back to my computer and reverted it.


![](https://github.trello.services/images/mini-trello-icon.png) [Slider-ul pentru articole din Home](https://trello.com/c/CaCktYbm/3-slider-ul-pentru-articole-din-home)


@amcclain yeah you'd have to use a recent Git version for that (https://github.com/git-for-windows/git/commit/e113139ba3bfae66cac3d59cf6e3315ae52efdd0)


Explained in the PR https://github.com/avajs/ava/pull/1068:

> Long-term we'll want to use babel-preset-env, but it's too immature at the moment. I didn't include a specific preset for Node.js 6 as it didn't improve performance and will be solved with the eventual use of babel-preset-env.

This is just a temp improvement.


@regilero @Anaethelion this plugin i just did is just awsome, it brings jinja'ed variables to ansible (ala salt !)


Hi, there is still a problem during the install phase with the new release.
in the install.php file there are still calls to mysql_* API
If I change those 2 calls with the new mysqli_* the install phase locks at the DB discovery (after logging in) with the message
`ERROR: Cannot use the database 'loganalyzer'! If the database does not exists, create it or check user access permissions!
Mysql Error - Description:`

The database is present and the user has all the needed permissions: I can even login with that user in the mysql cli.

Thank you and best regards


IMHO, when we define the scope of shared code or framework, we need to guide client to use the correct implementation. so I think if TMessage : IEmailMessage concept which all email senders understand (like, from, to, body, ...) then no one could create IEmailSender<object> which doesn't make sense. also there is one more advantage of defining TMessage notion correctly and that is if we wanted to add some filters or framework wide enhancement on TMessage (like restrict sending email to special domain, analyze email body of any XSS or bad code, ...) we can provide those capability in framework level and let the user to override but not forcing them to implement those logic themselves. it also helps in framework level logging of messages.


Cool 👍


@joseph-robertson  99.6% condition above; this needs to be updated to 99%. Want me to fix it?


I think your code would behave faster if you reduced the use of mutexes used by the two threads.

Instead of a model where reading/getting space for writing a slot needs a mutex, you could get space for a few hundred of slots (I know all slots don't take the same space). The idea is that you still need a mutex to allocate space in the queue, but you need to use the mutex much less often (only when you've run out of space in the small space obtained). The other thread would see the work queued only when you have filled all the slots and have switch to new space. (And you need special handling when you need to wait for the other thread. In that case it would see everything immediately).


Theres a typo


Trivial change to test the contribution process from a test account.


[R/dEploidTools.R:1:22:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L1) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
fun.parse <- function( args ){
                     ^
```
[R/dEploidTools.R:1:28:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L1) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
fun.parse <- function( args ){
                           ^
```
[R/dEploidTools.R:2:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L2) *style:* **Variable and function names should be all lowercase.**
```r
    fun.local.checkAndIncreaseArgI <- function ( ){
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:2:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L2) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
    fun.local.checkAndIncreaseArgI <- function ( ){
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:2:48:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L2) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    fun.local.checkAndIncreaseArgI <- function ( ){
                                               ^
```
[R/dEploidTools.R:3:15:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L3) *style:* **Use <-, not =, for assignment.**
```r
        arg_i = arg_i+1
              ^
```
[R/dEploidTools.R:3:22:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L3) *style:* **Put spaces around all infix operators.**
```r
        arg_i = arg_i+1
                    ~^~
```
[R/dEploidTools.R:6:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L6) *style:* **Variable and function names should be all lowercase.**
```r
    outPrefix = "dataExplore"
    ^~~~~~~~~
```
[R/dEploidTools.R:6:15:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L6) *style:* **Use <-, not =, for assignment.**
```r
    outPrefix = "dataExplore"
              ^
```
[R/dEploidTools.R:7:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L7) *style:* **Variable and function names should be all lowercase.**
```r
    vcfFileName = ""
    ^~~~~~~~~~~
```
[R/dEploidTools.R:7:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L7) *style:* **Use <-, not =, for assignment.**
```r
    vcfFileName = ""
                ^
```
[R/dEploidTools.R:8:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L8) *style:* **Variable and function names should be all lowercase.**
```r
    refFileName = ""
    ^~~~~~~~~~~
```
[R/dEploidTools.R:8:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L8) *style:* **Use <-, not =, for assignment.**
```r
    refFileName = ""
                ^
```
[R/dEploidTools.R:9:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L9) *style:* **Variable and function names should be all lowercase.**
```r
    altFileName = ""
    ^~~~~~~~~~~
```
[R/dEploidTools.R:9:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L9) *style:* **Use <-, not =, for assignment.**
```r
    altFileName = ""
                ^
```
[R/dEploidTools.R:10:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L10) *style:* **Variable and function names should be all lowercase.**
```r
    plafFileName = ""
    ^~~~~~~~~~~~
```
[R/dEploidTools.R:10:18:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L10) *style:* **Use <-, not =, for assignment.**
```r
    plafFileName = ""
                 ^
```
[R/dEploidTools.R:11:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L11) *style:* **Variable and function names should be all lowercase.**
```r
    excludeFileName = ""
    ^~~~~~~~~~~~~~~
```
[R/dEploidTools.R:11:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L11) *style:* **Use <-, not =, for assignment.**
```r
    excludeFileName = ""
                    ^
```
[R/dEploidTools.R:12:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L12) *style:* **Variable and function names should be all lowercase.**
```r
    dEploidPrefix = ""
    ^~~~~~~~~~~~~
```
[R/dEploidTools.R:12:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L12) *style:* **Use <-, not =, for assignment.**
```r
    dEploidPrefix = ""
                  ^
```
[R/dEploidTools.R:13:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L13) *style:* **Variable and function names should be all lowercase.**
```r
    excludeBool = FALSE
    ^~~~~~~~~~~
```
[R/dEploidTools.R:13:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L13) *style:* **Use <-, not =, for assignment.**
```r
    excludeBool = FALSE
                ^
```
[R/dEploidTools.R:15:11:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L15) *style:* **Use <-, not =, for assignment.**
```r
    arg_i = 1
          ^
```
[R/dEploidTools.R:16:11:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L16) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    while ( arg_i < length(args) ){
          ^
```
[R/dEploidTools.R:16:33:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L16) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    while ( arg_i < length(args) ){
                                ^
```
[R/dEploidTools.R:17:14:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L17) *style:* **Use <-, not =, for assignment.**
```r
        argv = args[arg_i]
             ^
```
[R/dEploidTools.R:18:12:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L18) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( argv == "-vcf" ){
           ^
```
[R/dEploidTools.R:18:28:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L18) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( argv == "-vcf" ){
                           ^
```
[R/dEploidTools.R:19:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L19) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:19:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L19) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:19:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L19) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:19:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L19) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:20:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L20) *style:* **Variable and function names should be all lowercase.**
```r
            vcfFileName = args[arg_i]
            ^~~~~~~~~~~
```
[R/dEploidTools.R:20:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L20) *style:* **Use <-, not =, for assignment.**
```r
            vcfFileName = args[arg_i]
                        ^
```
[R/dEploidTools.R:21:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L21) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-plaf" ){
                  ^
```
[R/dEploidTools.R:21:36:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L21) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-plaf" ){
                                   ^
```
[R/dEploidTools.R:22:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L22) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:22:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L22) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:22:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L22) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:22:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L22) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:23:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L23) *style:* **Variable and function names should be all lowercase.**
```r
            plafFileName = args[arg_i]
            ^~~~~~~~~~~~
```
[R/dEploidTools.R:23:26:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L23) *style:* **Use <-, not =, for assignment.**
```r
            plafFileName = args[arg_i]
                         ^
```
[R/dEploidTools.R:24:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L24) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-ref" ){
                  ^
```
[R/dEploidTools.R:24:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L24) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-ref" ){
                                  ^
```
[R/dEploidTools.R:25:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L25) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:25:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L25) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:25:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L25) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:25:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L25) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:26:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L26) *style:* **Variable and function names should be all lowercase.**
```r
            refFileName = args[arg_i]
            ^~~~~~~~~~~
```
[R/dEploidTools.R:26:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L26) *style:* **Use <-, not =, for assignment.**
```r
            refFileName = args[arg_i]
                        ^
```
[R/dEploidTools.R:27:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L27) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-alt" ){
                  ^
```
[R/dEploidTools.R:27:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L27) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-alt" ){
                                  ^
```
[R/dEploidTools.R:28:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L28) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:28:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L28) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:28:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L28) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:28:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L28) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:29:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
            altFileName = args[arg_i]
            ^~~~~~~~~~~
```
[R/dEploidTools.R:29:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L29) *style:* **Use <-, not =, for assignment.**
```r
            altFileName = args[arg_i]
                        ^
```
[R/dEploidTools.R:30:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L30) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-exclude" ){
                  ^
```
[R/dEploidTools.R:30:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L30) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-exclude" ){
                                      ^
```
[R/dEploidTools.R:31:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L31) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:31:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L31) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:31:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L31) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:31:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L31) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:32:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L32) *style:* **Variable and function names should be all lowercase.**
```r
            excludeFileName = args[arg_i]
            ^~~~~~~~~~~~~~~
```
[R/dEploidTools.R:32:29:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L32) *style:* **Use <-, not =, for assignment.**
```r
            excludeFileName = args[arg_i]
                            ^
```
[R/dEploidTools.R:33:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L33) *style:* **Variable and function names should be all lowercase.**
```r
            excludeBool = TRUE
            ^~~~~~~~~~~
```
[R/dEploidTools.R:33:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L33) *style:* **Use <-, not =, for assignment.**
```r
            excludeBool = TRUE
                        ^
```
[R/dEploidTools.R:34:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L34) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-o" ){
                  ^
```
[R/dEploidTools.R:34:33:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L34) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-o" ){
                                ^
```
[R/dEploidTools.R:35:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L35) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:35:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L35) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:35:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L35) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:35:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L35) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:36:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L36) *style:* **Variable and function names should be all lowercase.**
```r
            outPrefix = args[arg_i]
            ^~~~~~~~~
```
[R/dEploidTools.R:36:23:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L36) *style:* **Use <-, not =, for assignment.**
```r
            outPrefix = args[arg_i]
                      ^
```
[R/dEploidTools.R:37:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L37) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-dEprefix" ){
                  ^
```
[R/dEploidTools.R:37:40:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L37) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        } else if ( argv == "-dEprefix" ){
                                       ^
```
[R/dEploidTools.R:38:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L38) *style:* **Use <-, not =, for assignment.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                  ^
```
[R/dEploidTools.R:38:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L38) *style:* **Variable and function names should be all lowercase.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:38:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L38) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:38:52:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L38) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
            arg_i = fun.local.checkAndIncreaseArgI ( )
                                                   ^
```
[R/dEploidTools.R:39:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L39) *style:* **Variable and function names should be all lowercase.**
```r
            dEploidPrefix = args[arg_i]
            ^~~~~~~~~~~~~
```
[R/dEploidTools.R:39:27:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L39) *style:* **Use <-, not =, for assignment.**
```r
            dEploidPrefix = args[arg_i]
                          ^
```
[R/dEploidTools.R:44:15:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L44) *style:* **Use <-, not =, for assignment.**
```r
        arg_i = arg_i + 1
              ^
```
[R/dEploidTools.R:51:8:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L51) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( plafFileName == "" ){
       ^
```
[R/dEploidTools.R:51:10:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L51) *style:* **Variable and function names should be all lowercase.**
```r
    if ( plafFileName == "" ){
         ^~~~~~~~~~~~
```
[R/dEploidTools.R:51:28:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L51) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( plafFileName == "" ){
                           ^
```
[R/dEploidTools.R:58:12:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L58) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    return ( list ( vcfFileName = vcfFileName,
           ^
```
[R/dEploidTools.R:58:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L58) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    return ( list ( vcfFileName = vcfFileName,
                  ^
```
[R/dEploidTools.R:58:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L58) *style:* **Variable and function names should be all lowercase.**
```r
    return ( list ( vcfFileName = vcfFileName,
                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:59:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L59) *style:* **Variable and function names should be all lowercase.**
```r
                    refFileName = refFileName,
                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:60:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L60) *style:* **Variable and function names should be all lowercase.**
```r
                    altFileName = altFileName,
                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:61:36:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L61) *style:* **Variable and function names should be all lowercase.**
```r
                    plafFileName = plafFileName,
                                   ^~~~~~~~~~~~
```
[R/dEploidTools.R:62:33:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L62) *style:* **Variable and function names should be all lowercase.**
```r
                    outPrefix = outPrefix,
                                ^~~~~~~~~
```
[R/dEploidTools.R:63:37:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L63) *style:* **Variable and function names should be all lowercase.**
```r
                    dEploidPrefix = dEploidPrefix,
                                    ^~~~~~~~~~~~~
```
[R/dEploidTools.R:64:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L64) *style:* **Variable and function names should be all lowercase.**
```r
                    excludeFileName = excludeFileName,
                                      ^~~~~~~~~~~~~~~
```
[R/dEploidTools.R:65:35:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L65) *style:* **Variable and function names should be all lowercase.**
```r
                    excludeBool = excludeBool) )
                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:65:47:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L65) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
                    excludeBool = excludeBool) )
                                              ^
```
[R/dEploidTools.R:69:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L69) *style:* **Variable and function names should be all lowercase.**
```r
fun.dEploidPrefix <- function ( prefix ){
^~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:81:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L81) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
fun.extract.coverage <- function ( inputs ){
^~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:82:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L82) *style:* **Variable and function names should be all lowercase.**
```r
    if ( inputs$vcfFileName != "" ){
                ^~~~~~~~~~~
```
[R/dEploidTools.R:83:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L83) *style:* **Variable and function names should be all lowercase.**
```r
        return (extractCoverageFromVcf (inputs$vcfFileName))
                ^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:83:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L83) *warning:* **no visible global function definition for ‘extractCoverageFromVcf’**
```r
        return (extractCoverageFromVcf (inputs$vcfFileName))
                ^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:83:48:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L83) *style:* **Variable and function names should be all lowercase.**
```r
        return (extractCoverageFromVcf (inputs$vcfFileName))
                                               ^~~~~~~~~~~
```
[R/dEploidTools.R:85:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L85) *style:* **Variable and function names should be all lowercase.**
```r
        return (extractCoverageFromTxt (inputs$refFileName, inputs$altFileName))
                ^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:85:17:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L85) *warning:* **no visible global function definition for ‘extractCoverageFromTxt’**
```r
        return (extractCoverageFromTxt (inputs$refFileName, inputs$altFileName))
                ^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:85:48:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L85) *style:* **Variable and function names should be all lowercase.**
```r
        return (extractCoverageFromTxt (inputs$refFileName, inputs$altFileName))
                                               ^~~~~~~~~~~
```
[R/dEploidTools.R:85:68:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L85) *style:* **Variable and function names should be all lowercase.**
```r
        return (extractCoverageFromTxt (inputs$refFileName, inputs$altFileName))
                                                                   ^~~~~~~~~~~
```
[R/dEploidTools.R:109:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L109) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromTxt <- function ( refFileName, altFileName ){
^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:109:38:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L109) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromTxt <- function ( refFileName, altFileName ){
                                     ^~~~~~~~~~~
```
[R/dEploidTools.R:109:51:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L109) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromTxt <- function ( refFileName, altFileName ){
                                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:110:9:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L110) *style:* **Use <-, not =, for assignment.**
```r
    ref = read.table(refFileName, header = TRUE, comment.char = "")
        ^
```
[R/dEploidTools.R:110:22:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L110) *style:* **Variable and function names should be all lowercase.**
```r
    ref = read.table(refFileName, header = TRUE, comment.char = "")
                     ^~~~~~~~~~~
```
[R/dEploidTools.R:111:9:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L111) *style:* **Use <-, not =, for assignment.**
```r
    alt = read.table(altFileName, header = TRUE, comment.char = "")
        ^
```
[R/dEploidTools.R:111:22:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L111) *style:* **Variable and function names should be all lowercase.**
```r
    alt = read.table(altFileName, header = TRUE, comment.char = "")
                     ^~~~~~~~~~~
```
[R/dEploidTools.R:112:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L112) *style:* **Commas should always have a space after.**
```r
    return ( data.frame( CHROM = ref[,1],
                                      ^
```
[R/dEploidTools.R:113:37:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L113) *style:* **Commas should always have a space after.**
```r
                         POS = ref[,2],
                                    ^
```
[R/dEploidTools.R:114:42:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L114) *style:* **Commas should always have a space after.**
```r
                         refCount = ref[,3],
                                         ^
```
[R/dEploidTools.R:115:42:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L115) *style:* **Commas should always have a space after.**
```r
                         altCount = alt[,3] )
                                         ^
```
[R/dEploidTools.R:120:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L120) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
fun.extract.exclude <- function (excludeFileName, excludeBool){
^~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:120:34:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L120) *style:* **Variable and function names should be all lowercase.**
```r
fun.extract.exclude <- function (excludeFileName, excludeBool){
                                 ^~~~~~~~~~~~~~~
```
[R/dEploidTools.R:120:51:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L120) *style:* **Variable and function names should be all lowercase.**
```r
fun.extract.exclude <- function (excludeFileName, excludeBool){
                                                  ^~~~~~~~~~~
```
[R/dEploidTools.R:121:10:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L121) *style:* **Variable and function names should be all lowercase.**
```r
    if ( excludeBool ) {
         ^~~~~~~~~~~
```
[R/dEploidTools.R:122:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L122) *style:* **Variable and function names should be all lowercase.**
```r
        return ( list ( excludeBool = excludeBool,
                                      ^~~~~~~~~~~
```
[R/dEploidTools.R:123:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L123) *style:* **lines should not be more than 80 characters.**
```r
                        excludeTable = read.table(excludeFileName, header = TRUE, comment.char = "")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:123:51:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L123) *style:* **Variable and function names should be all lowercase.**
```r
                        excludeTable = read.table(excludeFileName, header = TRUE, comment.char = "")))
                                                  ^~~~~~~~~~~~~~~
```
[R/dEploidTools.R:125:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L125) *style:* **Variable and function names should be all lowercase.**
```r
        return ( list ( excludeBool = excludeBool ))
                                      ^~~~~~~~~~~
```
[R/dEploidTools.R:147:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L147) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromVcf <- function ( vcfName, ADFieldIndex = 2 ){
^~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:147:38:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L147) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromVcf <- function ( vcfName, ADFieldIndex = 2 ){
                                     ^~~~~~~
```
[R/dEploidTools.R:147:47:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L147) *style:* **Variable and function names should be all lowercase.**
```r
extractCoverageFromVcf <- function ( vcfName, ADFieldIndex = 2 ){
                                              ^~~~~~~~~~~~
```
[R/dEploidTools.R:150:12:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L150) *style:* **Place a space before left parenthesis, except in a function call.**
```r
         if( any( grepl( "gzfile connection", w) ) )
           ^
```
[R/dEploidTools.R:154:9:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L154) *style:* **Use <-, not =, for assignment.**
```r
    gzf = gzfile(vcfFile, open = "rb")
        ^
```
[R/dEploidTools.R:154:18:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L154) *style:* **Variable and function names should be all lowercase.**
```r
    gzf = gzfile(vcfFile, open = "rb")
                 ^~~~~~~
```
[R/dEploidTools.R:154:18:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L154) *warning:* **no visible binding for global variable ‘vcfFile’**
```r
    gzf = gzfile(vcfFile, open = "rb")
                 ^~~~~~~
```
[R/dEploidTools.R:155:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L155) *style:* **Variable and function names should be all lowercase.**
```r
    skipNum = 0
    ^~~~~~~
```
[R/dEploidTools.R:155:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L155) *style:* **Use <-, not =, for assignment.**
```r
    skipNum = 0
            ^
```
[R/dEploidTools.R:156:10:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L156) *style:* **Use <-, not =, for assignment.**
```r
    line = withCallingHandlers( readLines(gzf, n=1), warning=h)
         ^
```
[R/dEploidTools.R:156:49:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L156) *style:* **Put spaces around all infix operators.**
```r
    line = withCallingHandlers( readLines(gzf, n=1), warning=h)
                                               ~^~
```
[R/dEploidTools.R:156:61:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L156) *style:* **Put spaces around all infix operators.**
```r
    line = withCallingHandlers( readLines(gzf, n=1), warning=h)
                                                           ~^~
```
[R/dEploidTools.R:158:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L158) *style:* **Commented code should be removed.**
```r
        if (grepl("##", line )){
                    ^~~~~~~~~~~~
```
[R/dEploidTools.R:159:13:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
            skipNum = skipNum+1
            ^~~~~~~
```
[R/dEploidTools.R:159:21:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L159) *style:* **Use <-, not =, for assignment.**
```r
            skipNum = skipNum+1
                    ^
```
[R/dEploidTools.R:159:23:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
            skipNum = skipNum+1
                      ^~~~~~~
```
[R/dEploidTools.R:159:30:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L159) *style:* **Put spaces around all infix operators.**
```r
            skipNum = skipNum+1
                            ~^~
```
[R/dEploidTools.R:163:14:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L163) *style:* **Use <-, not =, for assignment.**
```r
        line = withCallingHandlers( readLines(gzf, n=1), warning=h)
             ^
```
[R/dEploidTools.R:163:53:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L163) *style:* **Put spaces around all infix operators.**
```r
        line = withCallingHandlers( readLines(gzf, n=1), warning=h)
                                                   ~^~
```
[R/dEploidTools.R:163:65:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L163) *style:* **Put spaces around all infix operators.**
```r
        line = withCallingHandlers( readLines(gzf, n=1), warning=h)
                                                               ~^~
```
[R/dEploidTools.R:167:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **lines should not be more than 80 characters.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:167:10:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Use <-, not =, for assignment.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
         ^
```
[R/dEploidTools.R:167:31:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Variable and function names should be all lowercase.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                              ^~~~~~~
```
[R/dEploidTools.R:167:45:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Put spaces around all infix operators.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                                           ~^~
```
[R/dEploidTools.R:167:46:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Variable and function names should be all lowercase.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                                             ^~~~~~~
```
[R/dEploidTools.R:167:61:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Put spaces around all infix operators.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                                                           ~^~
```
[R/dEploidTools.R:167:77:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Put spaces around all infix operators.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                                                                           ~^~
```
[R/dEploidTools.R:167:119:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L167) *style:* **Put spaces around all infix operators.**
```r
    vcf  = read.table( gzfile(vcfName), skip=skipNum, header=T, comment.char="", stringsAsFactors = FALSE, check.names=FALSE)
                                                                                ~^~
```
[R/dEploidTools.R:169:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L169) *style:* **Variable and function names should be all lowercase.**
```r
    sampleName = names(vcf)[10]
    ^~~~~~~~~~
```
[R/dEploidTools.R:169:16:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L169) *style:* **Use <-, not =, for assignment.**
```r
    sampleName = names(vcf)[10]
               ^
```
[R/dEploidTools.R:171:9:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L171) *style:* **Use <-, not =, for assignment.**
```r
    tmp = vcf[[sampleName]]
        ^
```
[R/dEploidTools.R:171:16:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L171) *style:* **Variable and function names should be all lowercase.**
```r
    tmp = vcf[[sampleName]]
               ^~~~~~~~~~
```
[R/dEploidTools.R:172:11:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L172) *style:* **Use <-, not =, for assignment.**
```r
    field = strsplit(as.character(tmp),":")
          ^
```
[R/dEploidTools.R:172:40:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L172) *style:* **Commas should always have a space after.**
```r
    field = strsplit(as.character(tmp),":")
                                       ^
```
[R/dEploidTools.R:174:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L174) *style:* **Variable and function names should be all lowercase.**
```r
    tmpCovStr = unlist(lapply(field, `[[`, ADFieldIndex))
    ^~~~~~~~~
```
[R/dEploidTools.R:174:15:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L174) *style:* **Use <-, not =, for assignment.**
```r
    tmpCovStr = unlist(lapply(field, `[[`, ADFieldIndex))
              ^
```
[R/dEploidTools.R:174:44:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L174) *style:* **Variable and function names should be all lowercase.**
```r
    tmpCovStr = unlist(lapply(field, `[[`, ADFieldIndex))
                                           ^~~~~~~~~~~~
```
[R/dEploidTools.R:175:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L175) *style:* **Variable and function names should be all lowercase.**
```r
    tmpCov = strsplit(as.character(tmpCovStr),",")
    ^~~~~~
```
[R/dEploidTools.R:175:12:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L175) *style:* **Use <-, not =, for assignment.**
```r
    tmpCov = strsplit(as.character(tmpCovStr),",")
           ^
```
[R/dEploidTools.R:175:36:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L175) *style:* **Variable and function names should be all lowercase.**
```r
    tmpCov = strsplit(as.character(tmpCovStr),",")
                                   ^~~~~~~~~
```
[R/dEploidTools.R:175:47:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L175) *style:* **Commas should always have a space after.**
```r
    tmpCov = strsplit(as.character(tmpCovStr),",")
                                              ^
```
[R/dEploidTools.R:177:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L177) *style:* **Variable and function names should be all lowercase.**
```r
    refCount = as.numeric(unlist(lapply(tmpCov, `[[`, 1)))
    ^~~~~~~~
```
[R/dEploidTools.R:177:14:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L177) *style:* **Use <-, not =, for assignment.**
```r
    refCount = as.numeric(unlist(lapply(tmpCov, `[[`, 1)))
             ^
```
[R/dEploidTools.R:177:41:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L177) *style:* **Variable and function names should be all lowercase.**
```r
    refCount = as.numeric(unlist(lapply(tmpCov, `[[`, 1)))
                                        ^~~~~~
```
[R/dEploidTools.R:178:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L178) *style:* **Variable and function names should be all lowercase.**
```r
    altCount = as.numeric(unlist(lapply(tmpCov, `[[`, 2)))
    ^~~~~~~~
```
[R/dEploidTools.R:178:14:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L178) *style:* **Use <-, not =, for assignment.**
```r
    altCount = as.numeric(unlist(lapply(tmpCov, `[[`, 2)))
             ^
```
[R/dEploidTools.R:178:41:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L178) *style:* **Variable and function names should be all lowercase.**
```r
    altCount = as.numeric(unlist(lapply(tmpCov, `[[`, 2)))
                                        ^~~~~~
```
[R/dEploidTools.R:180:39:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L180) *style:* **Commas should always have a space after.**
```r
    return ( data.frame( CHROM = vcf[,1],
                                      ^
```
[R/dEploidTools.R:181:37:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L181) *style:* **Commas should always have a space after.**
```r
                         POS = vcf[,2],
                                    ^
```
[R/dEploidTools.R:182:37:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L182) *style:* **Variable and function names should be all lowercase.**
```r
                         refCount = refCount,
                                    ^~~~~~~~
```
[R/dEploidTools.R:183:37:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L183) *style:* **Variable and function names should be all lowercase.**
```r
                         altCount = altCount )
                                    ^~~~~~~~
```
[R/dEploidTools.R:204:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L204) *style:* **Variable and function names should be all lowercase.**
```r
extractPLAF<- function ( plafName ){
^~~~~~~~~~~
```
[R/dEploidTools.R:204:12:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L204) *style:* **Put spaces around all infix operators.**
```r
extractPLAF<- function ( plafName ){
          ~^
```
[R/dEploidTools.R:204:26:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L204) *style:* **Variable and function names should be all lowercase.**
```r
extractPLAF<- function ( plafName ){
                         ^~~~~~~~
```
[R/dEploidTools.R:205:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L205) *style:* **Variable and function names should be all lowercase.**
```r
    return ( read.table(plafName, header=T)$PLAF )
                        ^~~~~~~~
```
[R/dEploidTools.R:205:41:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L205) *style:* **Put spaces around all infix operators.**
```r
    return ( read.table(plafName, header=T)$PLAF )
                                       ~^~
```
[R/dEploidTools.R:210:11:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Put spaces around all infix operators.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
         ~^~~
```
[R/dEploidTools.R:210:19:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Put spaces around all infix operators.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
                 ~^~
```
[R/dEploidTools.R:210:23:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Put spaces around all infix operators.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
                     ~^~
```
[R/dEploidTools.R:210:24:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
                       ^
```
[R/dEploidTools.R:210:26:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Put spaces around all infix operators.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
                        ~^~
```
[R/dEploidTools.R:210:28:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L210) *style:* **Put spaces around all infix operators.**
```r
    f.samp<-f.samp+err*(1-2*f.samp);
                          ~^~
```
[R/dEploidTools.R:211:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **lines should not be more than 80 characters.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:211:8:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
      ~^~~
```
[R/dEploidTools.R:211:23:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                     ~^~
```
[R/dEploidTools.R:211:30:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                            ~^~
```
[R/dEploidTools.R:211:43:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                         ~^~
```
[R/dEploidTools.R:211:44:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                           ^
```
[R/dEploidTools.R:211:46:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                            ~^~
```
[R/dEploidTools.R:211:54:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                    ~^~
```
[R/dEploidTools.R:211:59:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                         ~^~
```
[R/dEploidTools.R:211:72:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                                      ~^~
```
[R/dEploidTools.R:211:77:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Commas should always have a space after.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                                            ^
```
[R/dEploidTools.R:211:77:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                                            ^
```
[R/dEploidTools.R:211:79:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                                             ~^~
```
[R/dEploidTools.R:211:87:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L211) *style:* **Put spaces around all infix operators.**
```r
    llk<-lbeta(cov.alt+f.samp*fac, cov.ref+(1-f.samp)*fac)-lbeta(f.samp*fac,(1-f.samp)*fac);
                                                                                ~^~
```
[R/dEploidTools.R:212:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L212) *style:* **lines should not be more than 80 characters.**
```r
    #  llk<-lgamma(fac*f.samp+cov.alt)+lgamma(fac*(1-f.samp)+cov.ref)-lgamma(fac*f.samp)-lgamma(fac*(1-f.samp));
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:212:8:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L212) *style:* **Commented code should be removed.**
```r
    #  llk<-lgamma(fac*f.samp+cov.alt)+lgamma(fac*(1-f.samp)+cov.ref)-lgamma(fac*f.samp)-lgamma(fac*(1-f.samp));
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:213:25:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L213) *style:* **Put spaces around all infix operators.**
```r
    if (sum(is.nan(llk))>1){
                       ~^~
```
[R/dEploidTools.R:220:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L220) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
fun.dic.by.llk.var <- function ( tmpllk ){
^~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:221:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L221) *style:* **lines should not be more than 80 characters.**
```r
     return (  mean(-2*tmpllk) + var(-2*tmpllk)/2 )# D_bar + 1/2 var (D_theta), where D_theta = -2*tmpllk, and D_bar = mean(D_theta)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:221:23:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L221) *style:* **Put spaces around all infix operators.**
```r
     return (  mean(-2*tmpllk) + var(-2*tmpllk)/2 )# D_bar + 1/2 var (D_theta), where D_theta = -2*tmpllk, and D_bar = mean(D_theta)
                     ~^~
```
[R/dEploidTools.R:221:40:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L221) *style:* **Put spaces around all infix operators.**
```r
     return (  mean(-2*tmpllk) + var(-2*tmpllk)/2 )# D_bar + 1/2 var (D_theta), where D_theta = -2*tmpllk, and D_bar = mean(D_theta)
                                      ~^~
```
[R/dEploidTools.R:221:48:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L221) *style:* **Put spaces around all infix operators.**
```r
     return (  mean(-2*tmpllk) + var(-2*tmpllk)/2 )# D_bar + 1/2 var (D_theta), where D_theta = -2*tmpllk, and D_bar = mean(D_theta)
                                              ~^~
```
[R/dEploidTools.R:225:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L225) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
fun.dic.by.theta <- function ( tmpllk, thetallk ){
^~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:226:5:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L226) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
    DIC.WSAF.bar = -2 * sum(thetallk)
    ^~~~~~~~~~~~
```
[R/dEploidTools.R:226:18:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L226) *style:* **Use <-, not =, for assignment.**
```r
    DIC.WSAF.bar = -2 * sum(thetallk)
                 ^
```
[R/dEploidTools.R:227:1:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L227) *style:* **lines should not be more than 80 characters.**
```r
    return (  mean(-2*tmpllk) + (mean(-2*tmpllk) - DIC.WSAF.bar) ) # D_bar + pD, where pD = D_bar - D_theta, and D_bar = mean(D_theta)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dEploidTools.R:227:22:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L227) *style:* **Put spaces around all infix operators.**
```r
    return (  mean(-2*tmpllk) + (mean(-2*tmpllk) - DIC.WSAF.bar) ) # D_bar + pD, where pD = D_bar - D_theta, and D_bar = mean(D_theta)
                    ~^~
```
[R/dEploidTools.R:227:41:](https://github.com/mcveanlab/DEploid-r/blob/502aa93a6e6ec4292ffdca7975a3386034de9b8d/R/dEploidTools.R#L227) *style:* **Put spaces around all infix operators.**
```r
    return (  mean(-2*tmpllk) + (mean(-2*tmpllk) - DIC.WSAF.bar) ) # D_bar + pD, where pD = D_bar - D_theta, and D_bar = mean(D_theta)
                                       ~^~
```


Seems like we could put this in ui_types.h just once maybe?


hello


If we're requiring 2.1 core, we could probably do away with the function pointer check, right?


CYA!


Hah. Awesome. We could probably just move this into r_main.c now.


Right, that's why I originally took the easy way out and rearranged the text :)

But I do think it's a good idea to arrange it as recommended, and redo the image to match


Strange, but fair enough.