R/formulations.R

In Aehmlo/lucy: Plate Data Analysis Utilities

#' Experimental formulation information
#'
#' @param df The data frame from which to retrieve formulations.
#'
#' @return Formulation data for experimental formulations.
#' @export
#' @importFrom magrittr %>%
#' @importFrom dplyr select distinct
#'
#' @examples
#' formulations(some.df)
formulations <- function(df) {
  df %>%
    experimental %>%
    select(-Luminescence, -Plate) %>%
    distinct(Formulation, .keep_all = T)
}