R: set root vertex in Reingold-Tilford layout, solves #473.