I want to generate EEG data via R and test my phase prediction methods on it and how stable they are aggainst different levels of noise. But my generated "EEG" data seems to be off, I think I need to change the time or so. I really cannot figure it out at the moment.
Does anyone know how to proper generate an EEG signal with gaussian white noise?
Thank you!
t_generated <- t2
n <- 500 #500Hz signal
s <- 120 # 2 seconds of data
t2 <- seq(0, s, length.out = s * n) #time vector
wave.1 <- 4*sin(4.3*2*pi*t2)
wave.2 <- 1.5*sin(9.0*2*pi*t2)
wave.3 <- 2*sin(20*2*pi*t2)
wave.4 <- 4*sin(32.2*pi*t2)
gaussian_noise <- rnorm(60000, mean = 0, sd = 0.5)
gen_EEG_noNoise <- wave.1 + wave.2 + wave.3 + wave.4
gen_EEG_WN <- gen_EEG_noNoise + gaussian_noise