public void GenLogLogisticWFeatures() { LogLogistic ll = new LogLogistic(1.2, 300.0); List <double> llSamples = ll.GenerateSample(2000); var censorLvl = llSamples.Sum() / llSamples.Count(); var t = CensorList(llSamples, censorLvl); int n_x = llSamples.Count(ti => ti > censorLvl); var x = NPOnes(n_x, censorLvl); List <double[]> fSamplesData = new List <double[]>(); List <double[]> fCensoredData = new List <double[]>(); for (int i = 0; i < t.Count(); i++) { fSamplesData.Add(new double[] { 1.0, 2.0, 3.0 }); } for (int i = 0; i < x.Count(); i++) { fCensoredData.Add(new double[] { 1.0, 2.0, 3.0 }); } ll = new LogLogistic(0.7, 80.0); llSamples = ll.GenerateSample(2000); censorLvl = llSamples.Sum() / llSamples.Count(); var t1 = CensorList(llSamples, censorLvl); AppendToLst(t, t1); n_x = llSamples.Count(ti => ti > censorLvl); var x1 = NPOnes(n_x, censorLvl); AppendToLst(x, x1); for (int i = 0; i < t1.Count(); i++) { fSamplesData.Add(new double[] { 1.0, 4.0, 2.0 }); } for (int i = 0; i < x1.Count(); i++) { fCensoredData.Add(new double[] { 1.0, 4.0, 2.0 }); } this.organicRecoveryDurations = t; this.inorganicRecoverydurations = x; Matrix <double> fSamples = Matrix <double> .Build.DenseOfArray(CreateRectangularArray(fSamplesData)); Matrix <double> fCensored = Matrix <double> .Build.DenseOfArray(CreateRectangularArray(fCensoredData)); this.fSamples = fSamples; this.fCensored = fCensored; }
public void TestMixedLogLogisticFitting() { LogLogistic lg = new LogLogistic(1.2, 300.0); List <double> llSamples = lg.GenerateSample(5000); LogLogistic lg1 = new LogLogistic(0.7, 80.0); List <double> llSamples1 = lg1.GenerateSample(5000); DataGen.AppendToLst(llSamples, llSamples1); var ti = llSamples; List <double> xi = new List <double> { .1 }; LogLogistic llModel = new LogLogistic(ti, xi); double[] arr = new double[] { 0.8, 150.0 }; Vector <double> init = Vector <double> .Build.DenseOfArray(arr); llModel.GradientDescent(init); Debug.WriteLine("Model completed!"); Assert.IsTrue(Math.Abs(llModel.Kappa - 0.83) < 1e-1); }
public void TestLogLogisticFitting() { LogLogistic lg = new LogLogistic(1.2, 300); var lgSamples = lg.GenerateSample(3000); var lgCensored = new List <double> { 0.1, 0.1 }; double[] arr = new double[] { 0.5, 12.0 }; Vector <double> init = Vector <double> .Build.DenseOfArray(arr); LogLogistic lg2 = new LogLogistic(lgSamples, lgCensored); lg2.GradientDescent(init); Console.WriteLine(lg2.Kappa); //The un-biased estimator of the LogLogistic distribution //has a high variance. So, we have to set the bar low. Assert.IsTrue(Math.Abs(lg2.Kappa - 1.2) < 1e-1); }