12

দাবি পরিত্যাগী

এই প্রশ্নের সদৃশ নয় এই প্রশ্নের । আমি নির্দিষ্ট অঙ্কগুলি গণনা করছি না, কারণ ইতিমধ্যে প্রাথমিক পরামিতিগুলিতে আমাদের সেট রয়েছে। এই প্রশ্নটি দশমিক সংখ্যাগুলিতে ফোকাস করছে যা সরবরাহ করা অঙ্কগুলির ভিত্তিতে বাইনারি স্ট্রিংগুলি থেকে তৈরি করা যেতে পারে।

চ্যালেঞ্জ

দুটি পূর্ণসংখ্যা দেওয়া হয়েছে Xএবং যথাক্রমে Yশূন্যের সংখ্যা ( 0) এবং বেশী ( 1) উপস্থাপন করে, সম্ভাব্য দশমিক সমতুল্য গণনা করুন যা কেবল জিরো এবং প্রদত্ত শূন্যগুলি ব্যবহার করে বাইনারি স্ট্রিং তৈরি করা থেকে নির্ধারিত হতে পারে এবং সেগুলি আউটপুট হিসাবে প্রদর্শিত হবে।

উদাহরণ 1:

ইনপুট: 0 1

আউটপুট: 1

ব্যাখ্যা: কেবলমাত্র একজনকে 1অ্যাকাউন্ট করতে হবে, যা কেবলমাত্র এক উপায়ে রূপান্তরিত হতে পারে।

উদাহরণ 2:

ইনপুট: 1 1

আউটপুট: 1,2

ব্যাখ্যা: 011 এ 10রূপান্তর করে 2 এ রূপান্তরিত হয়।

উদাহরণ 3:

ইনপুট: 3 2

আউটপুট: 3,5,6,9,10,12,17,18,20,24

ব্যাখ্যা: থ্রি 0এস এবং টু 1এস 00011(3), 00101(5), 00110(6), 01001(9), 01010(10), 01100(12), 10001(17), 10010(18), 10100(20), 11000(24)

সীমাবদ্ধতা এবং বিধি

আমি কেবল আপনার কোডটি কাজ করার আশা করব যেখানে 0 < X + Y <= 16আউটপুটে সর্বাধিক সংখ্যাটি কেবলমাত্র 16 1টি, যেমন প্যারামিটার 0এবং থেকে হতে পারে 16।
উপরোক্ত সীমাবদ্ধতা ফলে, সংখ্যা পরিসীমা আমরা আউটপুটে আশা করতে চাই থেকে এসেছ 0এবং 65535।
আমি ফাংশন বা কোড গ্রহণ করব, যতক্ষণ না ফলাফল প্রাপ্ত ফলাফল আউটপুট প্রদান করা হয়, এটি কমা দ্বারা বিচ্ছিন্ন তালিকা হোক, একটি অ্যারে, তালিকাটি STDOUT এ আউটপুট করা হবে ইত্যাদি the আউটপুট সম্পর্কে আমার যে মানদণ্ডে চাপ দেওয়া উচিত তা হ'ল এটি বাছাই করা আবশ্যক ।
এটি কোড গল্ফ, সর্বনিম্ন বাইটস সর্বাধিক গৌরব অর্জন করবে।
আমরা নির্বোধ ফাঁকগুলি সহ্য করব না

code-golf binary

— WallyWest
সূত্র

1

আউটপুটটি বাছাই করতে হবে?

— ডেনিস

হাই @ ডেনিস, হ্যাঁ, আমি এটি উল্লেখ করতে ভুলে গেছি ... আউটপুটটি বাছাই করতে হবে আমি সেই অনুযায়ী নিয়ম আপডেট করেছি।

— ওয়ালিওয়েস্ট

2

আমাদের কি মামলা পরিচালনা করা দরকার 0 0?

— ETH প্রোডাকশনস

