A318164 a(n) = A000225(n)^A000217(n-1), n > 0.

1, 3, 343, 11390625, 819628286980801, 977480813971145474830595007, 151313661355466579537756144585602921111718527, 24161564501550368558430041444810830996032029256261885166168212890625

Offset: 1

Author

Muniru A Asiru, Aug 19 2018

Keywords

• nonn

Examples

			For n = 3, a(3) = 7^3 = 343.
		

References

• Bijan Davvaz, Polygroup theory and related systems, World Scientific Publishing Co. Plc. Ltd., New Jersey, (2013), p. 157 (for a(3) = 7^3 = 343).

Links

• Muniru A Asiru, Table of n, a(n) for n = 1..19

Crossrefs

Cf. A000225, A000217.

Programs

GAP

List([1..8],n->(2^n-1)^(n*(n-1)/2));

Magma

SetDefaultRealField(RealField(100)); [Round((2^n-1)^(n*(n-1)/2)): n in [1..8]]; // G. C. Greubel, Oct 19 2018

Maple

a:=n->(2^n-1)^(n*(n-1)/2): seq(a(n),n=1..8);

Mathematica

a[n_] := (2^n-1)^(n*(n-1)/2); Array[a, 8] (* Stefano Spezia, Sep 02 2018 *)

PARI

a(n) = (2^n-1)^(n*(n-1)/2); \\ Michel Marcus, Aug 21 2018

Formula

a(n) = (2^n - 1)^(n*(n - 1)/2), n > 0.