Construct TimeArray with NamedTuple (#395)

src/timearray.jl

@@ -13,11 +13,14 @@ abstract type AbstractTimeSeries{T,N,D} end
 
     TimeArray(timestamp, values[, colnames, meta=nothing])
     TimeArray(ta::TimeArray; timestamp, values, colnames, meta)
+    TimeArray(data::NamedTuple, timestamp=:datetime, meta)
 
 The second constructor will yields a new TimeArray with the new given fields.
 Note that the unchanged fields will be shared, there aren't any copy for the
 underlying arrays.
 
+The third constructor build a TimeArray from a NamedTuple.
+
 # Arguments
 
 - `timestamp::AbstractVector{<:TimeType}`: a vector of sorted timestamps,
@@ -30,6 +33,12 @@ underlying arrays.
   the column of `values`.
 
 - `meta::Any`: a user-defined metadata.
+
+# Examples
+
+    data = (datetime=[DateTime(2018, 11, 21, 12, 0), DateTime(2018, 11, 21, 13, 0)], col1=[10.2, 11.2], col2=[20.2, 21.2], col3=[30.2, 31.2])
+    ta = TimeArray(data; timestamp=:datetime, meta="Example")
+
 """
 struct TimeArray{T,N,D<:TimeType,A<:AbstractArray{T,N}} <: AbstractTimeSeries{T,N,D}
 
@@ -80,6 +89,12 @@ TimeArray(ta::TimeArray;
           colnames = _colnames(ta), meta = _meta(ta), args...) =
     TimeArray(timestamp, values, colnames, meta; args...)
 
+function TimeArray(data::NamedTuple; timestamp::Symbol, meta=nothing, args...)
+    columns = (key for key in keys(data) if key != timestamp)
+    dat = hcat((data[key] for key in columns)...)
+    TimeArray(data[timestamp], dat, collect(columns), meta; args...)
+end
+
 ###### conversion ###############
 
 convert(::Type{TimeArray{Float64,N}}, x::TimeArray{Bool,N}) where N =

test/timearray.jl

@@ -187,6 +187,15 @@ end
     end
 end
 
+@testset "construct with NamedTuple" begin
+    data = (datetime=[DateTime(2018, 11, 21, 12, 0), DateTime(2018, 11, 21, 13, 0)], col1=[10.2, 11.2], col2=[20.2, 21.2], col3=[30.2, 31.2])
+    ta = TimeArray(data; timestamp=:datetime, meta="Example")
+    @test size(ta) == (2, 3)
+    @test colnames(ta) == [:col1, :col2, :col3]
+    @test timestamp(ta) == [DateTime(2018, 11, 21, 12, 0), DateTime(2018, 11, 21, 13, 0)]
+    @test values(ta) == [10.2 20.2 30.2; 11.2 21.2 31.2]
+    @test meta(ta) == "Example"
+end
 
 @testset "conversion methods" begin
     @testset "convert works " begin