OEIS এর বিবর্তন


56

এই চ্যালেঞ্জের মধ্যে লক্ষ্যটি হ'ল অন ​​লাইন এনসাইক্লোপিডিয়া অফ ইন্টিজার সিকোয়েন্সগুলি একবারে এক ক্রম পুনরায় তৈরি করা। হ্যালো ওয়ার্ল্ডের বিবর্তনের অনুরূপ , প্রতিটি উত্তর পূর্ববর্তী উত্তরের উপর নির্ভর করে।

সময়ের সাথে সাথে, এই চ্যালেঞ্জটি ওইআইএস ক্রমগুলির একটি "পারিবারিক গাছ" তৈরি করবে। এই গাছে যুক্ত করা সহজ।

  1. পূর্ববর্তী উত্তরটি সন্ধান করুন যা গাছের যে কোনও গভীরতায় এন হতে পারে।
  2. উত্তরটির ক্রম দ্বারা উত্পন্ন প্রথম এন সংখ্যাগুলি নির্ধারণ করুন।
  3. ওইআইএস-এ একটি ক্রম সন্ধান করুন যা সেই একই সংখ্যার সাথে শুরু হয় এবং যা আগে ব্যবহার করা হয়নি।
  4. আপনি সদ্য পাওয়া এই নতুন ক্রমটি তৈরি করতে একটি প্রোগ্রাম লিখুন।
  5. আপনার উত্তর গভীরতা এন + 1 হিসাবে জমা দিন

যেহেতু আপনার উত্তর স্তরটি স্কোরকে প্রভাবিত করে, তাই আপনার উত্তরটি সর্বদা গভীরতম স্তরে আপনার গাছে যুক্ত করা উচিত। আপনি যদি নিজের উত্তরটি গাছের কোথাও ফিট করতে না পারেন তবে আপনি গাছের একটি নতুন শাখা শুরু করতে পারেন এবং উত্তরটি গভীরতা 1 হিসাবে রাখতে পারেন।

উত্তর প্রয়োজনীয়তা

সিকোয়েন্স আউটপুট করার কয়েকটি উপায় রয়েছে।

প্রথম বিকল্পটি এমন একটি প্রোগ্রাম বা ফাংশন লিখতে হয় যা কোনও নম্বর (এসটিডিআইএন থেকে বা একটি আর্গুমেন্ট হিসাবে) ইনপুট করে এবং আপনার নির্বাচিত অনুক্রমের মধ্যে নবম সংখ্যাটি প্রদান করে। আপনি ধরে নিতে পারেন যে অনুক্রমটি এন এর জন্য সংজ্ঞায়িত হবে এবং এন এবং এস_এন "যুক্তিসঙ্গত আকারের" (যাতে এটি উপচে পড়বে না)। আপনি যে কোনও যুক্তিসঙ্গত সূচীও ব্যবহার করতে পারেন, যেমন 0 সূচক, 1 সূচক, বা অনুক্রমের OEIS পৃষ্ঠায় "অফসেট" এর অধীনে তালিকাবদ্ধ সূচক, তাতে কোনও সমস্যা নেই। প্রথম সূচক দ্বারা উত্পাদিত শব্দটি অবশ্যই ওইআইএস প্রবেশের প্রথম শর্তের সাথে মেলে।

দ্বিতীয় বিকল্পটি হ'ল এমন একটি প্রোগ্রাম বা ফাংশন লিখুন যা একটি নম্বর দেয় এবং সিকোয়েন্সের প্রথম এন পদগুলি দেয়। আউটপুটটির প্রথম শর্তগুলি অবশ্যই ওইআইএস এন্ট্রির প্রথম শর্তাদি হওয়া উচিত (আপনি প্রথম কয়েকটি শর্ত ছেড়ে দিতে পারবেন না)। ধারাবাহিক শর্তাদি অ-অঙ্কের অক্ষরের ইচ্ছামত স্ট্রিং দ্বারা সীমিত করা উচিত, সুতরাং 0,1 1.2/3,5;8,11কাজ করে তবে 011235811গণনা হয় না but

তৃতীয় বিকল্পটি এমন একটি প্রোগ্রাম তৈরি করা যা সংখ্যার ধারাবাহিক প্রবাহকে আউটপুট করে। একইভাবে দ্বিতীয় বিকল্পের জন্য, অবশ্যই টানা শর্তাবলীর মধ্যে ডিলিমিটার থাকতে হবে।

আপনার উত্তরে স্ট্যাক স্নিপেট পার্সিং সহায়তা করতে এই জাতীয় শিরোনাম থাকা উচিত :

 # [language], [number] bytes, depth [number], A[new sequence] from A[old sequence] 

আপনার উত্তরে ক্রম উত্পন্ন করার জন্য কোডটি থাকা উচিত, সাথে সাথে কোনও বংশধরদের প্রথম কয়েকটি শর্ত থাকতে হবে। এই কয়েকটি শব্দের সঠিক শব্দের আগেterms: হওয়া উচিত যাতে নিয়ামক এগুলি গাছের চিত্রের অংশ হিসাবে ব্যবহার করতে পারেন। আপনি যে ক্রমটি বেছে নিয়েছেন তার বিবরণ লিখতেও সুপারিশ করা হয়।

যদি আপনার পোস্টটির গভীরতা 1 উত্তর হয় এবং এর কোনও পূর্বপুরুষ from A[number]না থাকে তবে আপনার শিরোনামের মধ্যে কেবল এটি বাদ দেওয়া উচিত ।

এখানে একটি উদাহরণ উত্তর:

# Perl, 26 bytes, depth 3, A026305 from A084912

    various code here
    and here

The next answer should match the following terms:

    1, 4, 20

This sequence is .... and does ....

শেইনিং প্রয়োজনীয়তা

