add tests

Author: bkamins

test/operators.jl

@@ -273,6 +273,14 @@
         @test h2 == h
         @test vm == collect(r)
         @test h2 == g[r]
+
+        r2 = falses(length(g))
+        r2[r] .= true
+        h2, vm = @inferred(induced_subgraph(g, r2))
+        @test h2 == h
+        @test vm == findall(r2)
+        @test h2 == g[r2]
+
     end
 
     g10 = complete_graph(10)
@@ -285,6 +293,12 @@
         @test sg2 == sg
         @test vm[4] == 8
 
+        bv = falses(length(g))
+        bv[5:8] .= true
+        sg2, vm = @inferred(induced_subgraph(g, bv))
+        @test sg2 == sg
+        @test vm[4] == 8
+
         elist = [
           SimpleEdge(1, 2), SimpleEdge(2, 3), SimpleEdge(3, 4),
           SimpleEdge(4, 5), SimpleEdge(5, 1)