r « demos « rouge « lib « rouge-4.7.0 « gems « 3.4.0 « ruby « bundle « vendor - personal-site.git - Repo for my personal website ben.sanders.life

summary refs log tree commit diff

path: root/vendor/bundle/ruby/3.4.0/gems/rouge-4.7.0/lib/rouge/demos/r

blob: b6804b0735adbd774177b93efe10c785def1f0aa (plain)

dbenford <- function(x){
    log10(1 + 1/x)
}

pbenford <- function(q){
    cumprobs <- cumsum(dbenford(1:9))
    return(cumprobs[q])
}