I have data that looks like the following:
A <- c(2,20,2,7)
I want to do a post-hoc power analysis to check if my sample size is sufficient, b