Zooming of Cube Graphs

xxxxxxxxxx

 

1

import warnings

2

warnings.filterwarnings("ignore",category=DeprecationWarning)

3

def zoom_line(a,l): 

4

    return [[a*x,a*y] for [x,y] in l]

5

def linegraph(g):

6

    vg=g.get_pos(); eg=g.edges(); nv=len(vg); ne=len(eg)

7

    x0=mean([list(vg.values())[i][0] for i in range(nv)])

8

    y0=mean([list(vg.values())[i][1] for i in range(nv)])

9

    coord=[[list(vg[eg[i][0]]),list(vg[eg[i][1]])] 

10

           for i in range(ne)]

11

    return [[[x-x0,y-y0] for [x,y] in coord[i]] 

12

            for i in range(ne)]   

13

def zoom_linegraph(g,n):

14

    LG=Graphics(); lg=linegraph(g)

15

    k=randint(100,400)/1000

16

    zlg=[zoom_line(1+k*j,lg[i]) 

17

         for j in range(n) for i in range(len(lg))]

18

    for i in range(n*len(lg)):

19

        col=(0,random(),random())

20

        LG+=line(zlg[i],color=col,thickness=.3)

21

    LG.show(axes=False,figsize=(5,5),fontsize=15,

22

            title='$k=%.3f$'%k.n())

23

zoom_linegraph(graphs.CubeGraph(5),3)

Language: Sage Gap GP HTML Macaulay2 Maxima Octave Python R Singular

---

Messages