OFFSET
0,2
FORMULA
MATHEMATICA
Table[FromDigits[Sort[IntegerDigits[3^n]]], {n, 0, 40}] (* Vincenzo Librandi, Jan 22 2020 *)
PROG
(Magma) [Seqint(Reverse(Sort(Intseq(3^n)))):n in [0..35]]; // Vincenzo Librandi, Jan 22 2020
(Python)
def A321540(n): return int(''.join(sorted(str(3**n)))) # Chai Wah Wu, Nov 10 2022
CROSSREFS
The following are parallel families: A000079 (2^n), A004094 (2^n reversed), A028909 (2^n sorted up), A028910 (2^n sorted down), A036447 (double and reverse), A057615 (double and sort up), A263451 (double and sort down); A000244 (3^n), A004167 (3^n reversed), A321540 (3^n sorted up), A321539 (3^n sorted down), A163632 (triple and reverse), A321542 (triple and sort up), A321541 (triple and sort down).
Cf. A004185.
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Nov 19 2018
STATUS
approved