There seems to be an error in calcDNAmTL().
The code subtracts the intercept from the product of beta values and coefficients:
|
DNAmTL <- as.numeric(rowSums(tt,na.rm=T)-7.924780053) |
However, in the related Supplementary Data 1 of the Lu, A. T. et al. (2019) DNA methylation-based estimator of telomere length that intercept is positive.