如何反转PARI / GP中整数的数字？

Question

作为我正在做的迷你项目的一部分，我需要一种方法来反转PARI / GP中整数的数字（该项目主要是回文数字和数字总和）。

我想用代码形式实现的是fun(13453)给35431。

例如，我尝试过以下操作：

• Vecrev(digits(13453))发出[3,5,4,3,1]，但我不知道如何连接此列表中的每个连续元素。
• 我认为没有预设功能，因为在PARI / GP中没有定义rev，reverse或digitrev。

有人能告诉我这是怎么做到的吗？优选地，循环是不合需要的，因为我想要简单的函数来放入例如if语句或for循环。

Answer 1

或者：fromdigits(Vecrev(digits(13453)))

Answer 2

您可以使用Polrev而不是Vecrev。在那之后，只需做subst。您的示例如下：

> subst(Polrev(digits(13453), 'x), 'x, 10)
35431