Cohen's d and standard deviation from t-test in r

Question

I am looking for how to determine the cohen\'s d for my t-test so I can make a post-hoc power analysis

take the following:

the data:

set.seed(42)
M