tadpole_ADMB_setup <- function() {
  require(R2admb)
  setup_admb()

  ReedfrogSizepred <- read.table("../DATA/tadpole.dat",header=TRUE)
  
}

tadpole_ADMB_fit <- function() {
  run_admb("tadpole")
  L <- read_admb("tadpole")
  clean_admb("tadpole")
  return(L)
}