[FLR-list] Error in a4aout at harvest + m(stock) : non-con

Luis Ridao luisr at hav.fo
Wed Feb 25 12:14:24 CET 2015


Hi Ernesto,

Thanks for your useful response.
There was never any intention on replicating the XSA but given the huge 
disparity
in both the XSA and a4a outputs I was wondering why it was so.

A statistical model sounds more sound than XSA but the problem with a4a 
is that there is no much documentation to see upon (or maybe it's me who 
can't find it)

Your suggestion on including a year trend in the catchability of the 
trawl cpue for example sounds good. The problem is how to implement it.

Thanks again,
Luis

On 02/24/2015 09:01 AM, Ernesto wrote:
> Hi,
>
> Sorry for the late reply.
>
> The problem is that your catch data has a large number of ages that 
> don't have tunning data. The default model for a4a was not written for 
> those cases. Check
>
> a4afit <- sca(gul0001, gul.indices)
> wireframe(data~year+age, data=harvest(a4afit))
>
> F in the last ages gets loose and the fit is quite poor.
>
> Once that you want to compare with XSA we can take the same kind of 
> approach, which is to force the oldest ages Fs the same. In this case 
> the model will fit one coefficient (times the year coefficients) for 
> ages older than 18, which mean they are fit together, which I think is 
> slightly different from XSA. Note that you have a large +group in some 
> years.
>
> This can be done using the "replace" method.
>
> fmod <- ~te(replace(age, age>18, 18), year, k = c(6, 10), bs = "tp")
> a4afit <- sca(gul0001, gul.indices, fmodel=fmod)
>
> For comparison
> xsafit <- FLXSA(gul0001, gul.indices, FLXSA.control())
>
> wireframe(data~year+age|qname, 
> data=as.data.frame(FLQuants(a4a=harvest(a4afit), xsa=xsafit at harvest)))
>
> Now, the one million dollars question is why you want to replicate XSA ;)
>
> Best
>
> EJ
>
> ps: Take a look at the residuals and you'll see that both fits have 
> some odd residuals. In a4a you have a couple of simple options to 
> improve this fit, like including a year trend in the catchability of 
> the trawl cpue, etc.
>
> bubbles(age~year|qname, data=xsafit at index.res)
> plot(residuals(a4afit, gul0001, gul.indices))
>
> On 02/18/2015 02:35 PM, Havstovan FAMRI wrote:
>> Hi,
>>
>> Well that solved the problem (trimming the indices object 
>> trim(gul.indices[[2]], age 4:12). No errors come up but stock numbers 
>> and F's are really spurious
>> and nothing in the range of the XSA run. F are given below as a example:
>>
>> > gulfit at harvest[,ac(2010:2014)]  # a4a output
>> An object of class "FLQuant"
>> , , unit = unique, season = all, area = unique
>>
>>     year
>> age  2010       2011       2012       2013 2014
>>   4  0.00061883 0.00054841 0.00088312 0.00104010 0.00070947
>>   5  0.00194001 0.00170594 0.00221326 0.00254813 0.00223464
>>   6  0.00515556 0.00454088 0.00496769 0.00561751 0.00602334
>>   7  0.01007180 0.00901793 0.00900872 0.01006750 0.01202780
>>   8  0.01384780 0.01273870 0.01257350 0.01389800 0.01666770
>>   9  0.01448220 0.01365150 0.01385510 0.01499370 0.01669910
>>   10 0.01336920 0.01269240 0.01303890 0.01351880 0.01358130
>>   11 0.01248430 0.01165750 0.01145380 0.01107690 0.01019620
>>   12 0.01247860 0.01127330 0.00997400 0.00880635 0.00769486
>>   13 0.01285800 0.01125750 0.00874288 0.00700203 0.00595635
>>   14 0.01248820 0.01082000 0.00757566 0.00557152 0.00460538
>>   15 0.01064480 0.00939845 0.00633618 0.00439713 0.00344647
>>   16 0.00797521 0.00732193 0.00509501 0.00344610 0.00249670
>>   17 0.00569563 0.00541743 0.00403299 0.00273092 0.00182383
>>   18 0.00435670 0.00416232 0.00326465 0.00224600 0.00142545
>>   19 0.00388555 0.00355594 0.00278197 0.00194974 0.00124088
>>   20 0.00406418 0.00340829 0.00250123 0.00177887 0.00119688
>>   21 0.00465988 0.00349410 0.00231912 0.00166745 0.00122197
>>
>> units:  f
>> > gul_F[,ac(2010:2014)]  # XSA output
>>      2010   2011   2012   2013   2014
>> 4  0.0047 0.0115 0.0015 0.0066 0.0053
>> 5  0.0143 0.0311 0.0100 0.0154 0.0296
>> 6  0.0675 0.0787 0.0485 0.0655 0.0872
>> 7  0.1257 0.1506 0.0947 0.1182 0.1404
>> 8  0.1696 0.2211 0.1632 0.1897 0.2082
>> 9  0.2107 0.2428 0.1669 0.2651 0.2607
>> 10 0.2624 0.3209 0.2170 0.2783 0.2700
>> 11 0.2686 0.3086 0.2396 0.3374 0.2840
>> 12 0.3309 0.4213 0.2750 0.3371 0.2146
>> 13 0.4980 0.6288 0.4110 0.4805 0.2861
>> 14 0.4428 0.5557 0.4666 0.5562 0.3298
>> 15 0.4462 0.5266 0.4679 0.6606 0.4605
>> 16 0.3444 0.4555 0.4277 0.5946 0.4433
>> 17 0.2812 0.3540 0.3561 0.5347 0.3910
>> 18 0.2529 0.3157 0.3512 0.4841 0.3601
>> 19 0.4566 0.2772 0.1803 0.2773 0.3215
>> 20 0.2534 0.3124 0.2804 0.4170 0.4099
>> 21 0.2534 0.3124 0.2804 0.4170 0.4099
>>
>> best,
>> Luis
>>
>>
>>
>> _______________________________________________
>> flr-list mailing list
>> flr-list at flr-project.org
>> https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/flr-list
>
>
> -- 
> Ernesto Jardim<ernesto.jardim at jrc.ec.europa.eu>
> Fisheries Scientist
> FISHREG – Scientific Support to Fisheries
> IPSC Maritime Affairs Unit
> EC Joint Research Center
> TP 051, Via Enrico Fermi 2749
> I-21027 Ispra (VA), Italy
> Office : +39 0332 785311
> Fax: +39 0332 789658
> https://fishreg.jrc.ec.europa.eu/
>
>
>
> _______________________________________________
> flr-list mailing list
> flr-list at flr-project.org
> https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/flr-list

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.r-forge.r-project.org/pipermail/flr-list/attachments/20150225/78aec8dc/attachment.html>


More information about the flr-list mailing list