for loop with 2 vectors to calculate power in R fails

Question

I have 2 vectors containing numbers, I\'m using to simulate power of my study but keeps getting this error at the for loop section

Error in pwr.2