Mercurial > repos > tomnl > create_sqlite_db
diff create_sqlite_db.R @ 16:03e7f58e580e draft
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit f396d6689e17cb5537f54ada02a6bd691c7894d7
author | tomnl |
---|---|
date | Tue, 15 May 2018 06:56:33 -0400 |
parents | cf24c8ca7a57 |
children | 5eebc655f01b |
line wrap: on
line diff
--- a/create_sqlite_db.R Sun May 13 13:10:31 2018 -0400 +++ b/create_sqlite_db.R Tue May 15 06:56:33 2018 -0400 @@ -124,6 +124,9 @@ }else{ rtrawColumns <- TRUE } + if (is.null(xset)){ + xset <- xsa@xa + } # previous check should have matched filelists together xset@filepaths <- unname(pa@fileList) @@ -146,7 +149,7 @@ # get peakid, an scan id df_ids <- stringr::str_split_fixed(df$UID, '-', 3) - colnames(df_ids) <- c('grp_id', 'file_id', 'peak_id') + colnames(df_ids) <- c('grp_id', 'file_id', 'pid') df <- cbind(df_ids, df) # export to database