In kuhnrl30/AuditTools:

load("data/canonicalexample.Rdata")

# traces<- DataPrep(payday)

traces<- DataPrep(Canonical)

InitPairs<- MakePairs(traces)

ClassedPairs<-ClassPairs(InitPairs, traces)

Endpoints<- FindEndpoints(ClassedPairs)

ShowGrid(ClassedPairs)

Places<- FindPlaces(ClassedPairs)

verts<-PrepVertices(Places, Endpoints)


iPlot<- graph_from_data_frame(Places,
                              directed=T,
                              vertices=verts)


plot(iPlot,
     vertex.color=verts$color,
     vertex.label.dist=2,
     edge.arrow.size=.75)

kuhnrl30/AuditTools documentation built on May 20, 2019, 7:05 p.m.