## Not run:
# graph = startGraph("http://localhost:7474/db/data/")
# clear(graph)
#
# alice = createNode(graph, "Person", name = "Alice")
# bob = createNode(graph, "Person", name = "Bob")
# charles = createNode(graph, "Person", name = "Charles")
#
# createRel(alice, "WORKS_WITH", bob)
# createRel(bob, "KNOWS", charles, since = 2000, through = "Work")
#
# props = list(since = 2001, through = "School")
# createRel(alice, "KNOWS", charles, props)
# ## End(Not run)
Run the code above in your browser using DataLab