library('data.table')
y = GSE34018$y
metadata = GSE34018$metadata
fit = getModelFit(y, metadata)
fit = getPosteriorFit(fit)
fit = getPosteriorSamples(fit, nPosteriorSamples = 10L)
measFitSamps = getExpectedMeas(
fit, times = seq(0, 24, 0.5), fitType = 'posterior_samples',
features = c('13170', '12686'))
measFitInts = getExpectedMeasIntervals(measFitSamps)
Run the code above in your browser using DataLab