@@ -753,7 +753,7 @@ InsuranceTarif = R6Class(
753753q = self $ getTransitionProbabilities(params ,values );
754754i = params $ ActuarialBases $ i
755755v = 1 / (1 + i )
756- pvf = PVfactory(qx = q ,v = v )
756+ pvf = PVfactory $ new (qx = q ,v = v )
757757
758758costs = values $ cashFlowsCosts ;
759759pvc = costs * 0 ;
@@ -788,10 +788,10 @@ InsuranceTarif = R6Class(
788788
789789# Guaranteed + Survival + Death cover + disease
790790pvc [,," Benefits" =
791- pvf $ guaranteed(cf $ guaranteed_advance * cfCosts ,cf $ guaranteed_arrears * cfCosts )+
792- pvf $ survival(cf $ survival_advance * cfCosts ,cf $ survival_arrears * cfCosts )+
793- pvf $ death(cf $ death_SumInsured * cfCosts )+
794- pvf $ disease(cf $ disease_SumInsured * cfCosts );
791+ pvfben $ guaranteed(cf $ guaranteed_advance * cfCosts ,cf $ guaranteed_arrears * cfCosts )+
792+ pvfben $ survival(cf $ survival_advance * cfCosts ,cf $ survival_arrears * cfCosts )+
793+ pvfben $ death(cf $ death_SumInsured * cfCosts )+
794+ pvfben $ disease(cf $ disease_SumInsured * cfCosts );
795795 }
796796
797797 applyHook(hook = params $ Hooks $ adjustPresentValuesCosts ,val = pvc ,params = params ,values = values ,presentValues = presentValues )