read.fstat and read.genepop do not treat missing data correctly

[zkamvar]

They both read missing data as "0"

MWE:

library(adegenet)
gobj <- read.genepop(system.file("files/nancycats.gen",package="adegenet"))
fobj <- read.fstat(system.file("files/nancycats.dat",package="adegenet"))
all(propTyped(gobj) == 1)
## [1] TRUE
all(propTyped(fobj) == 1)
## [1] TRUE
data(nancycats)
all(propTyped(nancycats) == 1)
## [1] FALSE

[zkamvar]

It was first brought up here: http://lists.r-forge.r-project.org/pipermail/adegenet-forum/2015-July/001182.html

[thibautjombart]

Thanks for the report! I'll sort this out today.

[thibautjombart]

Fixed. As of 2ab99e3:

> sum(is.na(tab(nancycats)))
[1] 617
> sum(is.na(tab(gobj)))
[1] 617
> sum(is.na(tab(fobj)))
[1] 617