response time

preprint_src/02_responsetime.R

@@ -81,7 +81,7 @@ pdf("~/Dropbox/Apps/Overleaf/IRW/rt.pdf", width = 3, height = 3)
 
 # Set color with transparency for the lines to be plotted
 cc <- col2rgb("red")
-cc <- rgb(cc[1], cc[2], cc[3], max = 255, alpha = 75)  # Red color with alpha
+cc <- rgb(cc[1], cc[2], cc[3], max = 255, alpha = 45)  # Red color with alpha
 
 # Set graphical parameters for the plot layout
 par(mgp = c(2, 1, 0), mar = c(3, 3, .1, .1))