## Load example expression data
data("example")
## List of probes corresponding to neuronal genes:
## 221805_at, 221801_x_at, 221916_at all measure NEFL expression.
## 201313_at, 210040_at, 205737_at, 210432_s_at measure
## ENO2, SLC12A5, KCNQ2 and SCN3A expression, respectively.
neuron_probesets <- list(c("221805_at", "221801_x_at", "221916_at"),
"201313_at", "210040_at", "205737_at", "210432_s_at")
## Neuronal reference signal
neuron_reference <- marker(expression, neuron_probesets)
Run the code above in your browser using DataLab