作为我正在做的微型项目的一部分，我需要一种方法来反转PARI / GP中的整数（该项目主要针对回文数和数字总和）。
我想以代码形式实现的是fun(13453)给出35431。
例如，我尝试执行以下操作：
Vecrev(digits(13453))给出了[3,5,4,3,1]，但我不知道如何串联此列表中的每个连续元素。
我认为没有为此预设的功能，因为PARI / GP中未定义rev，reverse或digitrev。
有人可以告诉我如何做到这一点吗？最好不要使用循环，因为我希望将简单的函数放入if语句或for循环中。
答案 0 :(得分：1)
您可以使用Polrev代替Vecrev。之后，只需执行subst。您的示例如下：
> subst(Polrev(digits(13453), 'x), 'x, 10)
35431
答案 1 :(得分：1)
或者：fromdigits(Vecrev(digits(13453)))