Perform 2-sided significance tests at the significance level of 0.05 to test whether the correlations are equal to 0

General
2

Does

t.test(whr, bp)

give you what you want? I you look at the help for the t.test function, you will see that the default is for a two sided test with conf.level set to 0.95.