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.

A183056 Cyclops partition numbers.

This page as a plain text file.
%I A183056 #10 Apr 10 2019 10:33:08
%S A183056 101,26015,483502844,27517052599,2814570987591,269232701252579,
%T A183056 12269218019229465,477535459708164115593,55271949286085137715955,
%U A183056 98175979536033971312388,28848173767368633057992125893483779
%N A183056 Cyclops partition numbers.
%F A183056 Intersection of A000041 and A134808.
%e A183056 a(1) = 101 is in the sequence because 101 is a partition number A000041 and it is also a cyclops number A134808.
%t A183056 cnQ[n_]:=Module[{idn=IntegerDigits[n],len},len=Length[idn];DigitCount[ n,10,0]==1&&OddQ[len]&&idn[[(len+1)/2]]==0]; Select[PartitionsP[ Range[ 2000]],cnQ] (* _Harvey P. Dale_, Apr 10 2019 *)
%Y A183056 Cf. A000041, A134808, A134809, A160717.
%K A183056 nonn,base
%O A183056 1,1
%A A183056 _Omar E. Pol_, Dec 21 2010
%E A183056 a(11) from _Alois P. Heinz_, Dec 23 2010