add show method, some cleanup

Author: Vincent Landau

src/SpatialGraphs.jl

@@ -6,6 +6,8 @@ include("structs.jl")
 include("graph_interface.jl")
 include("rastergraphs.jl")
 include("utils.jl")
+include("show.jl")
+
 ## Types and Structs
 export AbstractSpatialGraph, AbstractRasterGraph, SimpleRasterGraph,
        SimpleRasterDiGraph, WeightedRasterGraph, WeightedRasterDiGraph

src/graph_interface.jl

@@ -15,14 +15,14 @@ nv(g::AbstractSpatialGraph) = nv(g.graph)
 ne(g::AbstractSpatialGraph) = ne(g.graph)
 vertices(g::AbstractSpatialGraph) = vertices(g.graph)
 edges(g::AbstractSpatialGraph) = edges(g.graph)
-Base.eltype(g::AbstractSpatialGraph) = eltype(g.graph)
+eltype(g::AbstractSpatialGraph) = eltype(g.graph)
 edgetype(g::AbstractSpatialGraph) = edgetype(g.graph)
 has_edge(g::AbstractSpatialGraph, s, d) = has_edge(g.graph, s, d)
 has_vertex(g::AbstractSpatialGraph, v) = has_vertex(g.graph, v)
 inneighbors(g::AbstractSpatialGraph, v) = inneighbors(g.graph, v)
 outneighbors(g::AbstractSpatialGraph, v) = outneighbors(g.graph, v)
 is_directed(g::AbstractSpatialGraph) = is_directed(g.graph)
-Base.zero(g::AbstractSpatialGraph) = zero(g.graph)
+zero(g::AbstractSpatialGraph) = zero(g.graph)
 add_edge!(g::AbstractSpatialGraph, a::Integer, b::Integer, c::Number) = add_edge!(g.graph, a, b, c)
 
 ### SimpleWeightedGraphs

src/show.jl

@@ -0,0 +1,33 @@
+import Base: show
+
+function show(io::IO, g::AbstractRasterGraph)
+    printstyled("$(typeof(g))\n", color=:blue)
+    printstyled("  graph", color=:red)
+    print(": $(typeof(g.graph)) with $(nv(g)) vertices and $(ne(g)) edges\n")
+
+    printstyled("  vertex_raster", color=:red)
+    print(
+        ": $(string(nameof(typeof(g.vertex_raster))))" *
+        "{$(eltype(g.vertex_raster)), $(length(dims(g.vertex_raster)))}"
+    )
+    printstyled(" with dimensions:\n", color=:light_black)
+
+    x_dim = dims(g.vertex_raster, XDim)
+    y_dim = dims(g.vertex_raster, YDim)
+    printstyled("    X", color=:cyan)
+    print(
+        ": range($(minimum(x_dim)), $(maximum(x_dim)), step=$(x_dim.val[2] - x_dim.val[1]))\n"
+
+    )
+    printstyled("    Y", color=:cyan)
+    print(
+        ": range($(minimum(y_dim)), $(maximum(y_dim)), step=$(y_dim.val[2] - y_dim.val[1]))"
+    )
+    if (hasdim(g.vertex_raster, Band))
+        band_dim = dims(g.vertex_raster, Band)
+        printstyled("\n    Band", color=:cyan)
+        print(
+            ": $(minimum(band_dim)):$(maximum(band_dim))"
+        )
+    end
+end

test/rastergraphs.jl

@@ -1,4 +1,4 @@
-using ArchGDAL, GeoData, LightGraphs, SimpleWeightedGraphs, SpatialGraphs
+using GeoData, LightGraphs, SimpleWeightedGraphs, SpatialGraphs, Test
 A_array = Array{Float64}(undef, (3, 4, 1))
 A_array[:,:,:] = [1, 3, 2, 0.5, 10, 8, 5, -9999, 3, 1, 2, 6]