Mian-Chowla Sequence

Author

Eric W. Weisstein
July 7, 2023

This notebook downloaded from http://mathworld.wolfram.com/notebooks/IntegerSequences/Mian-ChowlaSequence.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/Mian-ChowlaSequence.html.

©2023 Wolfram Research, Inc. except for portions noted otherwise

Definition

a(1) = 1; for n>1, a(n) = smallest number > a(n-1) such that the pairwise sums of elements are all distinct.

An alternative definition is to start with 1 and then continue with the least number such that all pairwise differences of distinct elements are all distinct.

A005282

t={1};sms={2};k=1;Do[k++;While[Intersection[sms,k+t]!={},k++];sms=Join[sms,t+k,{2 k}];AppendTo[t,k],
{49}];

t

Select[Subsets[t,{2}],Subtract@@#==-15&]

Sort[-Subtract@@@Subsets[t,{2}]]