Nothing
GetLFs.fn <-
function(file,headerRow,lgthBins=1,gender=3,nSamps="EnterNsamps",fleet="EnterFleet",season=1,partition=0,NAs2zero=T,sep=",",sexRatioUnsexed=NA,maxSizeUnsexed=NA) {
len <- readInLengthComps.fn(file,headerRow=headerRow,sep=sep)
SS3LF.fn(len,lgthBins=lgthBins,gender=gender,nSamps=nSamps,fleet=fleet,season=season,partition=partition,NAs2zero=NAs2zero,sexRatioUnsexed=NA,maxSizeUnsexed=NA)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.