Replicating Piketty's Capital in the 21st century in R