离散数学
进行基本的数论运算,如因子分解:
In[1]:= |
Out[1]= | ![]() |
In[2]:= |
Out[2]= | ![]() |
根据边的列表生成 Graph:
(用 ESCueESC 输入 UndirectedEdge,或用 ESCdeESC 输入 DirectedEdge.)In[1]:= |
Out[1]= | ![]() |
求两个顶点间最短的路径:
In[2]:= |
Out[2]= | ![]() |
用自然语言输入了解众所周知的图:
In[3]:= |
Out[3]= | ![]() |
进行基本的数论运算,如因子分解:
In[1]:= | ![]()
⨯
FactorInteger[30] |
Out[1]= | ![]() |
In[2]:= | ![]()
⨯
GCD[24, 60] |
Out[2]= | ![]() |
显示第 4 个质数:
In[1]:= | ![]()
⨯
Prime[4] |
Out[1]= | ![]() |
判断一个数是否是质数:
In[2]:= | ![]()
⨯
PrimeQ[%] |
Out[2]= | ![]() |
也可以进行互质判定:
In[3]:= | ![]()
⨯
CoprimeQ[51, 15] |
Out[3]= | ![]() |
获取一个列表所有可能的排列:
In[1]:= | ![]()
⨯
Permutations[{a, b, c}] |
Out[1]= | ![]() |
In[2]:= | ![]()
⨯
Permute[{a, b, c, d}, Cycles[{{2, 4}, {1, 3}}]] |
Out[2]= | ![]() |
求置换阶数:
In[3]:= | ![]()
⨯
PermutationOrder[Cycles[{{2, 4}, {1, 3}}]] |
Out[3]= | ![]() |
根据边的列表生成 Graph:
(用 ESCueESC 输入 UndirectedEdge,或用 ESCdeESC 输入 DirectedEdge.)In[1]:= | ![]()
⨯
Graph[{1 <-> 2, 2 \[DirectedEdge] 3, 3 \[DirectedEdge] 4, 4 <-> 1, 3 \[DirectedEdge] 1, 2 \[DirectedEdge] 2}, VertexLabels -> All] |
Out[1]= | ![]() |
求两个顶点间最短的路径:
In[2]:= | ![]()
⨯
FindShortestPath[%, 3, 2] |
Out[2]= | ![]() |
用自然语言输入了解众所周知的图:
In[3]:= | ![]() X pappus graph image |
Out[3]= | ![]() |