process discovery code snippets in r