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

process_BAPS_data() can handle file being an R object

Browse source
This commit is contained in:
Waldir Leoncio 2024-08-09 13:55:55 +02:00
parent 7b7968f00b
commit 73b0a70138
1 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
R/process_BAPS_data.R
View file

@ -2,14 +2,23 @@ process_BAPS_data <- function(file, partitionCompare) {
if (!is.null(partitionCompare)) {
cat('Data:', file, '\n')
}
data <- read.table(file)
ninds <- testaaOnkoKunnollinenBapsData(data) # for testing purposes?
# Importing data
if (is.character(file)) {
data <- read.table(file)
} else {
data <- file
}
ninds <- testaaOnkoKunnollinenBapsData(data) # Checks if last column is ID
if (ninds == 0) {
warning('Incorrect Data-file.')
return(NULL)
}
popnames <- NULL # Dropped specification of population names (from BAPS 6)
# Processing data
result <- handleData(data, format = "BAPS")
data <- result$newData
rowsFromInd <- result$rowsFromInd