A280356 Number of ways to write n as x^4 + y^3 + z^2 + 2^k, where x,y,z are nonnegative integers and k is a positive integer.
0, 1, 3, 4, 4, 4, 3, 3, 5, 5, 4, 5, 6, 5, 2, 3, 7, 8, 7, 7, 8, 5, 1, 4, 9, 8, 5, 7, 8, 6, 3, 8, 14, 11, 7, 8, 7, 4, 4, 8, 13, 9, 4, 8, 8, 5, 4, 8, 11, 5, 5, 8, 8, 6, 4, 6, 9, 6, 6, 10, 6, 2, 3, 4, 10, 10, 9, 13, 12, 7, 2, 7, 11, 9, 7, 9, 6, 2, 3, 7
Offset: 1
Keywords
Examples
a(2) = 1 since 2 = 0^4 + 0^3 + 0^2 + 2^1. a(23) = 1 since 23 = 2^4 + 1^3 + 2^2 + 2^1. a(1135) = 1 since 1135 = 0^4 + 7^3 + 28^2 + 2^3. a(6415) = 1 since 6415 = 1^4 + 13^3 + 11^2 + 2^12. a(6471) = 1 since 6471 = 1^4 + 13^3 + 57^2 + 2^10.
Links
- Zhi-Wei Sun, Table of n, a(n) for n = 1..10000
- Zhi-Wei Sun, New conjectures on representations of integers (I), Nanjing Univ. J. Math. Biquarterly 34(2017), no. 2, 97-120.
Programs
-
Mathematica
SQ[n_]:=SQ[n]=IntegerQ[Sqrt[n]]; In[2]:= Do[r=0;Do[If[SQ[n-2^k-x^4-y^3],r=r+1],{k,1,Log[2,n]},{x,0,(n-2^k)^(1/4)},{y,0,(n-2^k-x^4)^(1/3)}];Print[n," ",r];Continue,{n,1,80}]
Comments