经典的单词梯(word-ladder)问题。
各位看官日后看到这种问题直接上Mathematica。
给出的答案是六次变换: Shortest ladder length = 6 steps Path 1: four , tour , torr , tore , fore , fire , five代码如下,首先,加载词典: nWords[n_] := nWords[n] = DeleteCases[ Cases[WordData[], w_String /; StringLength[w] == n && StringMatchQ[w, RegularExpression["[a-z]+"]] && Length[WordData[w, "Definitions"]] > 0], "-Red…。
邮 箱:youweb@qq.com
手 机:13988888888
电 话:020-88888888
地 址:广东省广州市番禺经济开发区
服务热线
