####################################### # M Matematica. # Raggio r per cui il volume della palla # iscritta al cubo unitario estesa ad r # raggiunge il valore alfa per alfa>=vm. M.raggioesteso = function (m,alfa) {rad=sqrt(m); vm=M.volume(m) (rad-((1-alfa)/(1-vm))^(1/m)*(rad-1))/2}