@ এথ প্রডাকশনগুলি আমি উপরে উল্লিখিত করেছি 0 <= X + Y <= 16, তাই হ্যাঁ, কারণ 0 0এই নিয়মটিকে সন্তুষ্ট করে এমন বৈধ ইনপুট হিসাবে বিবেচিত হবে।

— ওয়েলওয়েস্ট

2

সেক্ষেত্রে প্রত্যাশিত আউটপুট 0 0কী? 0 নম্বরটি শূন্য, এক বা একাধিক শূন্য দ্বারা প্রতিনিধিত্ব করা যেতে পারে।

— ডেনিস

5

জেলি , 8 বাইট

0,1xŒ!ḄQ

এটি অনলাইন চেষ্টা করুন!

কিভাবে এটা কাজ করে

0,1xŒ!ḄQ Main link. Argument: [x, y]

0,1x     Repeat 0 x times and 1 y times.
    Œ!   Compute all permutations of the result.
      Ḅ   Unbinary; convert each permutation from base 2 to integer.
       Q  Unique; deduplicate the results.

— ডেনিস
সূত্র

এটি বেশ চিত্তাকর্ষক ... সাধারণ প্রোগ্রামিং মার্কেটে জে এর জন্য অনেক কল আছে? আমি জেলি এটা বন্ধ ভিত্তি করে আছে?

— ওয়ালিওয়েস্ট

1

কিছু নির্দিষ্ট অ্যাপ্লিকেশনগুলিতে এর বেশিরভাগ ব্যবহারকারীর বেস রয়েছে (বেশিরভাগ গণিত / পরিসংখ্যান) তবে আমি সত্যই জানি না। আমি কোড গল্ফের বাইরে জে ব্যবহার করিনি।

— ডেনিস

@ ওয়েলিওয়েস্ট এটি প্রায়শই বলা হয় না কারণ এটি এমন পরিবেশের পক্ষে উপযুক্ত যা কার্যকরী প্রোগ্রামিং থেকে উপকৃত হয়। সাধারণত শুধুমাত্র খুব বিশেষায়িত প্রোগ্রামিংয়ের জন্য।

— কনর ও'ব্রায়েন

7

পাইথন, 60 বাইট

lambda x,y:[n for n in range(1<<x+y)if bin(n).count('1')==y]

আইডিয়নে এটি পরীক্ষা করুন ।

কিভাবে এটা কাজ করে

এক্স জিরো এবং y এর সাথে বাইনারিতে যে সমস্ত ধনাত্মক সংখ্যা উপস্থাপন করা যেতে পারে সেগুলি 2 ^{x + y এর} চেয়ে কম স্পষ্ট , কারণ পরেরটির ক্যানোনিকাল বাইনারি উপস্থাপনে x + y + 1 ডিজিট রয়েছে।

ল্যামডা কেবলমাত্র পূর্ণসংখ্যার উপর iterates [0, 2 ^{x এর + Y} ) এবং সমস্ত পূর্ণসংখ্যার রাখে এন যে সীমার মধ্যে আছে Y বেশী। যেহেতু এন <2 ^{x + y} হল x (বা তার চেয়ে কম) শূন্যগুলির সাথে প্রতিনিধিত্ব করা যায় ।

— ডেনিস
সূত্র

5

গণিত, 59 57 বাইট

গাণিতিকের সাথে একটি সাধারণ ফলাফল: উচ্চ-স্তরের ফাংশন = ভাল, দীর্ঘ ফাংশনের নাম = খারাপ।

#+##&~Fold~#&/@Permutations@Join[0&~Array~#,1&~Array~#2]&

