library(ImportanceIndice)
data("DataLossSource")
data("DataSolutionSource")
data("DataProduction")
data("DataNumberSamples")
Distribution_LossSource(DataLossSource)
Distribution_SolutionSource(DataSolutionSource)
#################################################
###################################################
LS=LossSource(DataLoss = DataLossSource,DataProd = DataProduction)
LS
LP=LossProduction(Data=DataLossSource,Prod = DataProduction,
Evaluation=DataNumberSamples,
SegurityMargen=0.75,MaximumToleranceOfLossFruits=1)
LP
ES=EffectivenessOfSolution(DataLossSource=DataLossSource,
DataSolutionSource=DataSolutionSource,Production=DataProduction)
ES
Run the code above in your browser using DataLab