Ensemble de Cantor en 3D

La dimension fractale de cet ensemble de Cantor est ln(8)/ln(3) ≈ 1,89

L'algorithme utilisé consiste à jeter un dé et selon le résultat, ajouter au point précédent (x,y,z) le point défini par

        switch de
            when 0
                [x,y,z]=[(x-1)/3,y/3,z/3]
            when 1
                [x,y,z] = [x/3,(y-1)/3,z/3]
            when 2
                [x,y,z] = [x/3,y/3,(z-1)/3]
            when 3
                [x,y,z]=[(x+1)/3,y/3,z/3]
            when 4
                [x,y,z] = [x/3,(y+1)/3,z/3]
            else
                [x,y,z] = [x/3,y/3,(z+1)/3]