Dev (#27)

* plot update (ldict)

* plotting

* docs pkg

* docs, minor fix

* docs

* show ds

* show res ds

* save plots

* version bump

* update

* update

* update

* docs, plot output

* fix plots

* export, fix docs

* fix plots

* breaking changes in plots output

* fix docs

* pd tau

* plot dose time

* tests

* minor changes

* update MetidaBase minor changes

Project.toml

@@ -1,7 +1,7 @@
 name = "MetidaNCA"
 uuid = "097c2839-c7bc-4c4b-a5f2-b4167c1b4e7c"
 authors = ["PharmCat <[email protected]>"]
-version = "0.5.14"
+version = "0.5.15"
 
 
 
@@ -13,7 +13,7 @@ Requires = "ae029012-a4dd-5104-9daa-d747884805df"
 
 [compat]
 
-MetidaBase = "0.11.2, 0.11.3, 0.12"
+MetidaBase = "0.11.2, 0.11.3, 0.12, 0.13, 0.14"
 RecipesBase = "1"
 Requires = "1"
 julia = "1"

src/import.jl

@@ -2,6 +2,32 @@
 
 nonunique(v) = [k for (k, v) in StatsBase.countmap(v) if v > 1]
 
+parse_gkw(s::String) = [Symbol(s)]
+parse_gkw(s::Symbol) = [s]
+parse_gkw(s::AbstractVector{<:AbstractString}) = Symbol.(s)
+parse_gkw(s::AbstractVector{Symbol}) = s
+
+function floatparse(data::Missing, warn) 
+    warn && @warn "Value $data parsed as `NaN`"
+    return NaN
+end
+
+function floatparse(data::Nothing, warn) 
+    warn && @warn "Value $data parsed as `NaN`"
+    return NaN
+end
+
+floatparse(data::AbstractFloat, ::Any) = data
+
+function floatparse(data::AbstractString, warn) 
+    tp = tryparse(Float64, data)
+    warn && isnothing(tp) && @warn "Value $data parsed as `NaN`"
+    floatparse(tp, false) 
+end
+function floatparse(data::Int, warn)
+    float(data) 
+end
+#=
 function floatparse(data, warn)
     if !isa(data, AbstractFloat) && !ismissing(data)
         if isa(data, AbstractString)
@@ -25,7 +51,7 @@ function floatparse(data, warn)
         return data
     end
 end
-
+=#
 
 #=
 function floatparse(data::AbstractVector)
@@ -107,8 +133,8 @@ keywords:
 See also: [`ElimRange`](@ref), [`DoseTime`](@ref), [`LimitRule`](@ref).
 """
 function pkimport(data, time, conc, sort; kelauto = true,  elimrange = ElimRange(), dosetime = nothing, limitrule::Union{Nothing, LimitRule} = nothing, warn = true, kwargs...)
-    if isa(sort, String) sort = [Symbol(sort)] end
-    if isa(sort, Symbol) sort = [sort] end
+
+    sort = parse_gkw(sort)
 
     Tables.istable(data) || error("Data not a table!")
 
@@ -216,8 +242,8 @@ Import urine PK data from table `data`.
 * `sort` - subject sorting columns.
 """
 function upkimport(data, stime, etime, conc, vol, sort; kelauto = true,  elimrange = ElimRange(), dosetime = nothing)
-    if isa(sort, String) sort = [Symbol(sort)] end
-    if isa(sort, Symbol) sort = [sort] end
+
+    sort = parse_gkw(sort)
 
     cols   = Tables.columns(data)
     cdata  = Tuple(Tables.getcolumn(cols, y) for y in sort)
@@ -328,8 +354,8 @@ Keywords:
 
 """
 function pdimport(data, time, obs, sort; bl = 0, th = 0, dosetime::Union{Nothing, DoseTime} = nothing, limitrule::Union{Nothing, LimitRule} = nothing, warn = true)
-    if isa(sort, String) sort = [Symbol(sort)] end
-    if isa(sort, Symbol) sort = [sort] end
+
+    sort = parse_gkw(sort)
 
     Tables.istable(data) || error("Data not a table!")