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 A086087 #5 May 18 2013 09:08:09 %S A086087 1,2,2,4,2,6,2,4,4,5,4,3,6,6,4,16,4,18,4,8,5,11,4 %N A086087 a(n) is the minimal m such that the group GL(m,3) has an element of order n. %C A086087 For n > 2, a(prime(n)) = A062117(n). Also, for any n, a(n) <= n. - _Eric M. Schmidt_, May 18 2013 %o A086087 (GAP) %o A086087 A086087 := function(n) local m; if IsPrime(n) and n>3 then return Order(3*Z(n)^0); fi; m := 1; while true do if ForAny(ConjugacyClasses(GL(m, 3)), cc->Order(Representative(cc))=n) then return m; fi; m := m + 1; od; end; # _Eric M. Schmidt_, May 18 2013 %Y A086087 Cf. A085430, A053290. %K A086087 nonn,more %O A086087 2,2 %A A086087 Yuval Dekel (dekelyuval(AT)hotmail.com), Aug 24 2003 %E A086087 Extended and corrected by _Eric M. Schmidt_, May 18 2013