Метод пересчета программы TPF

Пересчет программы TPF

source('utilities_tpf.r')

recalc.tpf_omesod <- function (wtp_data, ...)
{
return(tpf.norm(tpf.rename(wtp_data),12));
}