max/ourMELONS
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Fixed syntax (#25)

Browse source
This commit is contained in:
Waldir Leoncio 2023-08-11 16:23:02 +02:00
parent 44e418f838
commit cfb71bfd6d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
R/initialCounts.R
View file

@ -2,7 +2,7 @@ initialCounts <- function(partition, data, npops, rows, noalle, adjprior) {
nloci <- size(data, 2) nloci <- size(data, 2)
ninds <- size(rows, 1) ninds <- size(rows, 1)
koot <- rows[, 1] - rows[, 2] + 1 koot <- rows[1] - rows[2] + 1
maxSize <- base::max(koot) maxSize <- base::max(koot)
counts <- zeros(base::max(noalle), nloci, npops) counts <- zeros(base::max(noalle), nloci, npops)