mfiles:mfiles
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
mfiles:mfiles [2010/05/05 13:24] – lennartfr | mfiles:mfiles [2010/12/13 15:34] (current) – lennartfr | ||
---|---|---|---|
Line 1: | Line 1: | ||
====== Matlab / Octave Utilities ====== | ====== Matlab / Octave Utilities ====== | ||
+ | |||
+ | This page list the various Matlab and octave utilities which interact with ADMB, typically generating input for and interpreting output from ADMB. It is meant to be as complete as possible. This means that it is likely to contain many non-essential files as well as the essential files, for defining and running data sets. | ||
+ | |||
+ | ====== Files written spring 2010 ====== | ||
Here various .m-files which interact with ADMB will be listed. | Here various .m-files which interact with ADMB will be listed. | ||
Line 1106: | Line 1110: | ||
fclose(fid); | fclose(fid); | ||
end; | end; | ||
+ | </ | ||
+ | |||
+ | ====== Files written autumn 2010 ====== | ||
+ | |||
+ | ==== table2allCohortsModel.m ==== | ||
+ | |||
+ | <file txt table2allCohortsModel.m> | ||
+ | function table2allCohortsModel(startyear, | ||
+ | surveyfile, datfile, include_weight_maturity); | ||
+ | % table2allCohortsModel(startyear, | ||
+ | |||
+ | |||
+ | fid = fopen(datfile,' | ||
+ | |||
+ | try, | ||
+ | fprintf(fid,'# | ||
+ | |||
+ | fprintf(fid,'# | ||
+ | |||
+ | fprintf(fid,'# | ||
+ | |||
+ | fprintf(fid,'# | ||
+ | |||
+ | C = load(catchfile); | ||
+ | |||
+ | startyear_row = find(C(:,1) == startyear); | ||
+ | endyear_row = find(C(:,1) == endyear); | ||
+ | | ||
+ | minage_col = find(C(1,:) == minage); | ||
+ | maxage_col = find(C(1,:) == maxage); | ||
+ | | ||
+ | for (i=startyear_row: | ||
+ | for (j=minage_col: | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | | ||
+ | | ||
+ | fprintf(fid,'# | ||
+ | S = load(surveyfile); | ||
+ | | ||
+ | startyear_row = find(S(:,1) == startyear); | ||
+ | endyear_row = find(S(:,1) == endyear); | ||
+ | | ||
+ | minage_col = find(S(1,:) == minage); | ||
+ | maxage_col = find(S(1,:) == maxage); | ||
+ | | ||
+ | for (i=startyear_row: | ||
+ | for (j=minage_col: | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | | ||
+ | if (exist(' | ||
+ | | ||
+ | mature_3_12_2009; | ||
+ | weight_3_11_2009; | ||
+ | mature = mature'; | ||
+ | weight = weight'; | ||
+ | | ||
+ | fprintf(fid,'# | ||
+ | startyear_row = find(mature(:, | ||
+ | endyear_row = find(mature(:, | ||
+ | | ||
+ | minage_col = find(mature(1,: | ||
+ | maxage_col = find(mature(1,: | ||
+ | | ||
+ | for (i=startyear_row: | ||
+ | for (j=minage_col: | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | | ||
+ | | ||
+ | | ||
+ | fprintf(fid,'# | ||
+ | startyear_row = find(weight(:, | ||
+ | endyear_row = find(weight(:, | ||
+ | | ||
+ | minage_col = find(weight(1,: | ||
+ | maxage_col = find(weight(1,: | ||
+ | | ||
+ | for (i=startyear_row: | ||
+ | for (j=minage_col: | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | | ||
+ | get_sondre_data; | ||
+ | csd = [nan sondre_ages; | ||
+ | | ||
+ | fprintf(fid,'# | ||
+ | startyear_row = find(csd(:, | ||
+ | endyear_row = find(csd(:, | ||
+ | | ||
+ | minage_col = find(csd(1,: | ||
+ | maxage_col = find(csd(1,: | ||
+ | | ||
+ | for (i=startyear_row: | ||
+ | for (j=minage_col: | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | fprintf(fid,' | ||
+ | end; | ||
+ | | ||
+ | | ||
+ | end; | ||
+ | | ||
+ | | ||
+ | fclose(fid); | ||
+ | |||
+ | catch, | ||
+ | fprintf(2,' | ||
+ | fclose(fid); | ||
+ | end; | ||
+ | |||
+ | |||
</ | </ |
mfiles/mfiles.1273065849.txt.gz · Last modified: 2010/05/05 13:24 by lennartfr