cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A115945 Numbers that cannot be written as a sum of distinct factorials.

This page as a plain text file.
%I A115945 #14 Jul 13 2013 12:03:23
%S A115945 4,5,10,11,12,13,14,15,16,17,18,19,20,21,22,23,28,29,34,35,36,37,38,
%T A115945 39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,
%U A115945 62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85
%N A115945 Numbers that cannot be written as a sum of distinct factorials.
%C A115945 Complement of A059590; A115944(a(n)) = 0.
%H A115945 Reinhard Zumkeller, <a href="/A115945/b115945.txt">Table of n, a(n) for n = 1..10000</a>
%H A115945 <a href="/index/Fa#factorial">Index entries for sequences related to factorial numbers</a>
%t A115945 A059590 = Table[ Reverse[id = IntegerDigits[n, 2]].Range[ Length[id]]!, {n, 0, 20}]; Complement[ Range[ Last[A059590]], A059590] (* _Jean-François Alcover_, Jun 19 2012 *)
%o A115945 (Haskell)
%o A115945 import Data.List (elemIndices)
%o A115945 a115945 n = a115945_list !! (n-1)
%o A115945 a115945_list = elemIndices 0 $ map a115944 [0..]
%o A115945 -- _Reinhard Zumkeller_, Dec 04 2011
%K A115945 nonn
%O A115945 1,1
%A A115945 _Reinhard Zumkeller_, Feb 02 2006