এই চ্যালেঞ্জটিকে আরও সুষ্ঠু করার জন্য, এমন কোনও বিধিনিষেধ রয়েছে যাতে কোন উত্তর আপনি নিজেরে চেইন করতে পারেন। এই নিয়মগুলি বেশিরভাগই একক ব্যক্তিকে নিজে গাছের একটি সম্পূর্ণ শাখা তৈরি করতে বা প্রচুর "মূল" নোডের মালিক হতে বাধা দেয়।

  • আপনি নিজেকে চেইন করতে পারবেন না।
  • আপনি নিজের পূর্বসূরীর কাছে দুটি উত্তর সরাসরি চেইন করতে পারবেন না।
  • আপনি একাধিক "স্তর 1" উত্তর দিতে পারবেন না।

এছাড়াও, পূর্বপুরুষ যদি গভীরতা N এর হয়ে থাকেন তবে প্রয়োজনীয় সংখ্যার চেয়ে বেশি শর্তাদি সম্মত হলেও আপনার পোস্টের গভীরতা N + 1 থাকতে হবে।

স্কোরিং

একজন ব্যবহারকারী হিসাবে আপনার স্কোর হ'ল আপনার সমস্ত উত্তরগুলির স্কোরের যোগফল । একক উত্তরের স্কোর নিম্নলিখিত সূত্র দ্বারা নির্ধারিত হয়:

Answer Score = Sqrt(Depth) * 1024 / (Length + 256)

এই স্কোরিং সিস্টেমটি ব্যবহারকারীদের প্রচুর গভীর উত্তর জমা দিতে উত্সাহিত করবে। সংক্ষিপ্ত উত্তরগুলি দীর্ঘতর উত্তরের চেয়ে বেশি পছন্দ করা হয় তবে গভীরতার অনেক বেশি প্রভাব রয়েছে।

নীচে একটি স্ট্যাক স্নিপেট যা লিডারবোর্ড তৈরি করে পাশাপাশি সমস্ত উত্তরগুলির একটি ট্রি ডায়াগ্রাম তৈরি করে। আমি এই কোডের অনেকটির জন্য উত্স হিসাবে মার্টিন বাটনার এবং ডি 3 ননবকে ধন্যবাদ জানাতে চাই । সম্পূর্ণ ফলাফলগুলি দেখতে আপনার "পূর্ণ স্ক্রিন" এ ক্লিক করা উচিত।