Join[0&~Array~#,1&~Array~#2]0s এবং 1s এর সঠিক সংখ্যার সাথে একটি তালিকা তৈরি করে । Permutationsপুনরাবৃত্তি ছাড়াই (যেমন আমি শিখেছি) এবং সাজানো ক্রমানুসারে সেই তালিকার সমস্ত ক্রিয়াকলাপ তৈরি করে। #+##&~Fold~#(এর একটি গল্ফাসকেটেড সংস্করণ #~FromDigits~2) বেস -২ সংখ্যাগুলির তালিকাটিকে তাদের প্রতিনিধিত্ব করে পূর্ণসংখ্যায় রূপান্তর করে।

পূর্ববর্তী সংস্করণ, মার্টিন ইন্ডারের মন্তব্যের আগে:

#~FromDigits~2&/@Permutations@Join[0&~Array~#,1&~Array~#2]&

— গ্রেগ মার্টিন
সূত্র

1

তবুও, ভালভাবে পর্যবেক্ষণ করা এবং নথিভুক্ত ... ম্যাথমেটিকা নম্বর ক্রাঞ্চিংয়ের জন্য দুর্দান্ত, কোড গল্ফের পক্ষে ততটা ভাল নয় ...

— বেশিরভাগ

1

FromDigitsসাধারণত ছোট করা যেতে পারে:#+##&~Fold~#&/@Permutations...

— মার্টিন এন্ডার

@ মার্টিন ইন্ডার: আমি পেয়েছি! এবং অন্যান্য ঘাঁটিতে কীভাবে সাধারণীকরণ করা যায় তা দেখুন। আমাকে এই চতুর প্রতিভা শেখানোর জন্য আপনাকে ধন্যবাদ।

— গ্রেগ মার্টিন

1

এটি নিয়ে আসার ক্রেডিট আলেফালফের কাছে যায় । ;)

— মার্টিন এন্ডার

1

