TTT method for lambda_z estimation [🇷 for BE/BA]

posted by Aceto81 – Belgium, 2008-10-01 16:18 (5678 d 11:46 ago) – Posting: # 2460
Views: 55,483

❝ Genius. It works well too. Much, much better algorithm than ours. We learn a lot.


We all learn I think.

A suggestion to implement the number of points used: let the user choose which method to go for (I like d_labes suggestion of the combination), but it shouldn't be to hard to implement all of them by the use of some simple if statements:
method.chosen <- c("WNL","TTT","combination")
if (method.chosen=="WNL") {
 n_lambda <- function.Ace(dat)
 }
if (method.chosen=="TTT") {
 n_lambda <- sum(dat$time>=dat$time[which.max(dat$conc)]*2)
 }
if(method.chosen=="combination" {
 n_lambda <- function.Ace(dat[(dat$time>=dat$time[which.max(dat$conc)]*2),])
 }
summary(lm(log(conc)~time,dat[(nrow(dat)-n_lambda+1):nrow(dat),]))

This can only work when you make a function of my previous code which returns the number of points used (function.Ace)

Ace
Thread locked

Complete thread:

UA Flag
Activity
 Admin contact
22,987 posts in 4,824 threads, 1,668 registered users;
84 visitors (0 registered, 84 guests [including 7 identified bots]).
Forum time: 04:04 CEST (Europe/Vienna)

The only way to comprehend what mathematicians mean by Infinity
is to contemplate the extent of human stupidity.    Voltaire

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz
HTML5