Simple R scripts to call Graphviz dot to draw pedigrees