powered by
benford
dfactor(bfd)
data(corporate.payment) #gets data cp <- benford(corporate.payment$Amount) #generates benford object dfactor(cp) # equivalent to cp$distortion.factor
Run the code above in your browser using DataLab