login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A278561 Let v = list of denominators of Farey series of order n (see A006843); let b(n) = Sum k*k'/(k+k'), where (k,k') are pairs of successive terms of v; a(n) = denominator of b(n). 2

%I #7 Nov 23 2016 09:56:54

%S 2,3,10,7,252,396,6435,858,680680,1175720,5290740,9360540,1029659400,

%T 617795640,116454478140,1061790830100,283144221360,74511637200,

%U 14060345939640,14060345939640,109530094869795600,650075097225840,51193413906534900,481218090721428060

%N Let v = list of denominators of Farey series of order n (see A006843); let b(n) = Sum k*k'/(k+k'), where (k,k') are pairs of successive terms of v; a(n) = denominator of b(n).

%H J. Lehner and M. Newman, <a href="http://matwbn.icm.edu.pl/ksiazki/aa/aa15/aa15114.pdf">Sums involving Farey fractions</a>, Acta Arithmetica 15.2 (1969): 181-187. See Eq. (21).

%e The fractions b(n) are 1/2, 4/3, 39/10, 52/7, 4069/252, 8573/396, 258017/6435, 46639/858, 53371999/680680, 113518551/1175720, 768140741/5290740, 1560819091/9360540, 242830653007/1029659400, 169134016817/617795640, 38186305937387/116454478140, ...

%p Farey := proc(n) sort(convert(`union`({0}, {seq(seq(m/k, m=1..k), k=1..n)}), list)) end:

%p ans:=[];

%p for n from 1 to 30 do

%p t1:=denom(Farey(n));

%p t2:=add( t1[i]*t1[i+1]/(t1[i]+t1[i+1]), i=1..nops(t1)-1);

%p od:

%p ans;

%p map(numer,ans); # A278052

%p map(denom,ans); # A278561

%Y Cf. A006843, A005728, A240877, A278046-A278051, A278052 (numerators).

%K nonn,frac

%O 1,1

%A _N. J. A. Sloane_, Nov 23 2016

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 17:42 EDT 2024. Contains 371254 sequences. (Running on oeis4.)