# NOT RUN {
# }
# NOT RUN {
if(interactive()){
tidygate::tidygate_data %>%
gate( .element = c(`ct 1`, `ct 2`), Dim1, Dim2 )
}
# }
# NOT RUN {
library(magrittr)
tidygate::tidygate_data %>%
gate(
.element = c(`ct 1`, `ct 2`),
Dim1, Dim2,
gate_list = tidygate::gate_list
)
# }
Run the code above in your browser using DataLab