In robertness/bninfo: Queries and information theoritic operations on Bayesian networks.

.data_inh <- tcells$raw_data[["cd3cd28icam2+u0126"]] %>%
  mutate(Mek = .1, Mek = jitter(Mek, 50))
.data <- tcells$raw_data[["cd3cd28icam2"]]
plot(.data_inh$Raf, .data_inh$Mek, xlab = "Raf", ylab = "Mek", 
     xlim = c(0, 310), ylim = c(0, 310))
plot(.data$Raf, .data$Mek, xlab = "Raf", ylab = "Mek", 
     xlim = c(0, 310), ylim = c(0, 310))

robertness/bninfo documentation built on May 27, 2019, 10:32 a.m.