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 A318164 #22 Sep 08 2022 08:46:22 %S A318164 1,3,343,11390625,819628286980801,977480813971145474830595007, %T A318164 151313661355466579537756144585602921111718527, %U A318164 24161564501550368558430041444810830996032029256261885166168212890625 %N A318164 a(n) = A000225(n)^A000217(n-1), n > 0. %D A318164 Bijan Davvaz, Polygroup theory and related systems, World Scientific Publishing Co. Plc. Ltd., New Jersey, (2013), p. 157 (for a(3) = 7^3 = 343). %H A318164 Muniru A Asiru, <a href="/A318164/b318164.txt">Table of n, a(n) for n = 1..19</a> %F A318164 a(n) = (2^n - 1)^(n*(n - 1)/2), n > 0. %e A318164 For n = 3, a(3) = 7^3 = 343. %p A318164 a:=n->(2^n-1)^(n*(n-1)/2): seq(a(n),n=1..8); %t A318164 a[n_] := (2^n-1)^(n*(n-1)/2); Array[a, 8] (* _Stefano Spezia_, Sep 02 2018 *) %o A318164 (GAP) List([1..8],n->(2^n-1)^(n*(n-1)/2)); %o A318164 (PARI) a(n) = (2^n-1)^(n*(n-1)/2); \\ _Michel Marcus_, Aug 21 2018 %o A318164 (Magma) SetDefaultRealField(RealField(100)); [Round((2^n-1)^(n*(n-1)/2)): n in [1..8]]; // _G. C. Greubel_, Oct 19 2018 %Y A318164 Cf. A000225, A000217. %K A318164 nonn %O A318164 1,2 %A A318164 _Muniru A Asiru_, Aug 19 2018