Computes the Jetz DR rate, but sample at certain times in the psat

DR_statistic_time(x, sample_times)

Arguments

x

an ape::phylo object

sample_times

a vector of ages

Value

matrix of rates for each tip, by sample time