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.

A167761 a(n) = sqrt(A167657(n)).

This page as a plain text file.
%I A167761 #11 Apr 19 2025 19:36:05
%S A167761 0,1,2,3,16,5,36,7,64,729,10,1331,144,13,196,3375,4096,17,5832,361,20,
%T A167761 9261,484,12167,331776,625,26,729,28,841,21870000000,961,32768,33,
%U A167761 45435424,35,46656,50653,1444,59319,64000,41,130691232,43,1936,45,9474296896
%N A167761 a(n) = sqrt(A167657(n)).
%C A167761 a(n) = prime => A096478(n).
%C A167761 If a(n) = prime => A096478(n). - _Giovanni Teofilatto_, Nov 12 2009
%p A167761 A000720 := proc(n) numtheory[pi](n) ; end proc: A167761 := proc(nmax) local ol,a ; ol := 0 ; a := 0 ; for n from 1 to nmax do if A000720(n) = ol then a := a*ol ; else printf("%d,",sqrt(a)) ; a := A000720(n) ; end if; ol := A000720(n) ; end do ; return ; end proc: A167761(260) ; # _R. J. Mathar_, Jan 30 2010
%Y A167761 Cf. A167657.
%Y A167761 Cf. A096478. - _Giovanni Teofilatto_, Nov 12 2009
%K A167761 nonn
%O A167761 1,3
%A A167761 _Giovanni Teofilatto_, Nov 11 2009, corrected Nov 12 2009
%E A167761 Previous a(15) removed, a(35) and a(43) corrected by _R. J. Mathar_, Jan 30 2010
%E A167761 a(47) from _Kritsada Moomuang_, Apr 19 2025