login
The arithmetic function v_6(n,6).
0

%I #8 Aug 21 2017 13:00:44

%S 0,0,1,1,0,1,2,1,2,2,3,2,2,3,4,3,2,3,5,3,4,4,6,5,4,4,7,5,6,5,8,6,6,7,

%T 9,6,6,6,10,7,6,7,11,9,8,8,12,8,10,9,13,9,8,11,14,9,10,10,15,10,10,10,

%U 16,13,12,11,17,12,14

%N The arithmetic function v_6(n,6).

%D J. Butterworth, Examining the arithmetic function v_g(n,h). Research Papers in Mathematics, B. Bajnok, ed., Gettysburg College, Vol. 8 (2008).

%H Bela Bajnok, <a href="https://arxiv.org/abs/1705.07444">Additive Combinatorics: A Menu of Research Problems</a>, arXiv:1705.07444 [math.NT], May 2017. See Table in Section 1.6.1.

%t v[g_, n_, h_] := (d = Divisors[n]; Max[(Floor[(d - 1 - GCD[d, g])/h] + 1)*n/d]); Table[v[6, n, 6], {n, 2, 70}]

%t a[n_]:=n Max[Table[(Floor[(d - 1 - GCD[d, 6])/6] + 1)/d, {d, Divisors[n]}]]; Table[a[n], {n, 2, 100}] (* _Vincenzo Librandi_, Aug 19 2017 *)

%Y Cf. A289435, A289436, A289437, A289438, A289439, A289440, A289441.

%K nonn

%O 2,7

%A _Robert Price_, Aug 16 2017