I know you can create a binomial Experiment with the Code
tenCoinFlips <- rbinom(10000,10,0.5)
But how can you calculate the PDF of this experiment. I know Dbinom will give you the exact PFD but is there a way to calculate the empirical PDF of an experiment?