[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A183056
Cyclops partition numbers.
0
101, 26015, 483502844, 27517052599, 2814570987591, 269232701252579, 12269218019229465, 477535459708164115593, 55271949286085137715955, 98175979536033971312388, 28848173767368633057992125893483779
OFFSET
1,1
FORMULA
Intersection of A000041 and A134808.
EXAMPLE
a(1) = 101 is in the sequence because 101 is a partition number A000041 and it is also a cyclops number A134808.
MATHEMATICA
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 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Omar E. Pol, Dec 21 2010
EXTENSIONS
a(11) from Alois P. Heinz, Dec 23 2010
STATUS
approved