R:基于数据框中的数据创建一个简单的图表,只需最少的手动输入

R:基于数据框中的数据创建一个简单的图表,只需最少的手动输入,r,data-visualization,R,Data Visualization,我想从一个数据框架中创建一个简单的描述性树形图,只需最少的手工工作 它可能是这样的: 但它需要在每个盒子里都有样本量 我需要以下功能: 基于数据帧生成绘图(而不是显示更多手动选项) 更改分支顺序的能力(例如性别/年龄组/状态与状态/性别/年龄组) 为每个分支添加标签 提供分支的摘要统计信息(例如,雄性\n=200雌性\n=300)计数,或者可能是树中该点的总停留时间 我发现这个tread()使用了ape软件包,可以进行系统发育树分析,这与我想要的很接近 下面是一个使用“lung”数据集的示例

我想从一个数据框架中创建一个简单的描述性树形图,只需最少的手工工作

它可能是这样的:

但它需要在每个盒子里都有样本量

我需要以下功能:

  • 基于数据帧生成绘图(而不是显示更多手动选项)
  • 更改分支顺序的能力(例如性别/年龄组/状态与状态/性别/年龄组)
  • 为每个分支添加标签
  • 提供分支的摘要统计信息(例如,雄性\n=200雌性\n=300)计数,或者可能是树中该点的总停留时间
  • 我发现这个tread()使用了ape软件包,可以进行系统发育树分析,这与我想要的很接近

    下面是一个使用“lung”数据集的示例

    lung$status <- factor(lung$status)
    lung$sex <- factor(lung$sex)
    lung$ph.ecog <- factor(lung$ph.ecog)
    lung$Age[lung$age >60]<- "60+"; lung$Age[lung$age <=60]<- "<60"
    lung$Age <- factor(lung$Age)
    
    
    library(ape)
    newdata <- as.phylo(x=~sex/Age/status/ph.ecog,data=lung)
    plot.phylo(x=newdata,show.tip.label=TRUE,show.node.label=TRUE,no.margin=TRUE, root.edge=T)
    

    lung$status Check out我目前没有这本书,但制作类似图表的代码在Murrell的书《R图形》中:。我猜想,复杂度越来越高的
    tapply
    调用可能会用摘要统计信息填充节点。目前还没有数据来检验这一观点。这种情况很可能导致因不清楚或没有MWE而关闭。在发布之前,您应该更加努力地使用R代码构建一个示例。