# Last edited on 2013-05-24 00:20:58 by stolfilocal A ordem dos eletrodos é a seguinte # Na figura: # Diametro cabeça 535 px # Centro 334,304 1 "F_7" 141,199 2 "T_3" 121,305 3 "T_5" 161,430 4 "F_p_1" 266,102 5 "F_3" 249,194 6 "C_3" 227,301 7 "P_3" 248,415 8 "O_1" 269,507 9 "F_8" 507,179 10 "T_4" 546,303 11 "T_6" 506,428 12 "F_p_2" 404,101 13 "F_4" 424,196 14 "C_4" 444,302 15 "P_4" 418,412 16 "O_2" 404,504 17 "F_z" 335,194 18 "C_Z" 333,304 19 "P_z" 334,412 20 "O_z" 336,504 (?) Para tomar o par O_1 e O_Z temos que olhar o n. das colunas acima. Logo, 8 20 O programa abaixo determina qual linha do arquivo corresponde ao par de eletrodos: # Este programa determina qual linha dos dados corresponde ao par de eletrodos "eletrodo1 e eletrodo2" # É necessário que eletrodo1 < eletrodo2 par <- function(eletrodo1,eletrodo2){ x<- seq(19,1) if(eletrodo1==1){ return(eletrodo2-eletrodo1) } else { soma <- sum(x[1:(eletrodo1-1)]) soma <- soma + (eletrodo2 - eletrodo1) return(soma) } }