This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A319805 #20 Aug 07 2024 15:46:32 %S A319805 0,2,4,6,8,6,12,18,24,30,12,18,24,30,36,18,24,30,36,42,24,30,36,42,48, %T A319805 26,36,62,88,114,36,62,88,114,140,62,88,98,124,150,88,114,124,134,160, %U A319805 114,140,150,160,170,52,62,72,98,124,62,88,98,124,150,72,98,124,150,176 %N A319805 a(n) = A319722(n) + A319653(n). %C A319805 This sequence is different from A055950. %H A319805 Seiichi Manyama, <a href="/A319805/b319805.txt">Table of n, a(n) for n = 0..3124</a> %p A319805 a:= n-> (l-> add((l[i]+l[-i])*5^(i-1), i=1..nops(l)))(sort(convert(n, base, 5))): %p A319805 seq(a(n), n=0..64); # _Alois P. Heinz_, Aug 07 2024 %t A319805 Table[FromDigits[Reverse[#], 5] + FromDigits[#, 5] & [Sort[IntegerDigits[n, 5]]], {n, 0, 100}] (* _Paolo Xausa_, Aug 07 2024 *) %o A319805 (PARI) a(n) = my(nd=digits(n, 5)); fromdigits(vecsort(nd), 5) + fromdigits(vecsort(nd,,4), 5); \\ _Michel Marcus_, Sep 28 2018 %Y A319805 Base b: A319785 (b=2), A319803 (b=3), A319804 (b=4), this sequence (b=5), A319806 (b=6), A319807 (b=7), A319808 (b=8), A319747 (b=9), A052008 (b=10). %Y A319805 Cf. A055950, A319653, A319722. %K A319805 nonn,look,base %O A319805 0,2 %A A319805 _Seiichi Manyama_, Sep 28 2018