ts <- data.frame(
subjects = rep(1, 100),
run = rep(1, 100),
time = seq(0, 99),
ROI = rnorm(100)
)
events <- data.frame(
subjects = rep(1, 5),
run = rep(1, 5),
onset = c(10, 30, 50, 70, 90),
event_type = rep("A", 5),
modulation = rep(1, 5),
duration = rep(0.5, 5)
)
plot_fmri(ts, events = events, event_type = "A")
Run the code above in your browser using DataLab