Module:Infobox ET: Difference between revisions
No edit summary |
No edit summary |
||
| Line 237: | Line 237: | ||
}) | }) | ||
if et.size <= | if et.size <= 70 and et.size > 4 then | ||
local | local delta_harmonic_entropy_min = 1000 | ||
local l = 0 | local l = 0 | ||
for i=1, math.floor(et.size)-2 do | for i=1, math.floor(et.size)-2 do | ||
for j=1, i-1 do | for j=1, i-1 do | ||
local delta = (rat.log(step_size * i / 1200) - rat.log(step_size * j / 1200)) / (rat.log(step_size * j / 1200) - 1) | local delta = (rat.log(step_size * i / 1200) - rat.log(step_size * j / 1200)) / (rat.log(step_size * j / 1200) - 1) | ||
he = interval_extension.harmonic_entropy_with_lookup_table(rat.cents(delta)) | |||
if he <= delta_harmonic_entropy_min then delta_harmonic_entropy_min = he end | |||
l = l + 1 | l = l + 1 | ||
end | end | ||
| Line 250: | Line 251: | ||
table.insert(infobox_data, { | table.insert(infobox_data, { | ||
"[[Delta]]-Harmonic entropy", | "[[Delta]]-Harmonic entropy", | ||
"~" .. utils._round( | "~" .. utils._round(delta_harmonic_entropy_min, 6) .. " nats" | ||
}) | }) | ||
end | end | ||