# NOT RUN {
#Get rfishbase food item data for a few species
my.food <- rfishbase::fooditems(c("Lutjanus apodus","Epinephelus itajara"))
#use the ConvertFishbaseFood function to format it for dietr and exclude recruits/juveniles
cleaned.food <- ConvertFishbaseFood(FishBaseFood=my.food, ExcludeStage=c("larvae","recruits/juv."))
# }
Run the code above in your browser using DataLab