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.

A279106 a(n) = number of legs in each part of the symmetric representation of sigma(A279105(n)).

This page as a plain text file.
%I A279106 #15 Dec 06 2016 22:18:15
%S A279106 1,3,7,11,15,23,31,35,39,47,55,59,63,71,79,83,95,107,111,119,127,131,
%T A279106 143,159,167,175,179,191,199,207,215,223,239,251,255,263,279,287,299,
%U A279106 311,319,323,335,351,359,383,391,395,399,407,415,419,431,439,447,455,467,479
%N A279106 a(n) = number of legs in each part of the symmetric representation of sigma(A279105(n)).
%F A279106 a(n) = 2 * A279105(n) - 1.
%e A279106 a(3) = 7 = 2 * A279105(3) - 1;
%e A279106 21 is not in the sequence since 11=(21+1)/2 is not in A174793.
%t A279106 a174973Q[n_] := Module[{d=Divisors[n]}, Select[Rest[d] - 2*Most[d], #>0&]=={}]
%t A279106 a279106[n_]:=2*Select[Range[n], a174973Q] - 1
%t A279106 a279106[250] (* sequence data *)
%Y A279106 Cf. A174973, A237270, A237271, A237593, A279105.
%K A279106 nonn
%O A279106 1,2
%A A279106 _Hartmut F. W. Hoft_, Dec 06 2016