cp's OEIS Frontend

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.

A028905 Arrange digits of primes in ascending order.

This page as a plain text file.
%I A028905 #22 Jul 05 2025 16:34:37
%S A028905 2,3,5,7,11,13,17,19,23,29,13,37,14,34,47,35,59,16,67,17,37,79,38,89,
%T A028905 79,11,13,17,19,113,127,113,137,139,149,115,157,136,167,137,179,118,
%U A028905 119,139,179,199,112,223,227,229,233,239,124,125,257,236,269
%N A028905 Arrange digits of primes in ascending order.
%C A028905 Leading zeros are discarded (e.g., 107, rearranged to 017, becomes 17).
%H A028905 Reinhard Zumkeller, <a href="/A028905/b028905.txt">Table of n, a(n) for n = 1..10000</a>
%F A028905 a(n) = A004185(A000040(n)). - _Reinhard Zumkeller_, Apr 03 2015
%F A028905 a(n) = prime(n) if prime(n) is in A028864. - _Alonso del Arte_, Nov 25 2019
%e A028905 The digits of 41 are 4, 1, which sorted are 1, 4; those are reinterpreted as 14.
%e A028905 The digits of 43 are 4, 3, which sorted are 3, 4; those are reinterpreted as 34.
%e A028905 The digits of 47 are 4, 7, which are already sorted, so 47 is not changed.
%t A028905 Table[FromDigits[Sort[IntegerDigits[Prime[n]]]], {n, 100}] (* _Alonso del Arte_, Nov 25 2019 *)
%o A028905 (Haskell)
%o A028905 a028905 = a004185 . a000040  -- _Reinhard Zumkeller_, Apr 03 2015
%o A028905 (PARI) eva(n) = subst(Pol(n), x, 10)
%o A028905 a(n) = eva(vecsort(digits(prime(n)))) \\ _Felix Fröhlich_, Nov 25 2019
%Y A028905 Cf. A028906, A028864.
%Y A028905 Cf. A004185, A000040.
%K A028905 nonn,base
%O A028905 1,1
%A A028905 _N. J. A. Sloane_
%E A028905 More terms from _Patrick De Geest_, Apr 1998
%E A028905 Offset corrected by _Reinhard Zumkeller_, Apr 03 2015