# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a289186 Showing 1-1 of 1 %I A289186 #25 Aug 21 2017 22:13:34 %S A289186 0,1,0,1,2,2,1,3,2,2,4,3,4,5,3,4,6,4,4,7,4,5,8,5,6,9,8,6,10,6,6,11,8, %T A289186 10,12,8,8,13,8,8,14,9,8,15,10,10,16,14,10,17,12,11,18,11,16,19,12,12, %U A289186 20,12,12,21,12,15,22,14,16,23,20 %N A289186 The arithmetic function v_4(n,5). %D A289186 J. Butterworth, Examining the arithmetic function v_g(n,h). Research Papers in Mathematics, B. Bajnok, ed., Gettysburg College, Vol. 8 (2008). %H A289186 Bela Bajnok, Additive Combinatorics: A Menu of Research Problems, arXiv:1705.07444 [math.NT], May 2017. See Table in Section 1.6.1. %t A289186 v[g_, n_, h_] := (d = Divisors[n]; Max[(Floor[(d - 1 - GCD[d, g])/h] + 1)*n/d]); Table[v[4, n, 5], {n, 2, 70}] %t A289186 a[n_]:=n*Max[Table[(Floor[(d - 1 - GCD[d, 4])/5] + 1)/d, {d, Divisors[n]}]]; Table[a[n], {n, 2, 100}] (* _Vincenzo Librandi_, Aug 17 2017 *) %Y A289186 Cf. A289435, A289436, A289437, A289438, A289439, A289440, A289441. %K A289186 nonn %O A289186 2,5 %A A289186 _Robert Price_, Aug 16 2017 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE