library(devtools)
devtools::install_github("bmcafee/ZoopCounter")
Names <- c("Daphnia pulex", "Daphnia pulicaria", "Kellicottia longispina", "Chaoborus americanus", "Ceriodaphnia dubia", "Graptoleberis testudinaria", "Osphranticum labronectum", "Lepadella triptera", "Trichocerca longiseta", "Trichocerca mucosa", "Daphnia longiremus", "Daphnia ambigua", "Leptodiaptomus nudus", "Ilyocryptus spp.", "Holopedium gibberum", "Skistodiaptomus mississippiensis", "Macrocyclops fuscus", "Lecane tudicola", "Lecane ungulata", "Monostyla copeis", "Trichocerca pusilla", "Trichocerca rousseleti", "Trichocerca similis", "Notholca labis", "Synchaeta asymmetrica", "Synchaeta kitina", "Notholca foliacea", "Parophryoxus tubulatus", "Moina macrocopa", "Moina micrura") # Any vector of names (max length of 30)
library(ZoopCounter)
ZoopCounter(Names)