Skip to content

Commit

Permalink
cosmetic formatting changes
Browse files Browse the repository at this point in the history
  • Loading branch information
jeffersonfparil committed Jun 25, 2024
1 parent 7fe06ce commit dea05bb
Showing 1 changed file with 0 additions and 2 deletions.
2 changes: 0 additions & 2 deletions R/io.R
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,6 @@ fn_G_extract_names = function(mat_genotypes, verbose=FALSE) {
p = ncol(mat_genotypes)
vec_ids = rownames(mat_genotypes)
vec_loci = colnames(mat_genotypes)

if (sum(duplicated(vec_ids)) > 0) {
error = methods::new("gpError",
code=000,
Expand All @@ -74,7 +73,6 @@ fn_G_extract_names = function(mat_genotypes, verbose=FALSE) {
"Please remove the duplicated loci."))
return(error)
}

n_identifiers = length(unlist(strsplit(vec_loci[1], "\t"))) ### Number of loci identifiers where we expect at least 2
if (n_identifiers < 2) {
error = methods::new("gpError",
Expand Down

0 comments on commit dea05bb

Please sign in to comment.