Combine two highlight pages

Make a page of the cells in both pages (intersection) or in either (union), and show it.

Usage

cellucid_highlight_page_combine(viewer, pages, operation, name)

Arguments

viewer

A viewer cellucid_view() or cellucid_serve() returned.

pages

The two pages, by name. A vector or list of text (at least 1 character) (at least 2 items, at most 2 items, each once). Required.

operation

Cells in both pages, or in either. One of "intersection", "union". Required.

name

The new page's name; omitted, "A ∩ B" or "A ∪ B". Text (at least 1 character). Left out unless given (the viewer then chooses as its own control does).

Value

A cellucid_action_request, at once and invisibly: the action is sent now, or when the viewer's channel opens. cellucid_action_result(request) returns its outcome (what it did, as names, counts and ids), or NULL when it had nothing to report; request$step is the history step it made.

Details

The viewer's action highlight.page.combine (Highlights). It changes the viewer's state: one step of the viewer's history, labelled as R's, undone like any other. The state it can change: highlights.

See also

cellucid_act() sends any action by its type, and cellucid_action_result() collects its answer.

Examples

if (interactive() && requireNamespace("SeuratObject", quietly = TRUE)) {
  data("pbmc_small", package = "SeuratObject")
  viewer <- cellucid_view(SeuratObject::UpdateSeuratObject(pbmc_small))
  request <- cellucid_highlight_page_combine(viewer,
      operation = "intersection", pages = c("Page 1",
          "Page 2"))
  print(request)
  # cellucid_action_result(request) waits for its outcome.
  cellucid_stop(viewer)
}