Champernowne distribution generation

I am trying to generate random for Champernowne distribution in R. The pdf I am using is -

C_(µ,σ,λ)/(cosh⁡[σ(x-µ)]+λ)

I am having trouble with the finding the algorithm to generate from this distribution. Any help would be appreciated.