|
%I #5 Aug 17 2016 22:18:21
%S 2,4,6,7,8,10,11,13,14,15,16,17,18,19,20,21,22,24,25,26,27,28,29,30,
%T 31,32,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,54,55,
%U 56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,72,73,74,76,77,78,79,80,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100
%N Numbers n for which A060125(n) <> A225901(n).
%H Antti Karttunen, <a href="/A275844/b275844.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Fa#facbase">Index entries for sequences related to factorial base representation</a>
%o (Scheme, with _Antti Karttunen_'s IntSeq-library)
%o (define A275844 (NONZERO-POS 1 0 (lambda (n) (- (A060125 n) (A225901 n)))))
%Y Complement: A275843.
%Y Cf. A060125, A225901.
%K nonn,base
%O 1,1
%A _Antti Karttunen_, Aug 16 2016
|
