Running examples in ‘beadplexr-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: read_fcs
> ### Title: Read a fcs file.
> ### Aliases: read_fcs
> 
> ### ** Examples
> 
> library(beadplexr)
> 
> .file_name <- system.file("extdata", "K2-C07-A7.fcs",
+                           package = "beadplexr")
> 
> # Load the fcs file, with no filter
> .data <- read_fcs(.file_name = .file_name, .filter = NULL)
 ----------- FAILURE REPORT -------------- 
 --- failure: the condition has length > 1 ---
 --- srcref --- 
: 
 --- package (from environment) --- 
beadplexr
 --- call from context --- 
.f(.x[[i]], ...)
 --- call from argument --- 
if ((class(.x) == "matrix") & is.numeric(.x)) {
    TRUE %in% (.p %in% colnames(.x))
} else {
    FALSE
}
 --- R stacktrace ---
where 1: .f(.x[[i]], ...)
where 2: purrr::map_lgl(., .get_potential_comp_matrices, .p = ff_parameters)
where 3: function_list[[k]](value)
where 4: withVisible(function_list[[k]](value))
where 5: freduce(value, `_function_list`)
where 6: `_fseq`(`_lhs`)
where 7: eval(quote(`_fseq`(`_lhs`)), env, env)
where 8: eval(quote(`_fseq`(`_lhs`)), env, env)
where 9: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
where 10: ff_keywords %>% purrr::map_lgl(.get_potential_comp_matrices, 
    .p = ff_parameters)
where 11: apply_compensation(., .compensation = .compensation)
where 12: function_list[[i]](value)
where 13: freduce(value, `_function_list`)
where 14: `_fseq`(`_lhs`)
where 15: eval(quote(`_fseq`(`_lhs`)), env, env)
where 16: eval(quote(`_fseq`(`_lhs`)), env, env)
where 17: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
where 18: flowCore::read.FCS(filename = .file_name, transformation = FALSE, 
    ...) %>% transform_bead_channels(.bead_channels = .bead_channels) %>% 
    apply_compensation(.compensation = .compensation) %>% remove_boundary_events(.channels = c(.fsc_ssc)) %>% 
    subset_channels(.filter = .filter) %>% as_data_frame_flow_frame(.channels = c(.fsc_ssc, 
    .bead_channels))
where 19: read_fcs(.file_name = .file_name, .filter = NULL)

 --- value of length: 2 type: logical ---
[1]  TRUE FALSE
 --- function from context --- 
function (.x, .p) 
{
    if ((class(.x) == "matrix") & is.numeric(.x)) {
        TRUE %in% (.p %in% colnames(.x))
    }
    else {
        FALSE
    }
}
<bytecode: 0x561e469f8318>
<environment: 0x561e469f6910>
 --- function search by body ---
 ----------- END OF FAILURE REPORT -------------- 
Fatal error: the condition has length > 1