## TR trial_type stim_path RSTS_timecourse RTPJ_timecourse
## 1 0 rest 2.776726e-01 2.381647e+00
## 2 1 rest 4.430754e-01 6.346069e-02
## 3 2 rest -5.396224e-01 -2.403848e-01
## 4 3 rest -1.228351e+00 -1.526704e+00
## 5 4 rest -7.240430e-01 -3.667437e-01
## 6 5 rest 3.352851e-02 1.670560e+00
## 7 6 rest -6.611142e-01 -1.813652e+00
## 8 7 rest -8.525991e-01 -8.808581e-01
## 9 8 rest -4.290557e-02 -3.363547e-01
## 10 9 rest 1.479944e+00 7.570752e-01
## 11 10 rest 7.424847e-01 -6.375852e-01
## 12 11 rest -2.694202e-01 -1.762800e+00
## 13 12 rest -4.172019e-01 -8.744894e-01
## 14 13 social_incorrect social.barriers.i.9.mp4 8.078185e-02 -9.986571e-02
## 15 14 social_incorrect social.barriers.i.9.mp4 -2.189293e-01 1.354432e-01
## 16 15 social_incorrect social.barriers.i.9.mp4 8.155368e-01 1.666194e+00
## 17 16 social_incorrect social.barriers.i.9.mp4 3.425339e-01 1.292524e+00
## 18 17 social_incorrect social.barriers.i.9.mp4 6.311099e-02 1.691778e+00
## 19 18 social_incorrect social.barriers.i.9.mp4 6.123467e-01 2.291467e+00
## 20 19 social_correct social.barriers.c.2.mp4 -5.701029e-13 -6.116249e-13
## 21 20 social_correct social.barriers.c.2.mp4 -3.176987e-13 -2.207620e-13
## 22 21 social_correct social.barriers.c.2.mp4 -3.412843e-01 -6.679266e-01
## 23 22 social_correct social.barriers.c.2.mp4 -3.793972e-01 -3.623250e-01
## 24 23 social_correct social.barriers.c.2.mp4 8.809113e-03 -2.286723e-01
## 25 24 social_correct social.barriers.c.2.mp4 1.285101e-01 9.727438e-01
## 26 25 social_correct social.barriers.c.2.mp4 4.716013e-01 1.524069e+00
## 27 26 physics_correct physics.barriers.c.4.mp4 5.729431e-01 9.671612e-02
## 28 27 physics_correct physics.barriers.c.4.mp4 -7.385516e-02 -1.101631e+00
## 29 28 physics_correct physics.barriers.c.4.mp4 3.891910e-02 -9.934229e-01
## 30 29 physics_correct physics.barriers.c.4.mp4 -1.146577e-01 -1.237881e+00
## RSMG_timecourse
## 1 2.215248e+00
## 2 -3.739429e-01
## 3 -9.718311e-01
## 4 8.180087e-01
## 5 -1.107051e-01
## 6 9.576801e-01
## 7 -7.639706e-01
## 8 -5.060269e-01
## 9 -1.491944e-01
## 10 -8.452325e-01
## 11 -1.466368e+00
## 12 -1.721039e+00
## 13 -1.201088e+00
## 14 2.352067e-01
## 15 -8.219437e-01
## 16 2.358541e+00
## 17 1.456989e+00
## 18 2.571293e+00
## 19 2.193904e+00
## 20 -5.854987e-13
## 21 -2.056971e-13
## 22 2.895200e-01
## 23 -7.621907e-01
## 24 -4.923966e-01
## 25 1.158332e-01
## 26 -3.659002e-04
## 27 -1.121903e+00
## 28 -1.945728e+00
## 29 -7.499040e-01
## 30 -1.414614e+00
ggplot(timecourse_long, aes(x = TR, y = beta, color = ROI)) +
geom_point(shape = 1, alpha = .2) + geom_line() + geom_rect(aes(xmin = TR, xmax = lead(TR, default = max(TR)), ymin = -Inf, ymax = Inf, fill = trial_type), alpha = 0.2, inherit.aes = FALSE)
## soc > phys RSMG to soc > phys RSTS during rest:
## [1] -0.3033931
## soc > phys RSMG to soc > phys RTPJ during rest:
## [1] 0.3643512
## soc > phys RSTS to soc > phys RTPJ during social trials:
## [1] 0.5902769
## soc > phys RSTS to soc > phys RTPJ during rest:
## [1] 0.5102918