1、先做一个自定义函数,便于作图:calabi[t_, n_, k_, g_] :=……参数变量,a的取值范围是-1到1,而b的取值范围是0到π/2。

2、指定了t、n、k、g之后,可以获得一块曲面片:Show[calabi[0, 2, 0, 0], PlotRange -> All]注意,k和g只能小于n。

3、k和g可以遍历0,1,这样,k和g有4种不同的组合,对应九种不同的曲面片。比如,k=1,g=0:Show[calabi[0, 2, 1, 0], PlotRange -> All]

4、把四个曲面片画到一起:n = 2;Show[Table[calabi[0, n, k, g], {k, 0, n - 1}, {g, 0, n - 1}], PlotRange -> All]

5、这个整体的图形,就是2次Calabi–Yau流形:

6、3次Calabi–Yau流形如下:

7、5次Calabi–Yau流形如下:
