knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(alohaal)
library(tidyverse)
sbc_abundance$SIZE <-
  replace(sbc_abundance$SIZE, sbc_abundance$SIZE < 0, NA)
hist <- ggplot(data = sbc_abundance, aes(x = SIZE)) +
  geom_histogram(alpha = 0.5) + theme_minimal()  + xlim(0, 100) + xlab("Size of Fish(cm)") + ylab("Count") + labs(title = "Count of Fish Sizes at SBC LTER")
hist


adhil0/alohaal documentation built on May 3, 2021, 11:11 p.m.