function answersUrl(t){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+t+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(t){answers.push.apply(answers,t.items),t.has_more?getAnswers():process()}})}function shouldHaveHeading(t){var e=!1,r=t.body_markdown.split("\n");try{e|=/^#/.test(t.body_markdown),e|=["-","="].indexOf(r[1][0])>-1,e&=LANGUAGE_REG.test(t.body_markdown)}catch(a){}return e}function shouldHaveScore(t){var e=!1;try{e|=SIZE_REG.test(t.body_markdown.split("\n")[0])}catch(r){}return e}function getAuthorName(t){return t.owner.display_name}function decodeEntities(t){return $("<textarea>").html(t).text()}function process(){answers=answers.filter(shouldHaveScore).filter(shouldHaveHeading),answers.reverse();var t={},e=[],r=1,a=null,n=1,s=[];answers.forEach(function(t){var r=t.body_markdown.split("\n")[0],a=getAuthorName(t),n=r.match(SEQUENCE_REG)[0];n=n.trim();var o="from A000000";PARENT_REG.test(r)&&(o=r.match(PARENT_REG)[0]),o=o.substring(5).trim(),"A000000"==o&&(o="OEIS");var i="";SEQDATA_REG.test(t.body_markdown)&&(i=t.body_markdown.match(SEQDATA_REG)[1]);for(var u=!0,c=0;c<e.length;++c)u=u&&!(e[c]===n);for(var l=!0,c=0;c<e.length;++c)l=!(!l||e[c]===n||e[c]===n+a||e[c]===o+a);e.push(n),e.push(n+a),e.push(o+a),u&&data.push({name:n,parent:o,term:i+" : ",author:decodeEntities(a),URL:t.share_link}),l&&s.push(t)}),answers.sort(function(t,e){var r=t.body_markdown.split("\n")[0].match(SEQUENCE_REG),a=e.body_markdown.split("\n")[0].match(SEQUENCE_REG);return a>r?-1:r>a?1:void 0}),answers.forEach(function(e){var o=e.body_markdown.split("\n")[0],i=(o.match(NUMBER_REG)[0],(o.match(SIZE_REG)||[0])[0]),u=parseInt((o.match(DEPTH_REG)||[0])[0]).toString(),c=o.match(SEQUENCE_REG)[0],l="from A000000";PARENT_REG.test(o)&&(l=o.match(PARENT_REG)[0]),l=l.substring(5);var d=o.match(LANGUAGE_REG)[1];d.indexOf("]")>0&&(d=d.substring(1,d.indexOf("]")));for(var p=getAuthorName(e),E=!1,h=0;h<s.length;++h)E=E||s[h]===e;if(E){var f=jQuery("#answer-template").html();i!=a&&(n=r),a=i,++r;var m=1024*Math.pow(parseInt(u),.5)/(parseInt(i)+256);f=f.replace("{{SEQUENCE}}",c).replace("{{SEQUENCE}}",c).replace("{{NAME}}",p).replace("{{LANGUAGE}}",d).replace("{{SIZE}}",i).replace("{{DEPTH}}",u).replace("{{LINK}}",e.share_link),f=jQuery(f),jQuery("#answers").append(f),t[p]=t[p]||{lang:d,user:p,size:"0",numanswers:"0",link:e.share_link},t[p].size=(parseFloat(t[p].size)+m).toString(),t[p].numanswers=(parseInt(t[p].numanswers)+1).toString()}});var o=[];for(var i in t)t.hasOwnProperty(i)&&o.push(t[i]);o.sort(function(t,e){return parseFloat(t.size)>parseFloat(e.size)?-1:parseFloat(t.size)<parseFloat(e.size)?1:0});for(var u=0;u<o.length;++u){var c=jQuery("#language-template").html(),i=o[u];c=c.replace("{{RANK}}",u+1+".").replace("{{NAME}}",i.user).replace("{{NUMANSWERS}}",i.numanswers).replace("{{SIZE}}",i.size),c=jQuery(c),jQuery("#languages").append(c)}createTree()}function createTree(){function t(){var t=i.nodes(root).reverse(),e=i.links(t);t.forEach(function(t){t.y=180*t.depth});var r=c.selectAll("g.node").data(t,function(t){return t.id||(t.id=++o)}),a=r.enter().append("g").attr("class","node").attr("transform",function(t){return"translate("+t.y+","+t.x+")"});a.append("a").attr("xlink:href",function(t){return t.URL}).append("circle").attr("r",10).style("fill","#fff"),a.append("text").attr("x",function(){return 0}).attr("y",function(){return 20}).attr("dy",".35em").attr("text-anchor",function(){return"middle"}).text(function(t){return t.term+t.name}).style("fill-opacity",1),a.append("text").attr("x",function(){return 0}).attr("y",function(){return 35}).attr("dy",".35em").attr("text-anchor",function(){return"middle"}).text(function(t){return t.author}).style("fill-opacity",1);var n=c.selectAll("path.link").data(e,function(t){return t.target.id});n.enter().insert("path","g").attr("class","link").attr("d",u)}var e=data.reduce(function(t,e){return t[e.name]=e,t},{}),r=[];data.forEach(function(t){var a=e[t.parent];a?(a.children||(a.children=[])).push(t):r.push(t)});var a={top:20,right:120,bottom:20,left:120},n=3203-a.right-a.left,s=4003-a.top-a.bottom,o=0,i=d3.layout.tree().size([s,n]),u=d3.svg.diagonal().projection(function(t){return[t.y,t.x]}),c=d3.select("body").append("svg").attr("width",n+a.right+a.left).attr("height",s+a.top+a.bottom).append("g").attr("transform","translate("+a.left+","+a.top+")");root=r[0],t(root)}var QUESTION_ID=49223,ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",data=[{name:"OEIS",parent:"null",term:"",author:"",URL:"https://oeis.org/"}],answers=[],page=1;getAnswers();var SIZE_REG=/\d+(?=[^\d&]*(?:&lt;(?:s&gt;[^&]*&lt;\/s&gt;|[^&]+&gt;)[^\d&]*)*,)/,DEPTH_REG=/\d+, A/,NUMBER_REG=/\d+/,LANGUAGE_REG=/^#*\s*([^,]+)/,SEQUENCE_REG=/A\d+/,PARENT_REG=/from\s*A\d+/,SEQDATA_REG=/terms:\s*(?:(?:-)?\d+,\s*)*((?:-)?\d+)/;
body{text-align: left !important}#answer-list{padding: 10px; width: 550px; float: left;}#language-list{padding: 10px; width: 290px; float: left;}table thead{font-weight: bold;}table td{padding: 5px;}.node circle{fill: #fff; stroke: steelblue; stroke-width: 3px;}.node text{font: 12px sans-serif;}.link{fill: none; stroke: #ccc; stroke-width: 2px;}
<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script><script src="http://d3js.org/d3.v3.min.js"></script><link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"><div id="answer-list"> <h2>Sequence List</h2> <table class="answer-list"> <thead> <tr> <td>Sequence</td><td>Author</td><td>Language</td><td>Size</td><td>Depth</td></tr></thead> <tbody id="answers"></tbody> </table></div><div id="language-list"> <h2>Leaderboard</h2> <table class="language-list"> <thead> <tr> <td>Rank</td><td>User</td><td>Answers</td><td>Score</td></tr></thead> <tbody id="languages"></tbody> </table></div><table style="display: none"> <tbody id="answer-template"> <tr> <td><a href="https://oeis.org/{{SEQUENCE}}">{{SEQUENCE}}</a></td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td>{{DEPTH}}</td><td><a href="{{LINK}}">Link</a> </td></tr></tbody></table><table style="display: none"> <tbody id="language-template"> <tr> <td>{{RANK}}</td><td>{{NAME}}</td><td>{{NUMANSWERS}}</td><td>{{SIZE}}</td></tr></tbody></table>


5
আপনি জানেন, আমি মনে করি এটি সম্ভবত একমাত্র দুর্দান্ত কোডগোলফ। সেক্স প্রশ্ন হতে পারে যা আমি কখনও জিজ্ঞাসা করেছি। এটি কেবল দুর্দান্ত নয়, তবে একটি সংরক্ষণাগার হিসাবে বাস্তবে কার্যকর।
টড লেহম্যান

3
ওআইআইএসটি অনলাইনে দেওয়া, অনুসন্ধানের শব্দ হিসাবে একটি অনুক্রমের এন পদ গ্রহণ করে এবং অনেকগুলি সিকোয়েন্সের জন্য গণিত বা ম্যাপেল কোড রয়েছে, এমন কোনও মেটা-এন্ট্রি লেখা সম্ভব হবে যা কোন কোডের জন্য বিদ্যমান সেরা স্কোরিং এন্ট্রি অনুসন্ধান করেছিল? ওইআইএসে যা এখানে প্রদত্ত কোনও প্রবেশের বংশধর এবং এটি পোস্ট করেছে।
এএম্লাইগ করুন

2
আমি গ্রাফটিতে চিহ্নিত করার কোনও উপায়ের প্রস্তাব দিতে পারি স্নিপেট যে নোডটি টার্মিনাল তৈরি করে, অর্থাত্ ওইআইএসে আরও গভীরতার কোনও অব্যবহৃত অনুক্রম নেই?
ক্লাদিউ

1
আমি মনে করি এই চ্যালেঞ্জটি চালিয়ে যাওয়ার একমাত্র উপায় হ'ল এমন কিছু সরবরাহ করা যেখানে আপনি আপনার ব্যবহারকারী নামটি দিয়ে থাকেন এবং এটি OEIS সমস্যাগুলির তালিকা করে যা আপনি করতে পারেন উচ্চতর গভীরতা থেকে সর্বনিম্ন। অন্যথায় পোস্টটির পরবর্তী ক্রমটি খুঁজে পেতে খুব বেশি সময় লাগে।
ক্লাদিউ

1
এসভিজি কিছুটা সংকীর্ণ।
ক্যালকুলেটরলাইন

উত্তর:


21

প্যারেন্টিক, 150 বাইট, গভীরতা 4, A000290 থেকে A000292

((()()())(()()()())((()())((()(()())))((()(())())((()()(()))(()(()()))((()(()))(()(()()))((())()))((()(()))(()(()()))((())()())))((())()()()()()()))))

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 4, 10

এটি টেটারহেড্রাল সংখ্যার ক্রম, ত্রিভুজাকার সংখ্যার 3 ডি সাধারণকরণ। এর সূত্রটি হ'ল

T(n) = n*(n+1)*(n+2)/6

প্যারেন্টিথিক একটি লিস্প-এর মতো ভাষা যা সমস্ত কিছু সংজ্ঞায়িত করতে বন্ধনী ব্যবহার করে। উপরেরটি একটি ফাংশন ()()()যা গ্রহণ করে nএবং আউটপুট দেয় T(n)। কল করুন:

((()()()())((())()()()()()()()))

সটীক

(
  define
  (() ()())

  f [][][]
  (() ()()())

  (
    lambda
    (() ())

    (
      n [[][]]
      (() (()()))
    )

    (
      div
      (() (())())

      (
        *
        (() ()(()))

        n
        (() (()()))

        (
          +
          (() (()))

          n
          (() (()()))

          1
          ((()) ())
        )

        (
          +
          (() (()))

          n
          (() (()()))

          2
          ((()) ()())
        )
      )

      6
      ((()) ()()()()()())
    )
  )
)


Test call:

(
  f
  (() ()()())

  6
  ((()) ()()()()()())
)

19
এই ভাষাটি পৃথিবীতে কী? এটি লিস্পের মধ্যবর্তী সংস্করণের মতো।
অ্যালেক্স এ।

10
@AlexA। এটি কোনও লিস্প নয়! এটি একটি পূর্ণ বিকাশ প্রতিবন্ধক!
সিজে ডেনিস

18

প্যানকেক স্ট্যাক, 118 বাইট, গভীরতা 1, A000012

Put this kindercarnavalsoptochtvoorbereidingswerkzaamheden pancake on top!
Show me a pancake!
Eat all of the pancakes!

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

1

এটি এর মধ্যে সবচেয়ে ছোট বিভাজনকে মুদ্রণ করে nএসোলাং উইকি পৃষ্ঠায় পাইথন দোভাষীর সাথে পরীক্ষিত । ~প্রোগ্রামের সমাপ্তি বোঝানোর পরে দোভাষী তার লাইনে একটি প্রত্যাশা করে, তার পরে এসটিডিএন ইনপুট আসে (যা যাইহোক উপেক্ষা করা হবে)।

প্রাসঙ্গিক নির্দেশাবলী:

Put this <blah> pancake on top!                # Push length of <blah> 
Show me a pancake!                             # Output top of stack as char
Eat all of the pancakes!                       # Terminate the program

পূর্ববর্তী উত্তর

Put this  pancake on top!
[]
Put this kindercarnavalsoptochtvoorbereidingswerkzaamheden pancake on top!
Show me a pancake!
Put this delectable pancake on top!
Show me a pancake!
If the pancake is tasty, go over to "".

এটি একটি অসীম লুপে মুদ্রণ করে। অতিরিক্ত নির্দেশাবলী:

[<blah>]                                       # Define the label <blah>
If the pancake is tasty, go over to "<blah>".  # If top of stack nonzero, go to label

অন্যান্য নির্দেশাবলী রয়েছে, তবে এরপরেও প্যানকেক স্ট্যাকটি সাধারণত ব্যবহার করা খুব জটিল,

দুর্ভাগ্যক্রমে, পাইথন ইন্টারপ্রেটারে লেবেল সংক্রান্ত বাগটি প্রতিরোধের জন্য এই প্রোগ্রামের প্রথম লাইনটি প্রয়োজনীয় বলে মনে হচ্ছে।


17

পাইথন, 31 বাইট, গভীরতা 4, A000045 থেকে A010060

lambda n:sum(map(ord,bin(n)))%2

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 1, 0

এটি আমার পছন্দের এবং এটি থু-মর্স ক্রম । এর কমপক্ষে দুটি সংজ্ঞা রয়েছে:

  • এর বাইনারি সম্প্রসারণে n(উপরে ব্যবহৃত) এবং এর সমতুল্যতা
  • 0 দিয়ে শুরু করে ক্রমটি পেয়েছে, তারপরে বারবার এখনও পর্যন্ত ক্রমের বিটওয়াইড পরিপূরক যুক্ত করে (যেমন 0 -> 01 -> 0110 -> 01101001 -> ...)

এই ক্রমটি সম্পর্কে অনেক দুর্দান্ত জিনিসগুলির মধ্যে একটি হ'ল আমরা যদি কোনও কচ্ছপ ধরি এবং করি:

import turtle

turtle.speed(0)
n = 12

# Calculate first 2^n of Thue-Morse
tm = map(lambda n:sum(map(ord,bin(n)))%2, range(2**n)) 

# Move to top left
turtle.penup()
turtle.setx(-300)
turtle.sety(300)
turtle.pendown()

# For each num, go forward a unit if 0, or turn left 120 degrees if 1
for m in tm:
    if m == 0:
        turtle.forward(1)

    elif m == 1:
        turtle.left(120)

turtle.hideturtle()
turtle.mainloop()

আমরা এটি পেয়েছি:

এখানে চিত্র বর্ণনা লিখুন

চেনা চেনা?


15

মারিওল্যাং, 265 বাইট, গভীরতা 3, A006370 থেকে A016957

                           <
         =================="
               (((+)< ))+(<
              ======" ===="
               >-))+!  >-(!
               "====#  "==#
          >-(>[!))   >[!(  !
          "====#=======#===#
;)++++++>[!))++++:
==========#=======

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

4, 10, 16

ক্রমটি কেবল গাণিতিক অগ্রগতি 6n + 4

মারিওল্যাং হ'ল সুপার মারিও-এর উপর ভিত্তি করে একটি রহস্যময় প্রোগ্রামিং ভাষা। গণনাগুলি ব্রেইনফাক- মতো পদ্ধতিতে করা হয় - এমন একটি কোষের টেপ রয়েছে যা আপনি বৃদ্ধি / হ্রাস করতে পারবেন।

এখানে সম্পর্কিত বিএফ-এর মতো আদেশগুলি হ'ল:

+      Increment current memory cell
-      Decrement current memory cell
(      Move memory pointer left
)      Move memory pointer right
;      Numeric input
:      Numeric output
[      Skip next instruction is current cell is zero

তাহলে মারিও কোথায়? আচ্ছা মারিও হ'ল আপনার নির্দেশের পয়েন্টার এবং তিনি বামদিকে (যেখানে ;আছেন) শুরু করেন। মারিও যতক্ষণ না মাটিতে থাকে ততক্ষণ নির্দেশনা কার্যকর করে চলে =এবং যখন সে পড়ে তখন প্রোগ্রামটি সমাপ্ত হয়।

এর জন্য সম্পর্কিত নির্দেশাবলী হ'ল:

=      Ground for Mario to stand on
<      Make Mario move leftward
>      Make Mario move rightward
!      Make Mario stop moving
#      Elevator start
"      Elevator end

সব মিলিয়ে প্রোগ্রামটি এটি করে:

Put input (n) in cell 0
Increment cell 1 to 6
While cell 1 is not zero...
    Decrement cell 1
    Move n from cell 0 to cells 2, 3
    Move n from cell 2 to cell 0
Increment cell 3 by 4
Output as num

রুবি ইন্টারপ্রেটারের সাথে পরীক্ষিত। নোট করুন যে ভাষার অনেক অপরিজ্ঞাত আচরণ রয়েছে, যেমন মারিও পড়ার সাথে সাথে তাঁর নির্দেশনাগুলির কী ঘটে তাই আমি সেগুলির কোনও এড়াতে চেষ্টা করেছি।


12

Brainfuck, 2 বাইট, গভীরতা 2, A001477 থেকে A000030

,.

A000030 হ'ল অ-নেতিবাচক পূর্ণসংখ্যার প্রাথমিক সংখ্যাগুলির ক্রম, তাই এটি কেবল প্রথম অঙ্কের অক্ষরটি পড়ে আবার ফিরে লিখে। পরবর্তী ক্রমটি শর্তাবলী দিয়ে শুরু করা উচিত:

0, 1

12
এটি আমার পক্ষে দেখা সবচেয়ে স্বল্পতম ব্রেনফাক প্রোগ্রাম হতে পারে।
অ্যালেক্স এ।

9

পিট, 16 বাইট, গভীরতা 3, A000030 থেকে A000035

এখানে চিত্র বর্ণনা লিখুন

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 0

এটি পিট, সুতরাং "বাইটস" সত্যিই কোডেল। এখানে এটি একটি বৃহত্তর কোডেলের আকারে রয়েছে:

এখানে চিত্র বর্ণনা লিখুন

প্রোগ্রামটি কেবল মডিউলগুলি পড়ে nএবং আউটপুট করে n


9

মার্বেলাস, 7 বাইট, গভীরতা 3, A000027 থেকে A011760

এই সাইটটি মার্বেলাস উত্তরটি দেখে বেশ কিছুদিন হয়েছে !

}0
<D++

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 2, 3

আপনি es1024 এর স্ট্যাক স্নিপেট ইন্টারপ্রেটারে কোডটি চেষ্টা করতে পারেন । কমান্ড-লাইন আর্গুমেন্টের মাধ্যমে দেওয়া হয় এবং আপনার "দশমিক সংখ্যা হিসাবে আউটপুট প্রদর্শন করুন" নির্বাচন করা উচিত। অন্যথায়, ফলাফলটি বাইট মান হিসাবে আউটপুট হবে, যা প্রযুক্তিগতভাবেও ভাল

ক্রমটি হ'ল "মার্কিন যুক্তরাষ্ট্রে লিফট বোতামগুলির ক্রম", অর্থাৎ ১৩ টি বাদে সমস্ত ধনাত্মক পূর্ণ সংখ্যা। :)

মার্বেলাস হ'ল একটি 2 ডি ভাষা যেখানে ডেটা কোডের মাধ্যমে মার্বেল আকারে প্রবাহিত হয় (বাইট মান) গ্রিডের নিচে falling }0প্রথম কমান্ড-লাইন আর্গুমেন্টের সাথে প্রতিস্থাপিত হয়। <Dএকটি স্যুইচ যা 13 টিরও কম মার্বেলগুলিতে খালি সেল হিসাবে কাজ করে (এটি Dবেসের 36 তে থাকে), যাতে 1 থেকে 12 টি ইনফ্যাক্ট করে পাস করে। যদি মার্বেলটি 13 এর সমান বা তার বেশি হয় তবে মার্বেলটি ডানদিকে বিভক্ত হয় এবং এর মধ্য দিয়ে যায় ++যা মান 1 দিয়ে বৃদ্ধি করে উভয় ক্ষেত্রেই মার্বেলটি বোর্ডের বাইরে পড়ে, যা তার মানটি মুদ্রণ করে।


8

রেল , 56 বাইট, গভীরতা 4, A02335 থেকে A033547

$'main'
 0/aima19-@
@------e<
  /()(!!)-@
@-()m5a()m3do#

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 2, 6, 14

প্রোগ্রামটি nএসটিডিএন এবং আউটপুটগুলি থেকে পড়েছিল n*(n^2+5)/3, যা 1940 এর দশক থেকে পারমাণবিক শেল মডেলটির যাদু সংখ্যার একটি অনুমান ছিল ।

রেল একটি 2 ডি ভাষা যা ট্রেনের ট্র্যাকগুলির চারপাশে থিমযুক্ত। উপরের কোডটি প্রতিচ্ছবিগুলি ব্যবহার করে গল্ফ করা হয়েছে @যা ট্রেনের দিকনির্দেশকে বিপরীত করে, নতুন লাইনের সংখ্যা হ্রাস করার জন্য। এখানে এটি নিয়ন্ত্রিত:

$ 'main'
 \
  0
   \ /--aima19--\
    |           |
    \--e-------<
                \
                 \-(!n!)-(n)-(n)-m-5-a-(n)-m-3-d-o-#

নোট করুন কীভাবে রেল উপরে বাম দিকে শুরু হয় এবং নীচে-ডানদিকে উল্লম্বভাবে চলতে শুরু করে।

ব্যবহৃত স্ট্যাক ম্যানিপুলেশন কমান্ডগুলি হ'ল:

0-9       Push 0-9 respectively
e         Push t (true) if EOF, else f (false)
i         Input char
o         Output
a         Add
m         Multiply
(!n!)     Store top of stack as variable n
(n)       Push variable n to stack
#         Halt program

জংশনে ট্রেন শাখাগুলি >v<^, স্ট্যাকের শীর্ষটি সত্য হলে ডানদিকে ঘুরিয়ে, অন্যথায় মিথ্যা হলে বামে।


8

তারকী, 22 বাইট, গভীরতা 4, A000142 থেকে A008619

      + + +*,  +   **.

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

1, 1, 2, 2

ক্রমটি ইতিবাচক পূর্ণসংখ্যা নিয়ে দুবার পুনরাবৃত্তি করে। প্রোগ্রামটি STDIN থেকে একটি সংখ্যাতে পড়ে এবং গণনা করে 1 + floor(n/2)

স্টারি হ'ল রুবিতে প্রয়োগ করা এক গুরূত্বপূর্ণ ভাষা যা রুবিতে গুপ্ত ভাষা তৈরির উপর একটি বইয়ের অংশ ছিল। প্রতিটি নির্দেশের একটির আগে স্পেসের সংখ্যা দ্বারা নির্ধারিত হয় +*.,`'। অন্যান্য সমস্ত অক্ষর উপেক্ষা করা হয়, সুতরাং উপরের সমতুল্য

      +
 + +*,
  +   *
*.

যা দেখতে অনেক বেশি তারার! (পূর্ববর্তী স্থানগুলি নোট করুন)

সম্পর্কিত আদেশগুলি হ'ল:

Spaces     Final      Instruction
------     -----      -----------
n >= 5     +          Push n-5 to stack
1          +          Duplicate top of stack
0 mod 5    *          Add
0 mod 2    ,          Input num
2          +          Swap top 2
3 mod 5    *          Divide
0 mod 2    .          Output num

পূর্ববর্তী উত্তর, 53 বাইট

      +` +.               + + .  + +.  + .      +* +'

এটি পরিবর্তে ক্রম বিজ্ঞাপন infinitum উত্পন্ন। কিছু অতিরিক্ত কমান্ড হ'ল:

Spaces     Final      Instruction
------     -----      -----------
1 mod 2    .          Output as ASCII char
n          `          Mark a label n
n          '          Pop and if nonzero, jump back to label n

7

ম্যাথমেটিকা, 20 বাইট, গভীরতা 6, এ 104631 থেকে A037965

Binomial[2#-2,#-1]#&

এটি একটি নামবিহীন ফাংশন যা কেবল ক্রমের সংজ্ঞাটি গণনা করে। পরবর্তী ক্রমটি শর্তাবলী দিয়ে শুরু করা উচিত:

0, 1, 4, 18, 80, 350

লিফ নোড (অন্য কোনও অনুক্রম নেই)
ক্যালকুলেটরফলাইন

7

সিজাম, 34 বাইট, গভীরতা 14, এ 238263 থেকে A157271

qi_,_m*{~2@#3@#*}$<::+1f&_:+\1-,e>

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7

তবে এমন কোনও বাম নেই যা ইতিমধ্যে সম্পন্ন হয় নি।

আসুন D(n)প্রথম n3-মসৃণ সংখ্যার সেট হয়ে যাক : এটি হ'ল পূর্ণসংখ্যা যার প্রধান কারণগুলির একটি উপসেট {2, 3}। যাক S(n)এর বৃহত্তম উপসেট হতে D(n)যার মধ্যে নিজেই ফর্মের কোনও উপসেট {x, 2x}বা থাকে না {y, 3y}। তারপরে A157271 এর আকার S(n)


1
আহ্ সুন্দর, আমি এটার দিকে চেয়ে ছিলাম তবে তাদের ব্যাখ্যাটির অর্থ কী তা পুরোপুরি পরিষ্কার ছিল না। আপনার অনেক পরিষ্কার।
ক্লদিউ

6

A000030 থেকে গল্ফস্ক্রিপ্ট, 3 বাইট, গভীরতা 3, A000290

~2?

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 4

এই ক্রমটি কেবল বর্গ সংখ্যা, সুতরাং প্রোগ্রামটি একটি সংখ্যা নেয় এবং তার বর্গকে আউটপুট করে।


6

উপস্থাপন করুন , 16 বাইট, গভীরতা 1, A000211

3(v!  v)
4 ^+2-^

আমি ভেবেছিলাম আমি একটি কম সংখ্যক প্রাথমিক নম্বর দিয়ে একটি গাছ শুরু করব। এই সংজ্ঞা সঙ্গে একটি সাধারণ ফিবানচি ক্রম a(0) = 4, a(1) = 3, a(n) = a(n-1) + a(n-2) - 2। ফলস্বরূপ, এটি বেশিরভাগ ক্ষেত্রে আমার প্রিলিউড ফিবোনাচি সমাধানের একটি সহজ অভিযোজন । উপরেরটি এমন একটি প্রোগ্রাম যা সংখ্যার একটি অনন্ত স্ট্রিম প্রিন্ট করে। এটি পাইথন ইন্টারপ্রেটারকে ধরে নিয়েছে যা পৃথক অক্ষরের পরিবর্তে সংখ্যাগুলি আউটপুট করে।

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

4

6

A000012 থেকে ক্লিপ, 0 বাইট, গভীরতা 2, A000027

একটি নম্বর দেওয়া n, nthক্রমটিতে নম্বর মুদ্রণ করে1, 2, 3, 4...

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 2

5

জে, 4 বাইট, গভীরতা 4, A000290 থেকে A001563

(*!)

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 4, 18

এই ক্রমটি হল এর গুণক দ্বারা গুণিত সংখ্যা। জে ইন (fg)xহয় f(x,g(x))এখানে x*factorial(x)


আপনি 2 বাইটের জন্য প্রথম বন্ধনী ছেড়ে দিতে পারেন:*!
27uʎs

@ .uʎs আমি কারও সাথে তর্ক করব না যে বলে যে আমি তাদের স্কোরের 1/128 অংশের জন্য ছাড়তে পারি না। :)
এলোমেলো

5

ম্যাথমেটিকা, 48 বাইট, গভীরতা 5, এ 1001563 থেকে A104631

SeriesCoefficient[((x^5-1)/(x-1))^#,{x,0,2#+1}]&

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 4, 18, 80

দীর্ঘ ফাংশনের নামগুলি বাদ দিয়ে ম্যাথামেটিকাকে একেবারে এই চ্যালেঞ্জের মধ্যে ফেলেছে। এই এক কেবল x^(2n+1)প্রসারিত এর সহগ

(1 + x + x^2 + x^3 + x^4)^n

5

উপাদান , 13 বাইট, গভীরতা 3, A000030 থেকে A000045

1_'0[3:~2@+]`

A000045 ফিবোনাচি সংখ্যাগুলি উপস্থাপন করে। ক্রমের প্রতিটি পদটি পূর্ববর্তী দুটি পদগুলির যোগফল। এটি উল্লেখযোগ্য কারণ একটানা পদগুলির মধ্যে অনুপাত স্বর্ণের অনুপাতের কাছে পৌঁছায়, এটি ফাই নামেও পরিচিত। কিছুটা মজার বিষয় হল, OEIS এন্ট্রিটি 0, 1সাধারণের পরিবর্তে শুরু হয় 1, 1। পরবর্তী উত্তর শর্তাবলী মেলে উচিত:

0, 1, 1

5

উপস্থাপন করুন , 1 বাইট, গভীরতা 2, A001477 থেকে A000004

!

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 0

এই প্রোগ্রামটি nইনপুট হিসাবে গ্রহণ করে, একে একে পুরোপুরি উপেক্ষা করে এবং শূন্য ধ্রুবককে আউটপুট দেয়। NUMERIC_OUTPUT = Trueপাইথন ইন্টারপ্রেটারে এটির প্রয়োজন ।

প্রিলেড সম্পর্কে দুর্দান্ত জিনিসটি হ'ল এটিতে স্ট্যাকের নীচে জিরোগুলির অসীম সরবরাহ রয়েছে, সুতরাং যা দরকার ছিল তা ছিল একক আউটপুট কমান্ড।


4

পার্ল, 10 বাইট, গভীরতা 1, A001477

জিনিসগুলি বন্ধ করতে, এখানে একটি সাধারণ ক্রম।

print$_=<>

এটি ইনপুট নম্বর মুদ্রণের মাধ্যমে অ-নেতিবাচক সংখ্যা 0, 1, 2, 3 ইত্যাদি উপস্থাপন করে। পরবর্তী ক্রমটি শর্তাবলী দিয়ে শুরু করা উচিত:

0

4

A002275 থেকে গল্ফস্ক্রিপ্ট, 9 বাইট, গভীরতা 4, A051682

~.9*7-*2/

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 11, 30

এটি কেবল ওইআইএস পৃষ্ঠায় পাওয়া হেনডেকাগোনাল সংখ্যাগুলির সূত্র ব্যবহার করে।


4

ডেডফিশ, 4 বাইট, গভীরতা 2, A001477 থেকে A005563

isdo

এই ক্রমটি সংজ্ঞায়িত করা হয় (n+1)^2-1, যা ঠিক এই প্রোগ্রামটি করে। যেহেতু ডেডফিশের কোনও ইনপুট নেই তাই এটি ধরে নেয় যে সংগ্রহকারীটি পছন্দসই ইনপুট নম্বরটিতে রয়েছে। পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

0, 3

4

এপিএল, 13 বাইট, গভীরতা 4, এ 1000142 থেকে A000108

{(⍵!2×⍵)÷⍵+1}

কাতালান সংখ্যা! এর জন্য সূচক শূন্য থেকে শুরু হয়। পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 1, 2, 5

4

গল্ফস্ক্রিপ্ট, 31 বাইট, গভীরতা 11, এ 242681 থেকে A029030

~][11.(2]{:C;{{.C-.)0>}do;}%}/,

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 7

তবে এটি সক্ষম হবে না: এটি গাছের পাতা। এই ক্রমটি হ'ল মান 1, 2, 10 এবং 11 এর মুদ্রা দিয়ে পরিবর্তন দেওয়ার বিভিন্ন উপায়।


3
A258000: 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 7, 42 - তারা
কোডগলফ.স্ট্যাকেক্সেঞ্জ

4

A001333 থেকে রেটিনা , 1 বাইট, গভীরতা 3, A055642

.

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 1, 1

আমি মনে করি এই প্রথম আমি প্রতিস্থাপন মোড ব্যতীত অন্য কোনও ক্ষেত্রে রেটিনা ব্যবহার করেছি। যদি কোনও বিকল্প ব্যতীত কেবল একটি একক ফাইল দেওয়া হয়, রেটিনা ম্যাচ মোড ধরে নেয়, যা ইনপুটটিতে প্রদত্ত রেজেক্সের মিলগুলির সংখ্যা ডিফল্টরূপে গণনা করে। এই রেজেক্সটি .কোনও চরিত্রের সাথে মেলে। অতএব, এই প্রোগ্রামটি ইনপুটটির সংখ্যার সংখ্যাটি প্রদান করে যা A055642।


3

A002275 থেকে ক্লিপ , 24 বাইট, গভীরতা 4, A049666

/F*5nx5[Fx?<x3O]+F(xF((x

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

0, 1, 11, 122

ক্রমটি ঠিক Fibonacci(5n)/5। একটি ব্যাখ্যা জন্য উদাহরণ পৃষ্ঠা দেখুন ।


3

A000292 থেকে ক্লিপ, 37 বাইট, গভীরতা 5, A227327

[t/m++#t4*2#t3*8#t2?%t2+*2t9]*8t]48]n

ঘূর্ণন এবং প্রতিচ্ছবি বাদ দিয়ে পার্শ্ব n এর ত্রিভুজাকার গ্রিডে দুটি পয়েন্ট চয়ন করার সম্ভাব্য উপায়গুলি। প্রদত্ত উদাহরণটি হল: এন = 3 এর জন্য 4 টি উপায় রয়েছে:

  X        X        X        .
 X .      . .      . .      X X
. . .    X . .    . X .    . . .

পরবর্তী ক্রম নিম্নলিখিত শর্তাবলী দিয়ে শুরু করা উচিত:

0, 1, 4, 10, 22

3

এপিএল, 24 বাইট, গভীরতা 6, এ 182712 থেকে A025581

{¯1-⍵-2!1+⌊.5+.5*⍨2×1+⍵}

ক্রম A025581 এর ক্রম হ'ল ... সত্যনিষ্ঠ হতে আমি নিশ্চিত নই। এটা আমাকে ভয় দেখায়

ইনডেক্সিং 0 থেকে শুরু হয় এবং ফাংশনটি কেবল সংজ্ঞাটি সংজ্ঞা অনুসারে গণনা করে।

পরবর্তী ক্রমটি শর্তাবলী দিয়ে শুরু করা উচিত:

0, 1, 0, 2, 1, 0

পূর্ণসংখ্যা m থেকে 0 হ্রাস করা এবং এর পরে পূর্ণসংখ্যার এম + 1 থেকে 0 ইত্যাদি হ্রাস করা যায় যা সাহায্য করতে পারে।
ক্যালকুলেটরফলাইন

3

> <>, 25 বাইট, গভীরতা 2, A002522 থেকে A001333

301-v >rn;
*2@:<r^!?:-1r+

এগুলি স্কয়ার্ট (2) এ অব্যাহত ভগ্নাংশ রূপান্তরকারীগুলির অঙ্কগুলি। কোডটি ব্যবহারকারীর সূচকটি স্ট্রপকে পূর্ববর্তী করে কনভার্জেন্টের সূচক দিয়ে ফেরত দেওয়া উচিত। সূচীকরণ শুরু হয় ১. পরবর্তী উত্তরটি শর্তাবলী দিয়ে শুরু করা উচিত:

1, 1

3

জে, 44 বাইট, গভীরতা 10, A026233 থেকে A242681

f=.(,(<:*+)"0/~~.50,25,(,+:,3*])1+i.20)+/@:=]

পরবর্তী উত্তর শর্তাবলী দিয়ে শুরু করা উচিত:

1, 1, 2, 2, 3, 3, 4, 4, 5, 5

দৈনন্দিন জীবনের কাছাকাছি কিছু: " nএকটি স্ট্যান্ডার্ড ডার্টবোর্ডে দুটি ডার্ট ব্যবহার করে যে সংখ্যা অর্জন করতে পারে তার সংখ্যা "। কেবল অ-রক্ষিত স্কোর-জুটির বিষয়। ওএসআই পৃষ্ঠার মতো অফসেট শুরু করা দুটি is ব্যবহার:

f 2 => 1
f 72 => 12

3

আর, 20 বাইট, গভীরতা 11, এ 242681 থেকে A194964

1+floor(scan()/5^.5)

পরবর্তী উত্তরটি নিম্নলিখিত শর্তগুলির সাথে মেলে:

1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 5

ক্রম A194964 প্রতিটি এন এর ফলাফল দেয় 1+[n/sqrt(5)]যেখানে ["তল" মানে। আর ফাংশন স্ট্যান্ডিন হিসাবে ইনপুট লাগে।

আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.