Questions on sums of squares/PARI
Max Alekseyev
maxale at gmail.com
Tue Mar 25 00:37:16 CET 2008
Just a brief comment.
There is an obvious property of A138554 (convexity) that follows
straight from the definition:
A138554(n) <= A138554(m) + A138554(n-m)
for any 0 <= m <= n.
Moreover, for some m this inequality turns into the equality. That
clearly happens for trivial cases of m=0 and m=n, but also for some
nontrivial m. In particular, if k_1, ..., k_s deliver the minimum
value for the sum k_1 + ... + k_s under the constraint k_1^2 + ... +
k_s^2 = n, then m = k_i^2 for each i=1..s turns the above inequality
into the equality.
Another, obvious property is that A138554(n^2) = n for all n.
Your observation on possible finiteness of A138555 can be reformulated
as the finiteness of the number of solutions (w.r.t. to n) to the
following strict inequality:
A138554(n) < floor(sqrt(n)) + A138554( n - floor(sqrt(n))^2 )
Moreover, A138555 is nothing more than a list of solutions to this inequality.
If the number of solutions is indeed finite then the following
equality holds for all large enough n:
A138554(n) = floor(sqrt(n)) + A138554( n - floor(sqrt(n))^2 )
Regards,
Max
On Mon, Mar 24, 2008 at 2:41 PM, <franktaw at netscape.net> wrote:
> I have just submitted the following two sequences:
>
> %I A138554
> %S A138554
> 0,1,2,3,2,3,4,5,4,3,4,5,6,5,6,7,4,5,6,7,6,7,8,9,8,5,6,7,8,7,8,9,8,9,8,9,6
> ,7,8,9,8,
> 9,10,11,10,9,10,11,12,7,8,9,10,9,10,11,12,11,10,11,12,11,12,13,8,9,10,11,
> 10,11,12,
> 13,12,11,12,13,14,13,14,15,12,9,10,11,12,11,12,13,14,13,12,13,14,15,14,15
> ,16,13,
> 14,15,10,11,12,13,12,13,14,15,14,13,14,15,16,15,16,17,14,15,16,17,16
> %N A138554 Minimum value of sum k_i when sum k_i^2 = n.
> %e A138554 32 = 4^2 + 4^2, and 4+4 = 8. Using 5, the best we can do is
> 32 = 5^2
> + 2^2 + 1^2 + 1^2 + 1^2, and 5+2+1+1+1 = 10, so a(32) = 8.
> %o A138554 (PARI) sslist(n) = {local(r,i,v,t);
> r=vector(n+1,k,0);
> for(k=1,n,v=k;i=1;while(i^2<=k,t=r[k-i^2+1]+i;if(t<v,v=t);i++);r[k+1]=v);
>
> r}
> %Y A138554 Cf A063772, A138555, A001156.
> %O A138554 0
> %K A138554 ,nonn,
>
> %I A138555
> %S A138555
> 32,61,136,193,218,219,320,464,673,776,777,884,1021,1145,1417,1440,1744,21
> 94,2195,
> 2285,2696,2697,2797,3361,3560,4321,4880,5156,5618,5619,5765,7048,8424,957
> 7,9770,
> 9771,11216,11217,12541,13856,15817,20129,21312,22480,24961
> %N A138555 Indices where A138554 requires only squares <
> floor(sqrt(n))^2.
> %C A138555 Express n = sum k_i^2 so as to minimize sum k_i. There may
> be more
> than one such sum; for example 12 = 3^2 + 1^2 + 1^2 + 1^2 = 2^2 + 2^2 +
> 2^2. If
> every such minimal sum uses squares only of numbers < floor(sqrt(n)), n
> is
> included in this sequence.
> %o A138555 (PARI) dsslist(n) = {local(r, i, j, v, t, d);
> r=vector(n+1,k,0);
> d=[];
> for(k=1,n,v=k;i=1;j=0;
> while(i^2<=k,t=r[k-i^2+1]+i;if(t<=v,v=t;j=i);i++);
> r[k+1]=v;if(j<i-1,d=concat(d,[k])));
> d}
> %O A138555 1
> %K A138555 ,nonn,
>
> Based on the PARI program shown, these are the only values of A138555
> up to 200000. I'm wondering if
> this is correct, or some kind of bug in PARI. Could someone program it
> with some other tool to verify (and
> perhaps extend) these results?
>
> If this is correct, could it be that the sequence is finite?
>
> Franklin T. Adams-Watters
>
More information about the SeqFan
mailing list