[R/dEploidTools.R:1:22:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L6) *style:* **Use <-, not =, for assignment.**
```r
    outPrefix = "dataExplore"
              ^
```
[R/dEploidTools.R:7:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L7) *style:* **Use <-, not =, for assignment.**
```r
    vcfFileName = ""
                ^
```
[R/dEploidTools.R:8:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L8) *style:* **Use <-, not =, for assignment.**
```r
    refFileName = ""
                ^
```
[R/dEploidTools.R:9:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L9) *style:* **Use <-, not =, for assignment.**
```r
    altFileName = ""
                ^
```
[R/dEploidTools.R:10:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L10) *style:* **Use <-, not =, for assignment.**
```r
    plafFileName = ""
                 ^
```
[R/dEploidTools.R:11:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L11) *style:* **Use <-, not =, for assignment.**
```r
    excludeFileName = ""
                    ^
```
[R/dEploidTools.R:12:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L12) *style:* **Use <-, not =, for assignment.**
```r
    dEploidPrefix = ""
                  ^
```
[R/dEploidTools.R:13:5:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L13) *style:* **Use <-, not =, for assignment.**
```r
    excludeBool = FALSE
                ^
```
[R/dEploidTools.R:15:11:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L33) *style:* **Use <-, not =, for assignment.**
```r
            excludeBool = TRUE
                        ^
```
[R/dEploidTools.R:34:19:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/R/dEploidTools.R#L155) *style:* **Use <-, not =, for assignment.**
```r
    skipNum = 0
            ^
```
[R/dEploidTools.R:156:10:](https://github.com/mcveanlab/DEploid-r/blob/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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/5ac175dfa7df6d860d887424879b2a5a1583e07b/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)
                                       ~^~
```


TeamCity Jarvis :: Jarvis.DocumentStore :: GitFlow Debug / Test / Release [Build 96](http://build.prxm.it:8811/viewLog.html?buildId=10254&buildTypeId=Jarvis_DocumentStore_GitVersion) is now running


![](https://github.trello.services/images/mini-trello-icon.png) [ajouter un nouveau type d'export alt=iframe](https://trello.com/c/Bt2GAmkq/71-ajouter-un-nouveau-type-d-export-alt-iframe)


Perhaps `bot` should be in the module constructor.


![](https://github.trello.services/images/mini-trello-icon.png) [Mobile - footer. Primadata sa apara butoanele de share unul lângă altul, si abia apoi copyright-ul](https://trello.com/c/DK2009hC/23-mobile-footer-primadata-sa-apara-butoanele-de-share-unul-langa-altul-si-abia-apoi-copyright-ul)


This is incorrect. You probably meant:
```
if(!node.isCompletelySet) {
  res.setPos(Some(node.getLine), Some(node.getColumn))
}
```

@arjunguha The position setter is an awful hack. The way you get it to work is by going through every line of code that you add to the parser, reason about it, and add the appropriate set command. Subsequently, everything breaks and then you fix each example on a case-by-case basis. Thankfully, the parser is almost complete, so I don't have to go through too many cases.