diff --git a/Projects/SVAB/Designs/SVAB_simulation_DesignType1_test.ngd b/Projects/SVAB/Designs/SVAB_simulation_DesignType1_test.ngd new file mode 100644 index 0000000000000000000000000000000000000000..cb3e2e6f9cfddb0359630566c9b6820e4d491965 --- /dev/null +++ b/Projects/SVAB/Designs/SVAB_simulation_DesignType1_test.ngd @@ -0,0 +1,76 @@ +Design Choice situation alt1.distance alt1.subssite alt1.biotopearea alt1.biotopequality alt1.acreageexisting alt1.acreagenew alt1.quality alt1.cost alt2.distance alt2.subssite alt2.biotopearea alt2.biotopequality alt2.acreageexisting alt2.acreagenew alt2.quality alt2.cost alt3.distance alt3.subssite alt3.biotopearea alt3.biotopequality alt3.acreageexisting alt3.acreagenew alt3.quality alt3.cost Block +1 1 0.2 0.875 0.375 0.125 0.625 0.125 0.125 0.125 0.06 0.125 0.625 0.375 0.375 0.625 0.625 0.625 0.2 0.875 0.625 0.375 0 0 0.875 0.875 1 +1 2 0.02 0.375 0.625 0.625 0.625 0.625 0.875 0.875 0.2 0.375 0.625 0.375 0.375 0.375 0.125 0.125 0.66 0.625 0.375 0.125 0.375 0.375 0.375 0.625 3 +1 3 0.02 0.625 0.875 0.375 0.875 0.375 0.625 0.875 0.06 0.125 0.625 0.125 0 0.625 0.875 0.375 0.02 0.875 0.125 0.875 0.625 0 0.125 0.125 4 +1 4 0.2 0.625 0.125 0.375 0 0.875 0.125 0.125 0.06 0.125 0.875 0.375 0.125 0.125 0.875 0.375 0.2 0.375 0.375 0.625 0.375 0.375 0.125 0.875 3 +1 5 0.06 0.625 0.875 0.375 0.625 0.625 0.875 0.625 0.02 0.625 0.375 0.125 0.375 0.625 0.625 0.625 0.66 0.375 0.125 0.875 0 0 0.125 0.875 1 +1 6 0.02 0.125 0.125 0.125 0.125 0 0.125 0.625 0.66 0.875 0.875 0.625 0.625 0 0.125 0.375 0.06 0.625 0.625 0.625 0 0.625 0.875 0.875 4 +1 7 0.2 0.875 0.125 0.625 0 0.625 0.125 0.625 0.2 0.375 0.125 0.875 0.125 0.125 0.625 0.375 0.06 0.625 0.625 0.125 0.875 0.625 0.375 0.375 2 +1 8 0.06 0.375 0.625 0.375 0.375 0.625 0.625 0.625 0.66 0.375 0.375 0.875 0.875 0.875 0.625 0.125 0.2 0.625 0.625 0.375 0.375 0.125 0.625 0.625 2 +1 9 0.66 0.625 0.875 0.125 0.375 0.125 0.375 0.625 0.2 0.125 0.125 0.625 0 0.125 0.125 0.375 0.06 0.875 0.125 0.875 0.625 0.875 0.875 0.375 4 +1 10 0.06 0.625 0.625 0.375 0.625 0.125 0.375 0.875 0.66 0.375 0.125 0.125 0.625 0 0.375 0.125 0.02 0.125 0.875 0.875 0.125 0.875 0.625 0.125 3 +1 11 0.06 0.375 0.875 0.125 0.125 0.125 0.125 0.875 0.66 0.125 0.625 0.875 0.875 0.125 0.625 0.875 0.02 0.875 0.125 0.625 0.625 0.125 0.875 0.125 1 +1 12 0.66 0.625 0.125 0.875 0.125 0.375 0.375 0.875 0.06 0.875 0.875 0.125 0.375 0 0.125 0.375 0.02 0.125 0.875 0.375 0.875 0.875 0.625 0.125 1 +1 13 0.06 0.875 0.375 0.875 0.875 0.875 0.375 0.375 0.66 0.875 0.125 0.875 0.125 0 0.875 0.125 0.2 0.375 0.875 0.125 0 0.375 0.125 0.875 2 +1 14 0.06 0.875 0.125 0.125 0.875 0.875 0.625 0.375 0.2 0.625 0.875 0.375 0 0.375 0.625 0.625 0.06 0.125 0.375 0.875 0.125 0 0.125 0.375 4 +1 15 0.02 0.375 0.625 0.875 0.125 0 0.375 0.125 0.66 0.875 0.125 0.125 0.625 0.375 0.375 0.875 0.02 0.125 0.625 0.625 0.625 0.625 0.875 0.375 4 +1 16 0.66 0.125 0.875 0.875 0.375 0.875 0.125 0.375 0.02 0.625 0.375 0.125 0 0.125 0.875 0.625 0.02 0.375 0.375 0.375 0.875 0.375 0.375 0.375 1 +1 17 0.66 0.125 0.375 0.625 0 0.875 0.625 0.125 0.02 0.875 0.625 0.375 0.875 0.125 0.625 0.125 0.2 0.625 0.875 0.375 0 0.125 0.125 0.875 4 +1 18 0.66 0.125 0.625 0.875 0 0.375 0.625 0.125 0.2 0.375 0.125 0.375 0.875 0.375 0.375 0.875 0.06 0.875 0.625 0.375 0.375 0.125 0.375 0.625 3 +1 19 0.02 0.375 0.625 0.125 0.125 0.375 0.875 0.375 0.02 0.625 0.375 0.875 0.625 0 0.375 0.875 0.06 0.375 0.125 0.875 0.125 0.125 0.375 0.625 1 +1 20 0.02 0.875 0.375 0.625 0 0.375 0.375 0.125 0.02 0.125 0.125 0.375 0 0.375 0.375 0.375 0.66 0.375 0.875 0.625 0.875 0.625 0.375 0.875 1 +1 21 0.66 0.375 0.625 0.375 0.875 0.125 0.375 0.375 0.02 0.875 0.875 0.625 0.125 0.875 0.875 0.875 0.2 0.375 0.375 0.375 0.125 0 0.125 0.125 2 +1 22 0.06 0.625 0.875 0.625 0.125 0.125 0.875 0.125 0.2 0.625 0.375 0.375 0.375 0.875 0.375 0.125 0.02 0.125 0.375 0.625 0.625 0.375 0.375 0.875 2 +1 23 0.02 0.125 0.125 0.625 0.625 0.625 0.625 0.875 0.66 0.125 0.875 0.125 0.125 0.375 0.625 0.125 0.06 0.875 0.875 0.625 0.125 0.125 0.875 0.375 1 +1 24 0.2 0.875 0.375 0.875 0.875 0 0.875 0.375 0.02 0.375 0.625 0.625 0 0.625 0.375 0.625 0.2 0.125 0.125 0.125 0.625 0.875 0.625 0.625 3 +1 25 0.06 0.625 0.375 0.875 0 0 0.375 0.625 0.06 0.625 0.375 0.625 0.625 0.875 0.875 0.625 0.66 0.625 0.875 0.375 0.375 0.625 0.625 0.625 2 +1 26 0.02 0.125 0.625 0.375 0.375 0.625 0.125 0.875 0.2 0.625 0.625 0.875 0.875 0 0.875 0.375 0.66 0.125 0.125 0.625 0 0.875 0.875 0.625 3 +1 27 0.2 0.125 0.375 0.625 0.625 0 0.875 0.875 0.06 0.375 0.375 0.125 0.625 0.625 0.125 0.625 0.02 0.875 0.625 0.875 0 0.875 0.625 0.125 2 +1 28 0.66 0.125 0.375 0.125 0.875 0.125 0.625 0.125 0.66 0.875 0.875 0.875 0.375 0.875 0.125 0.875 0.06 0.625 0.125 0.125 0.125 0.125 0.625 0.625 2 +1 29 0.66 0.875 0.125 0.625 0.375 0.875 0.625 0.625 0.06 0.625 0.875 0.625 0.125 0.125 0.125 0.125 0.66 0.125 0.375 0.125 0.875 0 0.625 0.375 3 +1 30 0.2 0.375 0.875 0.875 0.125 0 0.125 0.625 0.06 0.875 0.125 0.625 0.125 0.875 0.375 0.875 0.66 0.375 0.625 0.125 0.375 0 0.875 0.125 4 +1 31 0.2 0.875 0.875 0.375 0 0.375 0.875 0.375 0.2 0.125 0.375 0.875 0.875 0 0.875 0.875 0.2 0.625 0.375 0.125 0.125 0.625 0.375 0.375 3 +1 32 0.2 0.375 0.125 0.125 0.375 0 0.875 0.375 0.02 0.375 0.625 0.625 0 0.625 0.125 0.625 0.66 0.875 0.875 0.875 0.875 0.375 0.125 0.125 4 +|||||||||| +Design + +;bseed=12345 +;rseed=12345 + + +;alts = Alt1, Alt2, Alt3, sq +;rows = 32 +;block = 4 +;eff= (mnl,d) + +;model: +U(Alt1)= basc[0.5] + + bdist[-0.01] *DISTANCE[0.02,0.06,0.2,0.66] + + bsubssite[-0.1] *SUBSSITE[0.125 , 0.375 , 0.625 , 0.875] + + bbiotopearea[0.1] *BIOTOPEAREA [0.125 , 0.375 , 0.625 , 0.875] + + bbiotopequality[0.1] *BIOTOPEQUALITY [0.125 , 0.375 , 0.625 , 0.875] + + bacreexist[0.04] *ACREAGEEXISTING [0, 0.125 , 0.375 , 0.625 , 0.875] + + bacrenew[0.08] *ACREAGENEW [0, 0.125 , 0.375 , 0.625 , 0.875] + + bquality[0.1] *QUALITY[0.125 , 0.375 , 0.625 , 0.875] + + bcost[-0.01] *COST[0.125 , 0.375 , 0.625 , 0.875] / + +U(Alt2)= basc + + bdist *DISTANCE + + bsubssite *SUBSSITE + + bbiotopearea *BIOTOPEAREA + + bbiotopequality *BIOTOPEQUALITY + + bacreexist *ACREAGEEXISTING + + bacrenew *ACREAGENEW + + bquality *QUALITY + + bcost *COST / + + +U(Alt3)= basc + + bdist *DISTANCE + + bsubssite *SUBSSITE + + bbiotopearea *BIOTOPEAREA + + bbiotopequality *BIOTOPEQUALITY + + bacreexist *ACREAGEEXISTING + + bacrenew *ACREAGENEW + + bquality *QUALITY + + bcost *COST $ \ No newline at end of file diff --git a/Projects/SVAB/SVAB_simulation_parameters_test1.R b/Projects/SVAB/SVAB_simulation_parameters_test1.R new file mode 100644 index 0000000000000000000000000000000000000000..e2f049ca9284b1ad6350e731f269470bcb5b1b99 --- /dev/null +++ b/Projects/SVAB/SVAB_simulation_parameters_test1.R @@ -0,0 +1,26 @@ + +# designpath<- "Projects/SE_AGRI/designs-seagri/" +designpath<- "Projects/SVAB/Designs/" + +resps =360 # number of respondents +nosim=2 # number of simulations to run (about 500 is minimum) + +#betacoefficients should not include "-" +b_asc = 0.8 +b_dist = -0.01 +b_subs_site = -0.1 +b_biotope_area = 0.1 +b_biotope_quality= 0.1 +b_acre_exist = 0.04 +b_acre_new = 0.08 +b_quality = 0.1 +b_cost = -0.01 + + + +#place your utility functions here +u<-list( + v1 =V.1~ b_asc + b_dist * alt1.distance + b_subs_site * alt1.subs_site + b_biotope_area * alt1.biotope_area + b_biotope_quality * alt1.biotope_quality + b_acre_exist * alt1.acreage_existing + b_acre_new * alt1.acreage_new + b_quality * alt1.quality + b_cost * alt1.cost, + v2 =V.2~ b_asc + b_dist * alt2.distance + b_subs_site * alt2.subs_site + b_biotope_area * alt2.biotope_area + b_biotope_quality * alt2.biotope_quality + b_acre_exist * alt2.acreage_existing + b_acre_new * alt2.acreage_new + b_quality * alt2.quality + b_cost * alt2.cost, + v3 =V.3~ b_asc + b_dist * alt3.distance + b_subs_site * alt3.subs_site + b_biotope_area * alt3.biotope_area + b_biotope_quality * alt3.biotope_quality + b_acre_exist * alt3.acreage_existing + b_acre_new * alt3.acreage_new + b_quality * alt3.quality + b_cost * alt3.cost, + v4 =V.4~ 0) diff --git a/Projects/SVAB/SVAB_simulation_parameters_test1_type1.R b/Projects/SVAB/SVAB_simulation_parameters_test1_type1.R new file mode 100644 index 0000000000000000000000000000000000000000..924d5b0e7f7842197f224f17dbd55d3cf2acd78d --- /dev/null +++ b/Projects/SVAB/SVAB_simulation_parameters_test1_type1.R @@ -0,0 +1,27 @@ + +# designpath<- "Projects/SEAGRI/designs-seagri/" +designpath<- "Projects/SVAB/Designs/" + +resps =360 # number of respondents +nosim=2 # number of simulations to run (about 500 is minimum) + +#betacoefficients should not include "-" +basc = 0.8 +bdist = -0.01 +bsubssite = -0.1 +bbiotopearea = 0.1 +bbiotopequality= 0.1 +bacreexist = 0.04 +bacrenew = 0.08 +bquality = 0.1 +bcost = -0.01 + + + + +#place your utility functions here +u<-list( + v1 =V.1~ basc + bdist * alt1.distance + bsubssite * alt1.subs_site + bbiotopearea * alt1.biotope_area + bbiotopequality * alt1.biotope_quality + bacreexist * alt1.acreage_existing + bacrenew * alt1.acreage_new + bquality * alt1.quality + bcost * alt1.cost, + v2 =V.2~ basc + bdist * alt2.distance + bsubssite * alt2.subs_site + bbiotopearea * alt2.biotope_area + bbiotopequality * alt2.biotope_quality + bacreexist * alt2.acreage_existing + bacrenew * alt2.acreage_new + bquality * alt2.quality + bcost * alt2.cost, + v3 =V.3~ basc + bdist * alt3.distance + bsubssite * alt3.subs_site + bbiotopearea * alt3.biotope_area + bbiotopequality * alt3.biotope_quality + bacreexist * alt3.acreage_existing + bacrenew * alt3.acreage_new + bquality * alt3.quality + bcost * alt3.cost, + v4 =V.4~ 0) diff --git a/Projects/SVAB/SVAB_simulation_parameters_test2_type1.R b/Projects/SVAB/SVAB_simulation_parameters_test2_type1.R new file mode 100644 index 0000000000000000000000000000000000000000..92f740ff50bf84236f2400f6676a0a02cf228e3f --- /dev/null +++ b/Projects/SVAB/SVAB_simulation_parameters_test2_type1.R @@ -0,0 +1,26 @@ + +# designpath<- "Projects/SEAGRI/designs-seagri/" +designpath<- "Projects/SVAB/Designs/" + +resps =360 # number of respondents +nosim=2 # number of simulations to run (about 500 is minimum) + +#betacoefficients should not include "-" +basc = 0.8 +bdist = -0.01 +bsubssite = -0.1 +bbiotopearea = 0.1 +bbiotopequality= 0.1 +bacreexist = 0.04 +bacrenew = 0.08 +bquality = 0.1 +bcost = -0.01 + + + +#place your utility functions here +u<-list( + v1 =V.1~ basc + bdist * alt1.distance + bsubssite * alt1.subssite + bbiotopearea * alt1.biotopearea + bbiotopequality * alt1.biotopequality + bacreexist * alt1.acreageexisting + bacrenew * alt1.acreagenew + bquality * alt1.quality + bcost * alt1.cost, + v2 =V.2~ basc + bdist * alt2.distance + bsubssite * alt2.subssite + bbiotopearea * alt2.biotopearea + bbiotopequality * alt2.biotopequality + bacreexist * alt2.acreageexisting + bacrenew * alt2.acreagenew + bquality * alt2.quality + bcost * alt2.cost, + v3 =V.3~ basc + bdist * alt3.distance + bsubssite * alt3.subssite + bbiotopearea * alt3.biotopearea + bbiotopequality * alt3.biotopequality + bacreexist * alt3.acreageexisting + bacrenew * alt3.acreagenew + bquality * alt3.quality + bcost * alt3.cost, + v4 =V.4~ 0) diff --git a/Projects/SVAB/unused designs/SVAB_simulation_DesignType1.ngd b/Projects/SVAB/unused designs/SVAB_simulation_DesignType1.ngd new file mode 100644 index 0000000000000000000000000000000000000000..64c5aa602a037cad3a3dcc002ba3f5c6b605f7a0 --- /dev/null +++ b/Projects/SVAB/unused designs/SVAB_simulation_DesignType1.ngd @@ -0,0 +1,99 @@ +Design Choice situation alt1.distance alt1.subs_site alt1.biotope_area alt1.biotope_quality alt1.acreage_existing alt1.acreage_new alt1.quality alt1.cost alt2.distance alt2.subs_site alt2.biotope_area alt2.biotope_quality alt2.acreage_existing alt2.acreage_new alt2.quality alt2.cost alt3.distance alt3.subs_site alt3.biotope_area alt3.biotope_quality alt3.acreage_existing alt3.acreage_new alt3.quality alt3.cost Block +1 1 0.2 0.125 0.875 0.375 0.875 0 0.875 0.875 0.2 0.625 0.125 0.125 0 0.375 0.375 0.125 0.2 0.875 0.375 0.375 0 0.125 0.125 0.375 1 +1 2 0.06 0.625 0.125 0.375 0 0.375 0.875 0.875 0.66 0.375 0.375 0.375 0.125 0 0.375 0.625 0.02 0.375 0.875 0.375 0.875 0 0.375 0.125 4 +1 3 0.06 0.125 0.625 0.125 0.375 0 0.375 0.125 0.66 0.375 0.375 0.375 0.375 0 0.875 0.625 0.06 0.875 0.625 0.625 0 0.875 0.375 0.625 3 +1 4 0.66 0.125 0.375 0.875 0 0.375 0.125 0.625 0.06 0.875 0.875 0.125 0 0.625 0.625 0.375 0.02 0.625 0.125 0.375 0.625 0 0.875 0.375 1 +1 5 0.02 0.875 0.875 0.125 0 0.875 0.625 0.625 0.66 0.125 0.125 0.875 0 0.125 0.625 0.125 0.06 0.625 0.375 0.125 0.625 0 0.125 0.625 2 +1 6 0.06 0.625 0.625 0.375 0 0.125 0.375 0.625 0.66 0.875 0.875 0.375 0.625 0 0.625 0.875 0.02 0.125 0.125 0.625 0 0.625 0.625 0.125 3 +1 7 0.02 0.375 0.125 0.625 0 0.375 0.125 0.875 0.06 0.625 0.375 0.125 0 0.125 0.375 0.625 0.66 0.375 0.875 0.375 0.875 0 0.875 0.125 3 +1 8 0.66 0.625 0.125 0.375 0.625 0 0.875 0.625 0.02 0.125 0.875 0.125 0.375 0 0.375 0.125 0.06 0.625 0.375 0.375 0 0.625 0.125 0.875 4 +1 9 0.06 0.875 0.625 0.125 0.875 0 0.375 0.125 0.02 0.125 0.625 0.625 0 0.375 0.875 0.875 0.66 0.625 0.375 0.125 0 0.125 0.375 0.625 2 +1 10 0.02 0.125 0.125 0.625 0 0.875 0.125 0.375 0.66 0.875 0.875 0.625 0 0.125 0.875 0.375 0.06 0.625 0.625 0.125 0.375 0 0.375 0.625 1 +1 11 0.2 0.625 0.375 0.125 0.875 0 0.125 0.625 0.2 0.875 0.625 0.125 0.125 0 0.375 0.625 0.2 0.125 0.625 0.875 0 0.625 0.875 0.125 1 +1 12 0.2 0.875 0.375 0.375 0.625 0 0.625 0.625 0.2 0.625 0.625 0.375 0.125 0 0.125 0.375 0.2 0.125 0.625 0.125 0 0.875 0.625 0.375 4 +1 13 0.02 0.375 0.875 0.125 0 0.625 0.625 0.125 0.06 0.375 0.375 0.125 0.625 0 0.125 0.375 0.66 0.625 0.125 0.875 0 0.375 0.625 0.875 4 +1 14 0.02 0.875 0.375 0.625 0 0.625 0.375 0.375 0.06 0.375 0.125 0.375 0 0.125 0.625 0.375 0.66 0.125 0.875 0.125 0.875 0 0.375 0.875 3 +1 15 0.66 0.625 0.125 0.125 0.375 0 0.625 0.125 0.02 0.125 0.875 0.875 0 0.625 0.625 0.875 0.06 0.875 0.375 0.125 0.375 0 0.375 0.375 2 +1 16 0.66 0.625 0.625 0.375 0.375 0 0.375 0.375 0.02 0.125 0.125 0.375 0 0.875 0.625 0.625 0.02 0.875 0.625 0.625 0 0.125 0.625 0.375 4 +1 17 0.2 0.625 0.375 0.875 0 0.875 0.125 0.875 0.2 0.375 0.625 0.125 0.625 0 0.875 0.125 0.2 0.375 0.625 0.125 0.125 0 0.375 0.625 4 +1 18 0.2 0.125 0.625 0.375 0.875 0 0.625 0.125 0.2 0.875 0.625 0.375 0 0.375 0.875 0.875 0.2 0.625 0.375 0.375 0 0.375 0.125 0.625 2 +1 19 0.02 0.125 0.875 0.875 0 0.125 0.875 0.375 0.06 0.625 0.125 0.125 0.875 0 0.375 0.625 0.66 0.625 0.625 0.125 0 0.625 0.125 0.625 3 +1 20 0.66 0.375 0.375 0.125 0.625 0 0.125 0.625 0.02 0.875 0.875 0.875 0 0.875 0.625 0.125 0.06 0.125 0.125 0.125 0.125 0 0.875 0.875 3 +1 21 0.2 0.375 0.625 0.125 0 0.125 0.875 0.125 0.2 0.125 0.625 0.125 0.875 0 0.375 0.875 0.2 0.875 0.375 0.625 0 0.375 0.375 0.375 4 +1 22 0.06 0.875 0.125 0.625 0 0.125 0.875 0.125 0.02 0.125 0.625 0.375 0.875 0 0.125 0.875 0.66 0.375 0.875 0.125 0 0.375 0.625 0.375 1 +1 23 0.66 0.625 0.875 0.875 0 0.625 0.125 0.125 0.06 0.375 0.625 0.125 0.125 0 0.875 0.625 0.02 0.375 0.125 0.125 0.625 0 0.625 0.875 1 +1 24 0.02 0.875 0.875 0.375 0.125 0 0.625 0.625 0.06 0.625 0.375 0.375 0.625 0 0.125 0.875 0.66 0.125 0.125 0.375 0 0.875 0.625 0.125 1 +1 25 0.66 0.375 0.375 0.375 0 0.625 0.375 0.875 0.02 0.625 0.125 0.375 0.875 0 0.875 0.375 0.06 0.375 0.875 0.375 0.125 0 0.125 0.375 3 +1 26 0.02 0.375 0.125 0.375 0 0.875 0.875 0.875 0.66 0.875 0.375 0.375 0.375 0 0.375 0.625 0.06 0.125 0.875 0.375 0.125 0 0.125 0.125 2 +1 27 0.06 0.875 0.625 0.125 0.625 0 0.375 0.375 0.66 0.375 0.125 0.125 0 0.875 0.875 0.125 0.02 0.125 0.875 0.875 0 0.125 0.125 0.875 2 +1 28 0.66 0.125 0.875 0.125 0 0.375 0.625 0.875 0.06 0.625 0.125 0.875 0 0.375 0.125 0.375 0.02 0.875 0.625 0.125 0.875 0 0.875 0.125 2 +1 29 0.06 0.875 0.625 0.375 0.125 0 0.625 0.375 0.66 0.375 0.875 0.625 0 0.875 0.125 0.125 0.02 0.375 0.125 0.375 0.375 0 0.875 0.875 3 +1 30 0.2 0.375 0.375 0.375 0.375 0 0.125 0.375 0.2 0.875 0.875 0.375 0 0.625 0.625 0.875 0.2 0.375 0.125 0.375 0.375 0 0.875 0.125 4 +1 31 0.06 0.125 0.875 0.125 0.125 0 0.875 0.875 0.02 0.625 0.375 0.625 0 0.625 0.125 0.125 0.66 0.875 0.375 0.375 0.625 0 0.625 0.625 2 +1 32 0.2 0.375 0.125 0.125 0.125 0 0.375 0.375 0.2 0.125 0.375 0.125 0.375 0 0.125 0.375 0.2 0.875 0.875 0.875 0 0.875 0.875 0.875 1 +|||||||||| +Design + +;bseed=12345 +;rseed=12345 + + +;alts = Alt1, Alt2, Alt3, sq +;rows = 32 +;block = 4 +;eff= (mnl,d) + + +;cond: +if(Alt1.ACREAGE_EXISTING <> 0, Alt1.ACREAGE_NEW = 0), +if(Alt2.ACREAGE_EXISTING <> 0, Alt2.ACREAGE_NEW = 0), +if(Alt3.ACREAGE_EXISTING <> 0, Alt3.ACREAGE_NEW = 0), +if(Alt1.ACREAGE_EXISTING = 0, Alt1.ACREAGE_NEW <> 0), +if(Alt2.ACREAGE_EXISTING = 0, Alt2.ACREAGE_NEW <> 0), +if(Alt3.ACREAGE_EXISTING = 0, Alt3.ACREAGE_NEW <> 0), +if(Alt1.ACREAGE_NEW <> 0, Alt1.ACREAGE_EXISTING = 0), +if(Alt2.ACREAGE_NEW <> 0, Alt2.ACREAGE_EXISTING = 0), +if(Alt3.ACREAGE_NEW <> 0, Alt3.ACREAGE_EXISTING = 0), +if(Alt1.ACREAGE_NEW = 0, Alt1.ACREAGE_EXISTING <> 0), +if(Alt2.ACREAGE_NEW = 0, Alt2.ACREAGE_EXISTING <> 0), +if(Alt3.ACREAGE_NEW = 0, Alt3.ACREAGE_EXISTING <> 0), + + +if(Alt1.ACREAGE_EXISTING <> 0, Alt1.BIOTOPE_QUALITY + Alt1.BIOTOPE_QUALITY <= 1), +if(Alt2.ACREAGE_EXISTING <> 0, Alt2.BIOTOPE_QUALITY + Alt2.BIOTOPE_QUALITY <= 1), +if(Alt3.ACREAGE_EXISTING <> 0, Alt3.BIOTOPE_QUALITY + Alt3.BIOTOPE_QUALITY <= 1) + + + + +;model: +U(Alt1)= b_asc[0.5] + + b_dist[-0.01] *DISTANCE[0.02,0.06,0.2,0.66] + + b_subs_site[-0.1] *SUBS_SITE[0.125 , 0.375 , 0.625 , 0.875] + + b_biotope_area[0.1] *BIOTOPE_AREA [0.125 , 0.375 , 0.625 , 0.875] + + b_biotope_quality[0.1] *BIOTOPE_QUALITY [0.125 , 0.375 , 0.625 , 0.875] + + b_acre_exist[0.04] *ACREAGE_EXISTING [0, 0.125 , 0.375 , 0.625 , 0.875] + + b_acre_new[0.08] *ACREAGE_NEW [0, 0.125 , 0.375 , 0.625 , 0.875] + + b_quality[0.1] *QUALITY[0.125 , 0.375 , 0.625 , 0.875] + + b_cost[-0.01] *COST[0.125 , 0.375 , 0.625 , 0.875] / + +U(Alt2)= b_asc + + b_dist *DISTANCE + + b_subs_site *SUBS_SITE + + b_biotope_area *BIOTOPE_AREA + + b_biotope_quality *BIOTOPE_QUALITY + + b_acre_exist *ACREAGE_EXISTING + + b_acre_new *ACREAGE_NEW + + b_quality *QUALITY + + b_cost *COST / + + +U(Alt3)= b_asc + + b_dist *DISTANCE + + b_subs_site *SUBS_SITE + + b_biotope_area *BIOTOPE_AREA + + b_biotope_quality *BIOTOPE_QUALITY + + b_acre_exist *ACREAGE_EXISTING + + b_acre_new *ACREAGE_NEW + + b_quality *QUALITY + + b_cost *COST $ \ No newline at end of file diff --git a/generatemd.R b/generatemd.R index bf5213dba4a5665f44571d79c2dc8036ff219a21..f764c58292cdf13d48db7d529d4d99a89cf62f8c 100644 --- a/generatemd.R +++ b/generatemd.R @@ -1,6 +1,8 @@ rm(list=ls()) -file <- "Projects/ValuGaps/parameters_valugaps.R" + +# file <- "Projects/SE_AGRI/parameters_SE Design-Agri.R" +file <- "Projects/SVAB/SVAB_simulation_parameters_test2_type1.R" rmarkdown::render("simulation_output.rmd", output_file = paste0(stringr::str_remove_all(file, diff --git a/project.Rproj b/project.Rproj new file mode 100644 index 0000000000000000000000000000000000000000..8e3c2ebc99e2e337f7d69948b93529a437590b27 --- /dev/null +++ b/project.Rproj @@ -0,0 +1,13 @@ +Version: 1.0 + +RestoreWorkspace: Default +SaveWorkspace: Default +AlwaysSaveHistory: Default + +EnableCodeIndexing: Yes +UseSpacesForTab: Yes +NumSpacesForTab: 2 +Encoding: UTF-8 + +RnwWeave: Sweave +LaTeX: pdfLaTeX