From 44877a21a0c9c612dd933628ceb766f8a12fc078 Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Mon, 9 Mar 2020 21:15:04 +0100
Subject: [PATCH] IMprove file structure view (marked-up comments for RStudio)
---
R/InsuranceParameters.R | 2 +-
R/InsuranceTarif.R | 3 +++
inst/Beispiele/Example_Endowment.R | 2 +-
3 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/R/InsuranceParameters.R b/R/InsuranceParameters.R
index 73bd310..10cf6c0 100644
--- a/R/InsuranceParameters.R
+++ b/R/InsuranceParameters.R
@@ -77,7 +77,7 @@ InsuranceContract.Values = list(
premiumComposition = NULL
);
-
+# InsuranceContract.ParameterDefault #######################################
#' Default parameters for the InsuranceContract class. A new contract will be
#' pre-filled with these values, and values passed in the constructor (or with
#' other setter functions) will override these values.
diff --git a/R/InsuranceTarif.R b/R/InsuranceTarif.R
index 05948fb..844319c 100644
--- a/R/InsuranceTarif.R
+++ b/R/InsuranceTarif.R
@@ -10,6 +10,7 @@ NULL
TariffTypeEnum = objectProperties::setSingleEnum("TariffType", levels = c("annuity", "wholelife", "endowment", "pureendowment", "terme-fix", "dread-disease", "endowment + dread-disease"))
+############ Class InsuranceTarif ###########################################
#' Base class for Insurance Tarifs, providing calculation functions to the contract
#'
#' This is a base class for holding contract-independent values and
@@ -22,6 +23,8 @@ TariffTypeEnum = objectProperties::setSingleEnum("TariffType", levels = c("annui
#' @export
InsuranceTarif = R6Class(
"InsuranceTarif",
+
+ ######################### PUBLIC METHODS ##################################
public = list(
name = "Insurance Contract Type",
tarif = NULL,
diff --git a/inst/Beispiele/Example_Endowment.R b/inst/Beispiele/Example_Endowment.R
index beb17f0..c197325 100644
--- a/inst/Beispiele/Example_Endowment.R
+++ b/inst/Beispiele/Example_Endowment.R
@@ -56,7 +56,7 @@ Tarif.Bsp = InsuranceTarif$new(
);
################################################################### #
-# EXAMPLE CONTRACT ####
+# Example contract with dynamiocs ####
################################################################### #
--
GitLab