# NOT RUN {
d <- system.file("extdata", "marks_cells.rds", package = "tidycells", mustWork = TRUE) %>%
readRDS()
d <- numeric_values_classifier(d)
da <- analyze_cells(d)
dc <- compose_cells(da, print_attribute_overview = TRUE)
collate_columns(dc)
# }
Run the code above in your browser using DataLab