<commit_before>#####################################################################################################################
#
# 	Corselect.r 
#	R Functions for the simultaneous estimation of selectivity parameters for Gillnets & Cormorants.
#	
# 	In using these methods an assumed selectivity function (a gamma function) is fitted directly to catch 
#	data for a number of gill-nets with specific mesh-sizes, with the parameters of the selectivity function 
#	being estimated simultaneously across mesh-sizes and length-classes. An additional selectivity function 
#	(a log-normal function) is simultaneously fit to 'catch' data for Great Cormorants.
#
# 	Code by <NAME> (<EMAIL>)
# 	Melbourne, Australia, 2011
#
# 	This code is free to use, but please give credit to the authors of t
#######################################################################################################################

#Define Selectivity Function (S1): Relative selectivities of gill-nets using a functional form of the standard Gamma function (with modal value rescaled to one);
gn.sel <- function(length.class,meshsize,theta){<commit_msg>Update description and preamble section to Corselect.r<commit_after>#####################################################################################################################
#
# 	Corselect.r 
#	R Functions for the simultaneous estimation of selectivity parameters for Gillnets & Cormorants.
#	
# 	In using these methods an assumed selectivity function (a gamma function) is fitted directly to catch 
#	data for a number of gill-nets with specific mesh-sizes, with the parameters of the selectivity function 
#	being estimated simultaneously across mesh-sizes and length-classes. An additional selectivity function 
#	(a log-normal function) is simultaneously fit to 'catch' data for Great Cormorants.
#
# 	Code by <NAME> (<EMAIL>)
# 	Melbourne, Australia, 2012
#
# 	This code is free to use, but please give credit to the authors of the study for which the code was written: 
# 	See Troynikov et al, 2013: Cormorant catch concerns for fishers: Estimating the 
# 	size-selectivity of a piscivorous bird, PLOS ONE (In Press)
#
#######################################################################################################################

#Define Selectivity Function (S1): Relative selectivities of gill-nets using a functional form of the standard Gamma function (with modal value rescaled to one);
gn.sel <- function(length.class,meshsize,theta){
{'fraction_non_alphanumeric': 0.2403193612774451, 'fraction_numerical': 0.005588822355289421, 'mean_word_length': 6.0790960451977405, 'pattern_counts': {'":': 0, '<': 9, '<?xml version=': 0, '>': 7, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5057084', 'n_tokens_mistral': 640, 'n_tokens_neox': 574, 'n_words': 265}