দেখা যাচ্ছে যে ডেনিসের পদ্ধতির দিকে যাওয়া সত্ত্বেও খাটো:Select[Range[2^+##]-1,x=#;DigitCount[#,2,1]==x&]&

— মার্টিন এন্ডার

5

সিজেএম ( 15 14 বাইট)

{As.*s:~e!2fb}

এটি একটি বেনামি ব্লক (ফাংশন) যা একটি অ্যারে হিসাবে ইনপুট নেয় [number-of-ones number-of-zeros]এবং অ্যারের হিসাবে আউটপুট ফেরত দেয়।

অনলাইন ডেমো

চিহ্ন থেকে দীর্ঘ পথ, তবে আরও আকর্ষণীয় : এটি বিন্যাস বা বেস রূপান্তর ছাড়াই হয়:

{2\f#~1$*:X;[({___~)&_2$+@1$^4/@/|_X<}g;]}

গল্ফস্ক্রিপ্ট উন্মুক্ত হওয়ার সাথে সাথে এটি দুর্দান্তভাবে কাজ করবে।

— পিটার টেলর
সূত্র

আমি প্রতিস্থাপন করার চেষ্টা ছিল ee{)*}/কিছু ব্যবহার করে .*এবং এই 14 বাইট সমাধান সঙ্গে এসেছিলেন আপ: এখন যদিও একটু অদক্ষ দেখায়। {As.*s:~e!2fb}s:~

— মার্টিন ইন্ডার

1

@MartinEnder, আমি আসলে দিয়ে শুরু .*এবং সিদ্ধান্ত নিয়েছে যে eeযেমন তুলনায় nicer ছিল 2,:a.*e_। আমি বুঝতে পারি নি যদিও e!এটির যুক্তির ক্রম নির্বিশেষে এটি একই আউটপুট দেবে।

— পিটার টেলর

হ্যাঁ, আমি এটি অন্যদিন নিজেই আবিষ্কার করেছি।

— মার্টিন ইন্ডার

4

জাপট , 16 বাইট

'0pU +'1pV)á mn2

এটি অনলাইন পরীক্ষা!

কিভাবে এটা কাজ করে

                  // Implicit: U = first integer, V = second integer
'0pU              // Repeat the string "0" U times.
     +'1pV)       // Concatenate with the string "1" repeated V times.
           á      // Take all unique permutations.
             mn2  // Interpret each item in the resulting array as a binary number.
                  // Implicit: output last expression

বিকল্প সংস্করণ, 17 বাইট

2pU+V o f_¤è'1 ¥V
                   // Implicit: U = first integer, V = second integer
2pU+V              // Take 2 to the power of U + V.
      o            // Create the range [0, 2^(U+V)).
        f_         // Filter to only items where
           è'1     //  the number of "1"s in
          ¤        //  its binary representation
               ¥V  //  is equal to V. 
                   // Implicit: output last expression

আমি উভয় সংস্করণ আরও গল্ফ চেষ্টা করার চেষ্টা করা হয়েছে, কিন্তু আমি ঠিক কোন শিথিল খুঁজে পাচ্ছি না ...

— ETHproductions
সূত্র

এটি আশ্চর্যজনক দেখাচ্ছে ... এবং এটি দুর্দান্ত কাজ করে! দোভাষী অনুবাদকৃত ডানদিকে কোডটি দেখাচ্ছে না? আমি দেখতে পাচ্ছি যে এটি কীভাবে রেন্ডার হয়?

— ওয়েলওয়েস্ট

@ ওলিওয়েস্ট এটি মোটামুটি স্থানান্তর করে ("0".p(U)+"1".p(V)).á().m("n",2); প্রতিটি .x()ফাংশন সোর্স ফাইলে সংজ্ঞায়িত করা হয় ।

— ETH প্রোডাকশনস

3

রুবি, 63 বাইট

একটি সহজ বাস্তবায়ন। গল্ফিং পরামর্শ স্বাগত জানাই।

->a,b{(?0*a+?1*b).chars.permutation.map{|b|(b*'').to_i 2}.uniq}

Ungolfing

def f(a,b)
  str = "0"*a+"1"*b                   # make the string of 0s and 1s
  all_perms = str.chars.permutation   # generate all permutations of the 0s and 1s
  result = []
  all_perms.do each |bin|             # map over all of the permutations
    bin = bin * ''                    # join bin together
    result << bin.to_i(2)             # convert to decimal and append
  end
  return result.uniq                  # uniquify the result and return
end

— Sherlock9
সূত্র

3

পাইথ - 11 বাইট

{iR2.psmVU2

টেস্ট স্যুট ।

{                Uniquify
 iR2             Map i2, which converts from binary to decimal
  .p             All permutations
   s             Concatenate list
    mV           Vectorized map, which in this case is repeat
     U2          0, 1
     (Q)         Implicit input

— Maltysen
সূত্র

2

পাইথন 2 - 105 99 বাইট

আমাদের আউটপুটটি বাছাই করা দরকার +8 বাইট

lambda x,y:sorted(set(int("".join(z),2)for z in __import__('itertools').permutations("0"*x+"1"*y)))

— জেরেমি
সূত্র

চিত্তাকর্ষক সম্পাদনা!

— ওয়ালিওয়েস্ট

1

ধন্যবাদ, লাম্বদা ফাংশনে আপনি মডিউলগুলি আমদানি করতে পারবেন এমন আমার কোনও ধারণা ছিল না।

— জেরেমি

আমি সর্বদা ভেবেছিলাম কোড গল্ফের উদ্দেশ্যে আপনাকে পৃথক আমদানির বিবৃতি দেওয়ার অনুমতি দেওয়া হয়েছিল। (স্পষ্টতই আপনার এখনও এর দৈর্ঘ্য অন্তর্ভুক্ত করা দরকার)) এটি আপনাকে বা একটি বা দুটি বাঁচাতে পারে?

— নীল

2

গণিত, 47 বাইট

Cases[Range[2^+##]-1,x_/;DigitCount[x,2,1]==#]&

দুটি যুক্তিযুক্ত একটি নামবিহীন ফাংশন: 1গুলি এর সংখ্যা, 0গুলি এর সংখ্যা ।

মূলত ডেনিসের পাইথন সমাধানের একটি বন্দর । আমরা থেকে একটি সীমার তৈরি 0করতে এবং তারপর কেবলমাত্র সেই সংখ্যার যার পরিমাণ রাখা -bits প্রথম ইনপুট সমান। সবচেয়ে আকর্ষণীয় বিট সম্ভবত এটি দুটি যুক্তি সংযোজন কাছাকাছি বন্ধনী এড়াতে কিছু সিকোয়েন্স যাদু ব্যবহার করে ।2^x+y-112^+##

— মার্টিন ইন্ডার
সূত্র

2

ম্যাটল্যাব 57 + 6

@(a,b)unique(perms([ones(1,a) zeros(1,b)])*2.^(0:a+b-1)')

ব্যবহার চালানো

ans(2,3)

ungolfed

function decimalPerms( nZeros, nOnes )
  a = [ones(1,nOnes) zeros(1,nZeros)];  % make 1 by n array of ones and zeros
  a = perms(a);                         % get permutations of the above 
  powOfTwo = 2.^(0:nOnes+nZeros-1)';    % powers of two as vector
  a = a * powOfTwo;                     % matrix multiply to get the possible values
  a = unique(a)                         % select the unique values and print

— রিচার্ড
সূত্র

1

প্লাস 6 বাইট কিসের জন্য?

— mbomb007

আমি একই জিনিসটি জিজ্ঞাসা করতে

— যাচ্ছিলাম

2

এমএটিএল , 9 বাইট

y+:<Y@XBu

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

ডেনিসের জেলি জবাবটিতে এই পদ্ধতির অনুরূপ ।

y     % Implicitly take two inputs (say 3, 2). Duplicate the first.
      %   STACK: 3, 2, 3
+     % Add
      %   STACK: 3, 5
:     % Range
      %   STACK: 3, [1 2 3 4 5]
<     % Less  than
      %   STACK: [0 0 0 1 1]
Y@    % All permutations
      %   STACK: [0 0 0 1 1; 0 0 0 1 1; ...; 0 0 1 0 1; ...; 1 1 0 0 0]
XB    % Binary to decimal
      %   STACK: [3 3 ... 5 ... 24]
u     % Unique
      %   STACK: [3 5 ... 24]
      % Implicitly display

— লুইস মেন্ডো
সূত্র

1

আসলে, 21 বাইট

আমার রুবি উত্তর একটি বন্দর । গল্ফিং পরামর্শ স্বাগত জানাই। এটি অনলাইন চেষ্টা করুন!

│+)'1*@'0*+╨`εj2@¿`M╔

কিভাবে এটা কাজ করে

          Implicit input of a and b.
│+)       Duplicate a and b, add, and rotate to bottom of stack. Stack: [b a a+b]
'1*@      "1" times b and swap with a.
'0*+      "0" times a and add to get "0"*a+"1"*b.
╨`...`M   Take all the (a+b)-length permutations of "0"*a+"1"*b
          and map the following function over them.
  εj        Join the permutation into one string
  2@¿       Convert from binary to decimal
╔         Uniquify the resulting list and implicit return.

— Sherlock9
সূত্র

1

গ্রোভি 74 বাইট, 93 বাইট বা 123 বাইট

আমি জানি না আপনি কাকে বেশি বিবেচনা করছেন সেই প্রশ্নের পুরোপুরি উত্তর দিয়েছেন কিন্তু ...

74 বাইট সমাধান

{a,b->((1..a).collect{0}+(1..b).collect{1}).permutations().unique()}(1,2)

1,2 এর ইনপুট জন্য আপনি পাবেন:

[[1,0,1], [0,1,1], [1,1,0]]

93 বাইট সমাধান

{a,b->((1..a).collect{0}+(1..b).collect{1}).permutations().collect{it.join()}.unique()}(1,2)

1,2 এর ইনপুট জন্য আপনি পাবেন:

[101, 011, 110]

123 বাইট সমাধান

{a,b->((1..a).collect{0}+(1..b).collect{1}).permutations().collect{it.join()}.unique().collect{Integer.parseInt(it,2)}}(1,2)

1,2 এর ইনপুট জন্য আপনি পাবেন:

[5, 3, 6]

এটি এখানে চেষ্টা করে দেখুন:

https://groovyconsole.appspot.com/edit/5143619413475328

— ম্যাজিক অক্টোপাস উরন
সূত্র

আমি 123 বাইট সমাধান গণনা করব কারণ এটি সংক্ষেপে উল্লিখিত আউটপুট টাইপের সাথে মেলে। সাবাশ.

— ওয়ালিওয়েস্ট

1

জাভাস্ক্রিপ্ট (ফায়ারফক্স 48), 85 76 74 71 70 বাইট

সংরক্ষিত 3 বাইট @ নীলকে ধন্যবাদ

(m,n,g=x=>x?g(x>>1)-x%2:n)=>[for(i of Array(1<<m+n).keys())if(!g(i))i]

অ্যারের উপলব্ধিগুলি দুর্দান্ত। খুব খারাপ তারা এটিকে এখনও অফিসিয়াল ইসমাস্ক্রিপ্ট স্পেসে পরিণত করতে পারেনি।

জাভাস্ক্রিপ্ট (ES6), 109 87 79 78 71 70 বাইট

(m,n,g=x=>x?g(x>>1)-x%2:n)=>[...Array(1<<m+n).keys()].filter(x=>!g(x))

এখন সমস্ত ES6- সম্মতিযুক্ত ব্রাউজারে কাজ করা উচিত। এটিতে 7 টি বাইট সংরক্ষণ করা হয়েছে, @ নীলকেও ধন্যবাদ।

— ETHproductions
সূত্র

উহ, @ ইথপ্রোডাকশনস, কোনও কারণে আমি undefinedএখন প্রতিটি পরীক্ষার রান নিয়ে এটি ফিরিয়ে আনছি ...?

— ওয়েলওয়েস্ট

@WallyWest নিশ্চিত করুন যে আপনি প্রথমে এটি কোনও ভেরিয়েবলের জন্য নির্ধারিত করছেন, যেমন f=(m,n)=>..., তারপরে এটি কল করুন f(3,2)। যদি আপনি এটি করছেন তবে আপনি কোন ব্রাউজারটি ব্যবহার করছেন?

— ETH প্রোডাকশনস

ক্রোম 52 ... আমার কাছে এই মেশিনে ফায়ারফক্স নেই, তাই আমি কেবল ES6 নন-ফায়ারফক্স সংস্করণ পরীক্ষা করতে পারি ...

— ওয়ালি ওয়েস্ট

এটি ব্রাউজার কনসোল চালানোর চেষ্টা করছে।

— ওয়েলওয়েস্ট

ওহ, হুঁ। আমি ক্রোমেও সেই সমস্যাটি দেখতে পাচ্ছি। এই eval-বিহীন সংস্করণটি চেষ্টা করুন (ঠিক একই জিনিসটি করে তবে 3 বাইট বেশি দিন):(m,n)=>{a="";for(i=0;i<1<<m+n;i++)if(i.toString(2).split(1).length==n+1)a+=i+" ";return a}

— ETH প্রোডাকশনগুলি

1

গ্রোভি 80 বাইট

@ কারাসোকম্পিউটিং দ্বারা উত্তরের উপর ভিত্তি করে

তার 123 বাইট সমাধান 80 বাইট মধ্যে সংকুচিত করা যেতে পারে:

80 বাইট সমাধান

{a,b->([0]*a+[1]*b).permutations()*.join().collect{Integer.parseInt(it,2)}}(1,2)

1,2 এর ইনপুট জন্য আপনি পাবেন:

[5, 3, 6]

— norganos
সূত্র

1

সি (জিসিসি) , 72 68 বাইট

f(a,b){for(a=1<<a+b;a--;)__builtin_popcount(a)^b||printf("%d\n",a);}

এটি অনলাইন চেষ্টা করুন!

দুর্ভাগ্যক্রমে স্ট্যান্ডার্ড লাইব্রেরিতে কোনও পপকাউন্ট () নেই, তবে এটি জিসিসির দ্বারা "বিল্টিন ফাংশন" হিসাবে সরবরাহ করা হয়েছে। আউটপুটটি সাজানো হয় তবে বিপরীত ক্রমে।

4 বাইট বন্ধ শেভ করার জন্য @ সেলিংক্যাটকে ধন্যবাদ!

— জি। স্লাইপেন
সূত্র

এখনও গ্রহণযোগ্য। চমৎকার কাজ!

— ওয়েলওয়েস্ট

0

পিএইচপি, 80 বা 63 বাইট

উপর খাসি আমি ব্যবহার করা আবশ্যক নির্ভর করে $argvবা ব্যবহার করতে পারেন $xএবং $yপরিবর্তে।

for($i=1<<array_sum($argv);$i--;)echo$argv[2]-substr_count(decbin($i),1)?_:$i._;

আন্ডারস্কোর দ্বারা ডিলিমেটেড ক্রমে সমস্ত মিলে যাওয়া সংখ্যাগুলি মুদ্রণ করে।
ফাইলের নামটি অবশ্যই একটি অঙ্ক দিয়ে শুরু করা উচিত নয়।

কোন বিল্টিন, 88 বা 71 বাইট নেই

for($i=1<<array_sum($argv);$i--;print$c?_:$i._)for($n=$i,$c=$argv[2];$n;$n>>=1)$c-=$n&1;

প্রতিটি সংখ্যার পরে কেবল একটি আন্ডারস্কোরের জন্য একটি করে বাইট যুক্ত করুন।

@ ওয়েলিওয়েস্ট: আপনি ঠিক বলেছেন। আমার জন্য 3 বাইট সংরক্ষণ করেfor($i=-1;++$i<...;)

— তিতাস
সূত্র

0

পার্ল 6 , 64 62 49 বাইট

{(0 x$^a~1 x$^b).comb.permutations.map({:2(.join)}).sort.squish}

{[~](0,1 Zx@_).comb.permutations.map({:2(.join)}).sort.squish}

{(^2**($^x+$^y)).grep:{.base(2).comb('1')==$y}}

ব্যাখ্যা:

# bare block lambda with two placeholder parameters ｢$^x｣ and ｢$^y｣
{
  # Range of possible values
  # from 0 up to and excluding 2 to the power of $x+$y
  ( ^ 2 ** ( $^x + $^y ) )

  # find only those which
  .grep:

  # bare block lambda with implicit parameter of ｢$_｣
  {

    # convert to base 2
    # ( implicit method call on ｢$_｣ )
    .base(2)

    # get a list of 1s
    .comb('1')

    # is the number of elements the same
    ==

    # as the second argument to the outer block
    $y
  }
}

say {(0..2**($^x+$^y)).grep:{.base(2).comb('1')==$y}}(3,2)
# (3 5 6 9 10 12 17 18 20 24)

— ব্র্যাড গিলবার্ট বি 2 গিলস
সূত্র

দশমিকের সাথে সমস্ত বাইনারি সংমিশ্রণ

জেলি , 8 বাইট

কিভাবে এটা কাজ করে

পাইথন, 60 বাইট

কিভাবে এটা কাজ করে

গণিত, 59 57 বাইট

সিজেএম ( 15 14 বাইট)

জাপট , 16 বাইট

কিভাবে এটা কাজ করে

বিকল্প সংস্করণ, 17 বাইট

রুবি, 63 বাইট

পাইথ - 11 বাইট

পাইথন 2 - 105 99 বাইট

গণিত, 47 বাইট

ম্যাটল্যাব 57 + 6

এমএটিএল , 9 বাইট

ব্যাখ্যা

আসলে, 21 বাইট

গ্রোভি 74 বাইট, 93 বাইট বা 123 বাইট

74 বাইট সমাধান

93 বাইট সমাধান

123 বাইট সমাধান

জাভাস্ক্রিপ্ট (ফায়ারফক্স 48), 85 76 74 71 70 বাইট

জাভাস্ক্রিপ্ট (ES6), 109 87 79 78 71 70 বাইট

গ্রোভি 80 বাইট

80 বাইট সমাধান

সি (জিসিসি) , 72 68 বাইট

পিএইচপি, 80 বা 63 বাইট

পার্ল 6 , 64 62 49 বাইট

ব্যাখ্যা: