From a1a55eedff66329d3c0f71aead5e78df71ca6e37 Mon Sep 17 00:00:00 2001 From: Guillaume Horel Date: Wed, 20 Apr 2016 20:25:38 -0400 Subject: rend le code un peu plus beau --- src/projet.cpp | 86 +++++++++++++++++++++++++++++----------------------------- 1 file changed, 43 insertions(+), 43 deletions(-) diff --git a/src/projet.cpp b/src/projet.cpp index 16aca2b..46952e2 100644 --- a/src/projet.cpp +++ b/src/projet.cpp @@ -13,18 +13,19 @@ using namespace std; struct first:public std::unary_function, double> -{ +{ double operator()(std::vector X){ return X[0]; - } + } }; vector< vector > exemple1_stratified() { + int I = 10; //le nombre de strates vector q = quantile_norm(10, 1); - vector p(10, 0.1); + vector p(I, 1/(double)I); vector rvar; rvar.push_back(gaussian_truncated(GSL_NEGINF, q[0])); - for (int i=1; i<10; i++){ + for (int i=1; i N = {300, 1000, 10000, 20000}; //notre tableau du nombre successif de tirages, qui correspondent aux 300, 1300, 11300 et 31300 @@ -33,7 +34,7 @@ vector< vector > exemple1_stratified() { stratified_sampling S(p,rvar); cout<<"N"<<"\t"<<"moyenne"<<"\t\t"<<"sigma"<<"\t"<<"théorique"< r(4,0); - for (int i=0; i<4; i++){ + for (size_t i=0; i > exemple1_rqmc(){ vector N = {3, 13, 113, 313}; //les N choisis pour que les NI soient égaux aux N de l'exemple 1 stratified_sampling first f; //comme quasi_gaussian retourne un vecteur, on doit composer avec f pour avoir le double QG()[0] vector< vector > data (4); - for(int i =0; i<4; i++){ - data[i] = monte_carlo (I,quasi_mean (N[i], 1, f)); + for(size_t i =0; i (N[i], 1, f)); } cout<<"moyenne"<<"\t\t"<<"sigma"<<"\t\t"<<"taille IC"< > exemple1_rqmc(){ }; -std::vector normalize (std::vector mu) { +std::vector normalize (std::vector mu) { int d = mu.size(); - double norm_mu = 0; - std::vector u(d); - for(int i=0; i u(d); + for(int i=0; i > exemple2_stratified (int d){ - std::vector mu(d); - vector K = {45, 50, 55}; - vector N = {100000, 400000, 500000}; - vector< vector > data(3); - vector q = quantile_norm(100, 1); - vector p(100, 0.01); - double r = 0.05; - double T = 1.0; - double S0 = 50; - double V = 0.1; - typedef compose_t, multi_gaussian_truncated> tilted_option; - for (int i=0; i<3; i++){ - mu = argmax(r, T, S0, V, K[i], d); - std::vector u(d); - u = normalize(mu); + + +vector > exemple2_stratified (int d){ + vector K = {45, 50, 55}; + vector N = {100000, 400000, 500000}; + int I = 100; //le nombre de strates + vector< vector > data(3); + vector q = quantile_norm(I, 1); + vector p(I, 1/(double)I); + double r = 0.05; + double T = 1.0; + double S0 = 50; + double V = 0.1; + typedef compose_t, multi_gaussian_truncated> tilted_option; + for (size_t i=0; i < K.size(); i++){ + vector mu = argmax(r, T, S0, V, K[i], d); + std::vector u = normalize(mu); asian_option A(r, T, S0, V, K[i], true); exponential_tilt G(mu, A); std::vector X; - X.push_back(compose(G, multi_gaussian_truncated(GSL_NEGINF,q[0], u))); - for(int j=1; j<100; j++) { - X.push_back(compose(G, multi_gaussian_truncated(q[j-1],q[j], u))); + X.push_back(compose(G, multi_gaussian_truncated(GSL_NEGINF, q[0], u))); + for(int j=1; j < I; j++) { + X.push_back(compose(G, multi_gaussian_truncated(q[j-1], q[j], u))); } stratified_sampling S(p, X); vector r(3, 0); - for (int j=0; j<3; j++){ + for (size_t j=0; j < N.size(); j++){ S.draw(N[j]); } r[0] = K[i]; @@ -120,9 +120,11 @@ vector< vector > exemple2_rqmc(int d) { double V = 0.1; vector< vector > data(3); vector K = {45, 50, 55}; - for(int i =0; i<3; i++){ + int I=100;//la taille du vrai Monte-Carlo + for(int i =0; i<3; i++) { asian_option A(r, T, S0, V, K[i], true); - data[i] = monte_carlo(100, quasi_mean (N, d, A));} + data[i] = monte_carlo(I, quasi_mean (N, d, A)); + } for(int i =0; i<3; i++){ std::cout< > data1, vector< vector > data2) int main() -{ +{ init_alea(2); //~ cout< > data1 = exemple1_stratified(); + //~ vector< vector > data1 = exemple1_stratified(); //~ cout<<"Randomised quasi Monte-Carlo sur l'exemple 1 de la normale"< > data2 = exemple1_rqmc(); //~ make_table1(data1, data2); exemple2_rqmc(16); exemple2_stratified(16); return 0; - -} - +} -- cgit v1.2.3-70-g09d2