次のコードは、多数の系統樹 (ここでは 100) をシミュレートします。しかし、絶滅の偶然の出来事のために、いくつかの木はNULLです。これらの NULL ツリーを確認し、出力オブジェクトから削除して、残りのツリーから N 個のツリーから x 個を選択する必要があります。
library(phytools)
Trees<- pbtree(b=0.6, d=0.2, n=200, t=NULL, scale=NULL, nsim=100, type="continuous", extant.only=TRUE)
上記のコードが 3 つの NULL を返し、(たとえば) 100-3=97 ツリーから 50 を選択する必要があるとします。最初の 50 本の木でも何でもかまいません。ループでそれができるかどうかはわかりません。
ご協力いただきありがとうございます！