如何用R在表格中绘制家谱？

我有一个族谱，我可以直接在R中绘制。但是我想在Tableau中加载源数据，并直接从Tableau中使用包来显示族谱

以下是数据：

parent  child
erik    megan
erik    marina
erik    maureen
karin   megan
karin   marina
karin   maureen
erik    helena
erik    axel
erik    kim
erik    robin
karin   anna
karin   alfred
helena  jacobus
helena  maria

这是一个运行良好的R脚本（没有Tableau）：

库（GGally）；
图书馆（sna）；
图书馆（GG2）；
图书馆（网络）；
家庭
library(GGally);
library(sna);
library(ggplot2);
library(network);
family <- read.table("c:/tmp/family_raw.txt", head=T);
ggnet2(family, label = TRUE);

SCRIPT_STR('
library(GGally);
library(sna);
library(ggplot2);
library(network);
data <- data.frame(parent=.arg1, child=.arg2);
nodes <- ggnet2(family)$data;
paste(nodes[,6],nodes[,7])
', ATTR([Parent]), ATTR([Child]))