我正在使用R-Package亲属关系来绘制血统家族。我想在图中添加名称,所以在我的数据框中添加了一个变量Names,它在谱系函数和绘图中运行了fin。现在我有一个大家庭,名字重叠。是否可以将名称旋转90度。我设法减少字符大小,但这还不够。
动态示例:id2将水平打印的名称列表。
library(kinship2)
###################################################
### code chunk number 11: ped2update. names
###################################################
df2 <- sample.ped[sample.ped$ped==2,]
id2 <- paste(df2$id, c("John", "Linda", "Jack", "Rachel", "Joe", "Deb",
"Lucy", "Ken", "Barb", "Mike", "Matt",
"Mindy", "Mark", "George"), sep="\n")
df2$censor <- c(1,1, rep(0, 12))
ped2 <- pedigree(df2$id, df2$father, df2$mother,
df2$sex, status=df2$censor)
plot(ped2, col=ifelse(df2$avail, 2, 1), id=id2, cex=.5)
任何帮助。 感谢