login
Record values in A249442.
4

%I #8 Nov 04 2014 16:37:39

%S 0,1,3,5,7,8,21,24,32,36,40,45,48,64,91,94

%N Record values in A249442.

%F a(n) = A249442(A249440(n)).

%o (PARI)

%o A249442(n) = { for(k=0,n\2,if(0==moebius(binomial(n,k)),return(k))); return(0); }

%o prevmax = -1; i = 0; for(n=0, 123456789, if((k=A249442(n)) > prevmax, prevmax = k; i++; write("b249439.txt", i, " ", k); write("b249440.txt", i, " ", n)));

%o \\ Compute both A249439 and A249440 at the same time. - _Antti Karttunen_, Nov 04 2014

%Y A249440 gives the positions where these values occur in A249442 for the first time.

%K nonn,more

%O 1,3

%A _Antti Karttunen_ and _Vladimir Shevelev_, Nov 04 2014