Browse code

Fix polarity being a `integer` for CDF

jorainer authored on 03/02/2021 12:08:52
Showing1 changed files

... ...
@@ -58,8 +58,8 @@ setMethod("header", c("mzRnetCDF", "numeric"), function(object, scans) {
58 58
     result <- data.frame(
59 59
         seqNum=scans,
60 60
         acquisitionNum=scans,
61
-        msLevel=rep(1, length(scans)),
62
-        polarity = empty_val,
61
+        msLevel = rep(1L, length(scans)),
62
+        polarity = -1L,
63 63
         peaksCount=rep(1, length(scans)),
64 64
         totIonCurrent=netCDFVarDouble(object@backend, "total_intensity")[scans],
65 65
         retentionTime=netCDFVarDouble(object@backend, "scan_acquisition_time")[scans],