怎样搜寻回文的单词或数字,回文,是一个简单的概念.如果一个字符串或数字呈中心对称,那么它就是回文的.本文,用mathematica来判断回文字符串和数字.判断字符串是否回文:palindromeq["甜水甜"]palindromeq["aha"]aha就不是回文的,因为大小写不一致.如果忽略大小写,那么aha也是回文的:palindromeq["aha",ignorecase-tr e]句子本身是回文的,但是标点符号导致判断错误:palindromeq["人过大佛寺,寺佛大过人."]去掉标点符号,上面那句话就是回文的了.判断数字是不是回文数.有一个著名的回文数猜想,恰好可以尝试用mathematica来检验:f[n_]:=integerreverse[n]+na=nestlist[f,569,100];table[if[palindromeq[a[[n,{n,a[[n},0],{n,1,length[a]}]union然而对于196,就难以检验了.迭代次,都没发现回文数.