A349778 Number of ways to write n as x^2 + y^k + 2*z^m, where x,y,z are nonnegative integers with x >= y, and k and m belong to the set {2,3}.
4, 4, 8, 4, 8, 4, 4, 4, 4, 6, 8, 4, 8, 4, 2, 2, 7, 10, 12, 8, 9, 3, 4, 2, 5, 11, 10, 8, 8, 3, 1, 3, 7, 10, 11, 5, 12, 7, 7, 4, 5, 8, 8, 7, 8, 8, 2, 3, 4, 9, 11, 8, 18, 5, 11, 8, 4, 8, 11, 8, 7, 6, 3, 8, 7, 12, 12, 12, 11, 4, 7, 5, 10, 9, 11, 7, 11, 4, 3, 6, 11, 13, 17, 9, 10, 6, 5, 7, 7, 13, 13, 12, 5, 6, 3, 3, 5, 14, 12, 10, 18
Offset: 0
Keywords
Examples
a(3) = 4. In fact, 3 = 1^2 + 0^2 + 2*1^2 = 1^2 + 0^2 + 2*1^3 = 1^2 + 0^3 + 2*1^2 = 1^2 + 0^3 + 2*1^3 with 1 >= 0. a(30) = 1 with 30 = 2^2 + 2^3 + 2*3^2 and 2 >= 2. a(120) = 1 with 120 = 10^2 + 2^2 + 2*2^3 and 10 >= 2. a(142) = 1 with 142 = 6^2 + 2^3 + 2*7^2 and 6 >= 2.
Links
- Zhi-Wei Sun, Table of n, a(n) for n = 0..10000
- Zhi-Wei Sun, New Conjectures in Number Theory and Combinatorics (in Chinese), Harbin Institute of Technology Press, 2021.
Programs
-
Mathematica
tab={};Do[r=0;Do[If[IntegerQ[((n-x^2-y^k)/2)^(1/m)],r=r+1],{x,0,Sqrt[n]},{k,2,3},{y,0,Min[x,(n-x^2)^(1/k)]},{m,2,3}];tab=Append[tab,r],{n,0,100}];Print[tab]
Comments