73

টি ভাইয়েরা সেন্ট গলফাস দ্য কনসিসের আদেশ থেকে যখনই কেউ দেখেন যে তারা ক্রুশের চিহ্ন তৈরি করছে তখন একটি সংক্ষিপ্ত প্রার্থনা পাঠ করার একটি রীতি রয়েছে । পর্যটকদের মধ্যে সম্প্রতি উচ্চ স্তরের পাপ পরিমাপের কারণে তারা মঠটিতে সিসিটিভি স্থাপন করেছে এবং এআই-এর যুগে পুরানো traditionতিহ্যকে বাঁচিয়ে রাখতে সহায়তা করার জন্য তারা আপনাকে নিয়োগ দিয়েছে।

আপনার কাজ হ'ল ফ্রিয়ারদের আঙুল-ট্র্যাকিং সফ্টওয়্যার থেকে আউটপুট বিশ্লেষণ করা এবং কত প্রার্থনা রয়েছে তা জানান। ইনপুটটি 0 এবং 4 এর মধ্যে পূর্ণসংখ্যাসমৃদ্ধ একটি ম্যাট্রিক্স যা 1,2,3,4 সময়ে পরপর মুহূর্তে আঙ্গুলের অবস্থানের প্রতিনিধিত্ব করে। 0 টি আঙ্গুলের প্রতিনিধিত্ব করে।

নিজেকে অতিক্রম করার ওয়ান ট্রু ওয়ে ^টিএম হ'ল:

.1.
3.4
.2.

("।" কোনও অঙ্কের সাথে মেলে)। তবে ভিড়ের মধ্যে ক্যামেরার ঘূর্ণন এবং ধার্মিক পূর্ব অর্থোডক্স ভাইদের উপস্থিতি সম্পর্কে অনিশ্চয়তার কারণে (যার ওয়ান ট্রু ওয়ে ^টিএম বিপরীত পাশের দিকে রয়েছে), আপনার সমস্ত ঘূর্ণন এবং প্রতিচ্ছবিও গণনা করা উচিত:

.4. .2. .3. .1. .3. .2. .4.
1.2 4.3 2.1 4.3 1.2 3.4 2.1
.3. .1. .4. .2. .4. .1. .3.

এক অঙ্কটি একাধিক ক্রসের অংশ হতে পারে। .pray()উপরের 3x3 সাবম্যাট্রিকগুলির মধ্যে উপস্থিত কতগুলি গণনা করে তাদের এআই এর কতবার সংখ্যা নির্ধারণ করতে ফ্রিয়ার্সকে সহায়তা করুন? একটি প্রোগ্রাম বা একটি ফাংশন লিখুন। যে কোনও যুক্তিসঙ্গত সুবিধাজনক ফর্ম ইনপুট নিন।

টেস্টামেন্টের মামলাগুলি:

// in
[[0,4,2,0],
 [1,3,2,4],
 [2,3,1,0]]

// out
2

// in
[[4,3,3,2,4,4,1,3,2,2],
 [0,3,0,2,1,1,2,3,2,3],
 [0,3,1,3,2,4,3,3,1,1],
 [4,3,2,3,2,4,1,4,2,3],
 [0,4,2,3,4,0,2,3,2,4],
 [2,1,0,0,2,0,0,1,2,4],
 [4,0,3,1,3,2,0,3,2,3],
 [1,4,3,3,1,4,0,1,4,4],
 [0,2,4,3,4,3,1,3,0,4],
 [3,0,1,0,4,0,3,3,3,3]]

// out
3

// in
[[3,2,3,1,0,3,4,2,1,1,1,1,4,0,1,3,1,1,2,1,1,3,0,1,0,1,1,0,0,1,0,3,4,0,1,1,2,3,1,2,4,1,0,2,3,0,2,4,3,2],
 [2,4,1,1,0,3,0,2,4,2,3,2,1,3,0,2,3,2,4,4,4,3,2,1,1,3,2,1,2,3,2,4,0,3,1,4,4,1,1,0,1,1,0,2,2,3,1,2,0,2],
 [3,4,0,0,4,4,0,3,4,4,1,3,2,1,3,2,3,2,2,0,4,0,1,2,3,0,4,3,2,2,2,0,3,3,4,4,2,2,1,4,4,1,3,1,1,2,0,1,1,0],
 [1,4,2,2,2,1,3,4,1,1,2,1,4,0,3,2,2,4,1,3,3,0,4,1,1,0,0,1,2,2,1,3,4,0,4,1,0,1,1,0,2,1,3,1,4,4,0,4,3,2],
 [4,4,2,0,4,4,1,1,2,2,3,3,2,3,0,3,2,1,0,3,3,4,2,2,2,1,1,4,3,2,1,1,4,3,4,2,4,0,1,0,2,4,2,2,0,3,3,0,3,2],
 [4,3,3,1,3,1,1,3,3,1,0,1,4,3,4,3,4,1,2,2,1,1,2,1,4,2,1,1,1,1,1,3,3,3,1,1,4,4,0,0,3,3,1,4,4,3,2,3,3,0],
 [1,4,1,4,0,0,1,3,1,2,2,1,1,2,3,3,2,0,3,4,3,2,1,2,2,3,3,1,4,2,1,1,4,1,3,2,0,0,0,1,2,4,1,1,3,0,4,2,3,1],
 [2,2,3,0,0,4,2,1,2,3,1,2,4,1,0,1,0,2,4,1,3,4,4,0,0,4,0,4,4,2,0,0,2,2,3,3,4,1,0,3,2,1,0,1,1,0,3,0,3,2],
 [1,2,4,3,4,3,1,2,2,3,0,1,2,4,4,4,3,1,2,3,4,3,3,2,0,0,2,0,3,4,4,2,3,2,0,2,4,3,0,0,0,4,4,0,4,4,0,3,3,3],
 [4,4,1,2,0,2,2,0,0,3,2,3,2,3,4,1,0,2,3,0,3,2,1,1,4,3,0,2,3,1,0,4,1,2,4,1,1,4,4,4,2,2,2,3,0,1,0,3,0,1],
 [4,0,3,0,2,2,0,3,2,2,2,4,0,4,0,1,0,1,4,3,3,2,3,1,2,2,4,4,0,3,2,3,1,4,1,0,3,2,3,2,2,0,1,2,4,0,3,0,4,4],
 [0,4,0,1,0,2,3,2,1,3,1,1,2,0,3,2,1,4,0,1,4,4,1,3,4,4,1,0,4,1,0,3,4,0,3,2,4,3,3,3,3,1,2,2,3,3,3,1,3,4],
 [3,4,1,2,1,1,1,0,4,0,1,1,0,4,1,3,1,1,2,0,2,1,4,1,4,4,3,2,0,3,0,3,0,1,1,2,1,3,0,4,4,2,2,2,1,3,4,1,1,1],
 [3,0,1,4,2,0,0,3,1,1,1,4,4,0,2,2,0,4,0,3,1,0,2,2,4,4,4,0,4,4,4,4,4,4,3,0,4,4,4,1,2,4,4,3,0,0,4,0,4,2],
 [2,0,1,2,1,1,3,0,3,1,0,4,3,1,2,1,1,3,0,1,2,4,2,1,2,3,4,2,4,4,2,2,3,4,0,0,1,0,0,4,1,3,3,4,1,2,1,3,3,2],
 [4,0,2,0,3,1,2,1,1,1,1,2,3,0,3,1,0,4,3,0,0,0,2,0,1,4,0,2,1,3,4,2,2,4,2,3,1,2,0,2,0,2,4,0,1,2,3,4,1,3],
 [3,0,2,4,2,0,3,4,3,2,3,4,2,0,4,1,0,4,3,3,1,0,2,2,2,1,3,3,1,1,0,3,3,0,3,2,1,1,0,1,2,2,0,4,4,2,0,1,3,1],
 [0,4,4,4,0,3,0,3,0,2,2,0,1,2,3,3,4,3,0,4,1,2,3,3,0,2,2,3,0,0,0,2,4,2,3,4,2,3,4,0,2,0,1,1,3,4,2,2,4,4],
 [2,1,2,3,4,3,1,2,0,0,0,0,0,0,3,4,3,3,1,2,2,1,3,4,1,2,4,0,1,4,1,0,0,0,2,1,1,1,3,0,0,3,1,1,4,2,1,3,4,1],
 [1,0,3,0,2,1,4,2,3,3,1,1,3,4,4,0,1,2,1,3,0,3,1,1,3,0,2,4,4,4,2,3,1,4,3,4,0,1,4,1,1,1,4,0,0,2,3,4,0,4]]

// out
8

"সংক্ষিপ্ততম সংক্ষিপ্ততম ধন্য, কারণ এটি উর্ধ্বতনদের রাজ্যকে জিতিয়েছে" " -স্ট গল্ফাস 13:37 এর বুক

"আপনি লুফোলগুলি ব্যবহার করবেন না, কারণ এগুলি লুসিফারের দুষ্ট কাজ" " - মেটাতে 13: 666-এ লিটার করুন

ক্রস তৈরির লোকের সামান্য ভিজ্যুয়ালাইজেশন

কোড স্নিপেট দেখান

var html = $('pre').html();
html = html.split('0').join('<span class="zero">0</span>')
.split('1').join('<span class="one">1</span>')
.split('2').join('<span class="two">2</span>')
.split('3').join('<span class="three">3</span>')
.split('4').join('<span class="four">4</span>')
$('pre').html(html);
var count =['zero','one','two','three','four'];
var counter = 0;
var $all = $('span');
window.setInterval(function() {
  var clazz = count[counter];
  counter++;
  if(counter == count.length) {
     counter = 0;
  }
  $all.css({'color':'white'});
  $('span.'+clazz).css({'color':''});
  
},1000)

.zero {
    color:blue;
}
.one {
    color:green;
}
.two {
    color:gray;
}
.three {
  color:orange;
}
.four {
  color: red;
}
span {
  transition:1s ease-out;
}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<pre>
  // in
[[0,4,2,0],
 [1,3,2,4],
 [2,3,1,0]]

// out
2

// in
[[4,3,3,2,4,4,1,3,2,2],
 [0,3,0,2,1,1,2,3,2,3],
 [0,3,1,3,2,4,3,3,1,1],
 [4,3,2,3,2,4,1,4,2,3],
 [0,4,2,3,4,0,2,3,2,4],
 [2,1,0,0,2,0,0,1,2,4],
 [4,0,3,1,3,2,0,3,2,3],
 [1,4,3,3,1,4,0,1,4,4],
 [0,2,4,3,4,3,1,3,0,4],
 [3,0,1,0,4,0,3,3,3,3]]

// out
3

// in
[[3,2,3,1,0,3,4,2,1,1,1,1,4,0,1,3,1,1,2,1,1,3,0,1,0,1,1,0,0,1,0,3,4,0,1,1,2,3,1,2,4,1,0,2,3,0,2,4,3,2],
 [2,4,1,1,0,3,0,2,4,2,3,2,1,3,0,2,3,2,4,4,4,3,2,1,1,3,2,1,2,3,2,4,0,3,1,4,4,1,1,0,1,1,0,2,2,3,1,2,0,2],
 [3,4,0,0,4,4,0,3,4,4,1,3,2,1,3,2,3,2,2,0,4,0,1,2,3,0,4,3,2,2,2,0,3,3,4,4,2,2,1,4,4,1,3,1,1,2,0,1,1,0],
 [1,4,2,2,2,1,3,4,1,1,2,1,4,0,3,2,2,4,1,3,3,0,4,1,1,0,0,1,2,2,1,3,4,0,4,1,0,1,1,0,2,1,3,1,4,4,0,4,3,2],
 [4,4,2,0,4,4,1,1,2,2,3,3,2,3,0,3,2,1,0,3,3,4,2,2,2,1,1,4,3,2,1,1,4,3,4,2,4,0,1,0,2,4,2,2,0,3,3,0,3,2],
 [4,3,3,1,3,1,1,3,3,1,0,1,4,3,4,3,4,1,2,2,1,1,2,1,4,2,1,1,1,1,1,3,3,3,1,1,4,4,0,0,3,3,1,4,4,3,2,3,3,0],
 [1,4,1,4,0,0,1,3,1,2,2,1,1,2,3,3,2,0,3,4,3,2,1,2,2,3,3,1,4,2,1,1,4,1,3,2,0,0,0,1,2,4,1,1,3,0,4,2,3,1],
 [2,2,3,0,0,4,2,1,2,3,1,2,4,1,0,1,0,2,4,1,3,4,4,0,0,4,0,4,4,2,0,0,2,2,3,3,4,1,0,3,2,1,0,1,1,0,3,0,3,2],
 [1,2,4,3,4,3,1,2,2,3,0,1,2,4,4,4,3,1,2,3,4,3,3,2,0,0,2,0,3,4,4,2,3,2,0,2,4,3,0,0,0,4,4,0,4,4,0,3,3,3],
 [4,4,1,2,0,2,2,0,0,3,2,3,2,3,4,1,0,2,3,0,3,2,1,1,4,3,0,2,3,1,0,4,1,2,4,1,1,4,4,4,2,2,2,3,0,1,0,3,0,1],
 [4,0,3,0,2,2,0,3,2,2,2,4,0,4,0,1,0,1,4,3,3,2,3,1,2,2,4,4,0,3,2,3,1,4,1,0,3,2,3,2,2,0,1,2,4,0,3,0,4,4],
 [0,4,0,1,0,2,3,2,1,3,1,1,2,0,3,2,1,4,0,1,4,4,1,3,4,4,1,0,4,1,0,3,4,0,3,2,4,3,3,3,3,1,2,2,3,3,3,1,3,4],
 [3,4,1,2,1,1,1,0,4,0,1,1,0,4,1,3,1,1,2,0,2,1,4,1,4,4,3,2,0,3,0,3,0,1,1,2,1,3,0,4,4,2,2,2,1,3,4,1,1,1],
 [3,0,1,4,2,0,0,3,1,1,1,4,4,0,2,2,0,4,0,3,1,0,2,2,4,4,4,0,4,4,4,4,4,4,3,0,4,4,4,1,2,4,4,3,0,0,4,0,4,2],
 [2,0,1,2,1,1,3,0,3,1,0,4,3,1,2,1,1,3,0,1,2,4,2,1,2,3,4,2,4,4,2,2,3,4,0,0,1,0,0,4,1,3,3,4,1,2,1,3,3,2],
 [4,0,2,0,3,1,2,1,1,1,1,2,3,0,3,1,0,4,3,0,0,0,2,0,1,4,0,2,1,3,4,2,2,4,2,3,1,2,0,2,0,2,4,0,1,2,3,4,1,3],
 [3,0,2,4,2,0,3,4,3,2,3,4,2,0,4,1,0,4,3,3,1,0,2,2,2,1,3,3,1,1,0,3,3,0,3,2,1,1,0,1,2,2,0,4,4,2,0,1,3,1],
 [0,4,4,4,0,3,0,3,0,2,2,0,1,2,3,3,4,3,0,4,1,2,3,3,0,2,2,3,0,0,0,2,4,2,3,4,2,3,4,0,2,0,1,1,3,4,2,2,4,4],
 [2,1,2,3,4,3,1,2,0,0,0,0,0,0,3,4,3,3,1,2,2,1,3,4,1,2,4,0,1,4,1,0,0,0,2,1,1,1,3,0,0,3,1,1,4,2,1,3,4,1],
 [1,0,3,0,2,1,4,2,3,3,1,1,3,4,4,0,1,2,1,3,0,3,1,1,3,0,2,4,4,4,2,3,1,4,3,4,0,1,4,1,1,1,4,0,0,2,3,4,0,4]]

</pre>

স্নিপেট প্রসারিত করুন

ভিজ্যুয়ালাইজেশনের জন্য @ প্রশাঞ্চলাকা ধন্যবাদ।

code-golf matrix

— ngn
সূত্র

57

শেষে আয়াতগুলির জন্য +1, তারা আমাকে একটি ভাল হাসি দিয়েছেন: ডি

— হাইপার নিউট্রিনো

6

এক ডিজিট একাধিক ক্রসের অংশ হতে পারে?

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

9

ওহে মিষ্টি যীশু, আপনি একটি ফ্রিয়ার সিমুলেটর তৈরি করেছিলেন।

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

1

প্রথম "টি" যুক্ত কেন?

— জ্যাকগল্ড

4

টুইট করুন

— এরিক আউটগল্ফার

19

গ্রিম , 20 বাইট

n`.\1./\3.\4/.\2.voO

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

অনুমানটির একটি খুব আক্ষরিক বাস্তবায়ন:

n` গ্রিম কোনও ম্যাচ দেয় এমন ইনপুটটির সাবক্র্যাঙ্গেলগুলির সংখ্যা গণনা করুন।
.\1./\3.\4/.\2. 3x3 বর্গ সংজ্ঞা দেয়:
```
.1.
3.4
.2.
```
যেখানে .কোনও চরিত্র হতে পারে।
oOএকটি ওরিয়েন্টেশন মোডিফায়ার যা এই আয়তক্ষেত্রটি কোনও আবর্তন বা প্রতিবিম্বে প্রদর্শিত হতে দেয়। vকম ব্যবহার করা হয় oগুলি প্রাধান্য যাতে আমরা বর্গক্ষেত্র প্রায় প্রথম বন্ধনী প্রয়োজন হবে না।

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

7

প্রথম দুটি পরীক্ষার জন্য সঠিক, শেষের জন্য সেগফল্ট। আমি ধারণা করি যতক্ষণ না প্রোগ্রামটি নীতিগতভাবে সঠিক হয় এবং কেবলমাত্র সংস্থান দ্বারা সীমাবদ্ধ থাকে this

— এনজিএন

এফওয়াইআই: আমি কেবলমাত্র সর্বশেষ পরীক্ষার কেসটি পরীক্ষা করেছিলাম এবং এটি আমার পক্ষে ভাল ছিল।

— 3D1T0R

16

শামুক , 17 16 বাইট

Ao
\1.=\2o=\3b\4

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

ব্যাখ্যা

Aশামুকগুলি পুরো ইনপুটটিতে সম্ভাব্য মিলে যাওয়া পাথের সংখ্যা গণনা করে। oযে কোনও অরথোগোনাল দিকের সূচনার দিকটি সেট করে (কেবল পূর্ব দিকে পরিবর্তে)। প্যাটার্নটি নিজেই দ্বিতীয় লাইনে রয়েছে:

\1    Match a 1.
.     Match an arbitrary character (the one in the centre).
=\2   Check that the next character ahead is a 2, but don't move there.
o     Turn to any orthogonal direction. In practice, this will only be one
      of the two directions from the centre we haven't checked yet.
=\3   Check that the next character ahead is a 3.
b     Turn around 180 degrees.
\4    Match a 4 in that direction.

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

7

হাস্কেল, 108 102 93 বাইট

f((_:t:x):w@((l:q@(_:r:_)):(_:b:z):_))=sum$f((t:x):q:[b:z]):f w:[1|(l*r-1)*(t*b-1)==11]
f _=0

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

কোন রেজেক্স। প্যাটার্ন ম্যাচ

.t.
l.r
.b.

ম্যাট্রিক্স উপরের বাঁদিকের কোণায়, একটি নিতে 1যদি (l*r-1)*(t*b-1)==11এবং যাও recursively অধিকার (ড্রপ যেতে .l.নিচে) এবং (প্রথম সারিতে ড্রপ)। যদি প্যাটার্নটি মেলে না যায় (ডান বা নীচে সীমানায়) একটি নিন 0। সমস্ত ফলাফলের যোগফল।

সম্পাদনা: -9 বাইট @xnor ধন্যবাদ।

— nimi
সূত্র

আমি 2^(l*r)+2^(t*b)==4100সংখ্যাগুলি যাচাই করার জন্য পরামর্শ দিতে যাচ্ছিলাম , তবে মনে হচ্ছে আমাদের সমাধানগুলি উভয়ই এর পরিবর্তে চালিত 2,6হয়েছে 3,4।

— xnor

@ এক্সনর তবে সংখ্যাগুলি সীমাবদ্ধ0..4

— 01urous

3

@ Οurous ধন্যবাদ, আমি এটি মিস করেছি। তারপরে পাটিগণিতের এক্সপ্রেশনগুলিকে আরও বেশি অনুকূলিত করা যায়, যেমন (l*r-1)*(t*b-1)==11।

— xnor

7

পার্ল, 70 বাইট

জন্য +2 অন্তর্ভুক্ত 0p

এসটিডিআইএন-এ ফাঁকা স্থান ছাড়াই অঙ্কের অঙ্ক হিসাবে ইনপুট ম্যাট্রিক্স দিন:

perl -0pe '$_=map{/.$/m+y/1-4/3421/;/(?=1.{@{-}}(3.4|4.3).{@{-}}2)/sg}($_)x4'
0420
1324
2310
^D

অঙ্কগুলি ঘোরানোর মাধ্যমে ক্রসটি আবর্তিত করে

— টন হসপেল
সূত্র

6

রেটিনা , 92 83 বাইট

L$v`(?<=((.))*).(.)..*¶(?<-1>.)*(.).(.).*¶(?<-2>.)*.(.)
$6$3$4$5
/../_O`.
1234|3412

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

L$v`(?<=((.))*).(.)..*¶(?<-1>.)*(.).(.).*¶(?<-2>.)*.(.)
$6$3$4$5

সমস্ত ওভারল্যাপিং 3x3 স্কোয়ারের জন্য দেখুন। একটি লুকবিহাইড দুটি বার ইনডেন্টটি ক্যাপচার করে যাতে এটি দ্বিতীয় এবং তৃতীয় লাইনে ভারসাম্যপূর্ণ হতে পারে। ইনপুটটি আয়তক্ষেত্রাকার হিসাবে ধরে নিয়েছে তাই আমাদের দলগুলির ভারসাম্যগুলি পরীক্ষা করতে হবে না। নীচের / শীর্ষের মাঝের ঘর এবং বাম / ডান মাঝের ঘরগুলি ক্যাপচার করা হয়।

/../_O`.

প্রতিটি জোড়া ঘরকে ক্রমানুসারে সাজান।

1234|3412

অবশিষ্ট বৈধ নিদর্শন গণনা করুন।

— নিল
সূত্র

5

জেলি , 26 বাইট

Z3Ƥṡ€3ẎµFḊm2ṙ-s2Ṣ€ṢFµ€ċ4R¤

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

ব্যাখ্যা

Z3Ƥṡ€3ẎµFḊm2ṙ-s2Ṣ€ṢFµ€ċ4R¤  Main Link
 3Ƥ                         For each 3 rows
Z                           Zip the rows
   ṡ€3                      Get all arrangements of 3 consecutive columns from these rows. At this step, we have all 3x3 contiguous submatrices
      Ẏ                     Unwrap by one layer; previously grouped by rows, now ungrouped
       µ           µ€       For each 3x3 submatrix
        F                   Flatten it
         Ḋ                  Get rid of the first element
          m2                Take every second element (this only keeps the edges)
            ṙ-              Rotate right 1 element
              s2            Group into pairs; now the top and bottom are grouped and the left and right are grouped
                Ṣ€          Sort each pair
                  Ṣ         Sort the pairs
                   F        Flatten
                      ċ4R¤  Count the number of occurrences of range(4); i.e. [1,2,3,4]

-3 বাইটস জোনাথন অ্যালান (2) এবং মিঃ এক্সকোডার (3) (মার্জড) কে ধন্যবাদ

— HyperNeutrino
সূত্র

@ngn lol বিন্দুটি এর নীচে থাকা বোঝানো হয়েছে D। আমার খারাপ, স্থির।

— হাইপারনিউটারিনো

...Fµ€ċ4R¤পরিবর্তে 2 বাইট ব্যবহার করে সংরক্ষণ করুন ...Ḍµ€ċ1234(এটিও মনে রাখবেন যে একটি সংরক্ষণের 1234পরিবর্তে প্রতিস্থাপন করা ⁽¡ḋযেতে পারে)

— জোনাথন অ্যালান

এরZ3Ƥ পরিবর্তে ṡ3Z€এবং ⁼J$µ€Sপরিবর্তে 26 বাইট ব্যবহার করে Ḍµ€ċ1234।

— মিঃ এক্সকোডার

@

— জোনাথান অ্যালান

5

জাভা 8, 135 133 131 বাইট

m->{int r=0,i=0,j;for(;++i<m.length-1;)for(j=1;j<m[i].length-1;)if(~(m[i-1][j]*m[i+1][j])*~(m[i][j-1]*m[i][++j])==39)r++;return r;}

-2 বাইটস একটি সংক্ষিপ্ত সূত্র জন্য @tehtmi ধন্যবাদ : (l*r-1)*(t*b-1)==11থেকে~(l*r)*~(t*b)==39

ব্যাখ্যা:

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

m->{                     // Method with integer-matrix parameter and integer return-type
  int r=0,               //  Result-integer, starting at 0
      i=0,j;             //  Index integers
  for(;++i<m.length-1;)  //  Loop over the rows, skipping the first and last
    for(j=1;j<m[i].length-1;)
                         //   Inner loop over the columns, skipping the first and last
      if(~(m[i-1][j]*m[i+1][j])*~(m[i][j-1]*m[i][++j])==39)
                         //    If (-(bottom*top)-1) * (-(left*right)-1) is exactly 39:
        r++;             //     Increase the result-counter by 1
  return r;}             //  Return the result-counter

— কেভিন ক্রুইজসেন
সূত্র

1

অপেক্ষাকৃত ছোট সূত্র: ~(l*r)*~(t*b)==39(Haskell, 1-বাইট নেই ~দৃশ্যত।)

— tehtmi

3

হুশ , 23 বাইট

#ö§&¦ḣ4SδΛ≈↔Ċ2tΣṁoX3TX3

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

ব্যাখ্যা

#ö§&¦ḣ4SδΛ≈↔Ċ2tΣṁoX3TX3  Implicit input, a list of lists of integers.
                     X3  Length-3 slices.
                ṁ        Map over them and concatenate:
                    T     Transpose,
                 oX3      then get length-3 slices.
                         Now we have a list of 3x3-arrays of the (transposed) input.
#ö                       Return number of 3x3-arrays that satisfy this:
                          Take m = [[0,3,0],[2,4,1],[1,4,0]] as an example.
               Σ          Concatenate: [0,3,0,2,4,1,1,4,0]
              t           Tail: [3,0,2,4,1,1,4,0]
            Ċ2            Take every second element: c = [3,2,1,4]
  §&                      c satisfies both of the following:
    ¦                     1) It contains every element of
     ḣ4                      the range [1,2,3,4].
       Sδ                 2) If you zip c
           ↔                 with its reverse,
         Λ                   then each corresponding pair
          ≈                  has absolute difference at most 1.
                         Implicitly print the result.

— Zgarb
সূত্র

3

ডায়ালগ এপিএল , 30 29 28 27 26 বাইট ( এসবিএসসি )

+/∘,{12 2⍷×∘⌽⍨⊢/4 2⍴⍵}⌺3 3

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

— H.PWiz
সূত্র

খুব ভালো! ⌽∘⊖×⊢2 বাইট দ্বারা সংক্ষিপ্ত হতে পারে, আপনি কীভাবে অনুমান করতে পারেন?

— ngn

@ngn আমি আসলে যা চাই তা ø;) এর মতো একটি প্রতীক

— H.PWiz

@ngn আমার কাছে রয়েছে×∘⌽∘⊖⍨

— এইচপিউইজ

এই খাটো:(⌽×⊖)

— ngn

ওহ, এটি চালাক, আপনি সেলফিটি (... ⍨) ⊢/অন্য বাম -1 এর জন্য বাম দিকে সরালেন । আমি এটা ভাবিনি। এই পরিস্থিতিতে আপনারা আমাকে কৃতিত্ব দেবেন না।

— এনজিএন

2

জেলি , 36 বাইট

“ƒɦƈạ%ȤFE’b4s4
ṡ3µZṡ3F€µ€ẎḊm2$$€’f¢L

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

37 বাইট

কিছু কারণে আমি Ḋm2$$শীর্ষ লিঙ্কে স্থানান্তর করতে পারছি না ।

ṙ1s2I€FPA,P⁼1,24
ṡ3µZṡ3F€µ€ẎḊm2$$€Ç€S

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

— fireflame241
সূত্র

2

পরিষ্কার , 255 ... 162 বাইট

বোঝাপড়ায় প্রায়শই প্যাটার্ন ফিল্টার ব্যবহার করা সুবিধাজনক নয়, তবে এই ক্ষেত্রে এটি হয়।

import StdEnv,StdLib
? =reverse
@ =transpose
t=tails
$m=sum[1\\f<-[id,@,?,?o@,@o?,@o?o@,?o@o?o@,?o@o?],[a,b,c:_]<-t(f m),[_,1:_]<-t a&[3,_,4:_]<-t b&[_,2:_]<-t c]

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

$গ্রহণ [[Int]]এবং ফিরে ফাংশন সংজ্ঞায়িত করে Int।

এটি প্রথমে ম্যাট্রিক্সের সমস্ত প্রতিসাম্য তৈরি করে m(এর মাধ্যমে রূপান্তর করে f), tailsযার মধ্যে তিন বা ততোধিক সারি থাকে এবং একযোগে tailsপ্রতিটি সারির প্রথম থেকে তিনটি কলামের ক্রসের ক্র্যাটার সাথে মিলে যায় তা পরীক্ষা করে।

এটি tailsঅর্ডারযুক্ত tails-প্যাটার্নটির সাথে মিলে যাওয়ার সংখ্যা গণনার সমতুল্য [[_,1,_:_],[3,_,4:_],[_,2,_:_]:_]- যা ম্যাট্রিক্সের প্রতিটি কক্ষের জন্য, পরীক্ষার মতোই যৌক্তিকভাবে একই, ক্রসটির কোনও ঘূর্ণনের উপরের বাম কোণে corner

— Οurous
সূত্র

2

পাইথন 3, 120 118 বাইট

lambda x:sum({x[i+1][j]*x[i+1][j+2],x[i][j+1]*x[i+2][j+1]}=={2,12}for i in range(len(x)-2)for j in range(len(x[0])-2))

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

ক্রসটিতে বিপরীত জোড় সংখ্যার উত্পাদন যথাক্রমে 2 এবং 12 হওয়া উচিত এবং সমস্ত ভিন্ন প্রচ্ছন্নতা কভার করার জন্য একটি সেটের সাথে তুলনা করা হয়। পূর্ণসংখ্যার 2D অ্যারে হিসাবে ইনপুট নেয়।

— ইচ্ছাশক্তি
সূত্র

1

আপনাকে f=স্কোর গণনা করতে হবে না

— ngn

2

জাপট `-x` , 39 38 33 বাইট

ã3 Ëmã3 y x@[XXy]®g1 ë2 ×Ãn e[2C]

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

-১ বাইট @ শ্যাগিকে ধন্যবাদ।

-5 বাইটগুলি অ্যারে রিফ্যাক্টর করে @ETH প্রোডাকশনগুলিকে ধন্যবাদ।

আনপ্যাকড এবং কীভাবে এটি কাজ করে

Uã3 mD{Dmã3 y xX{[XXy]mZ{Zg1 ë2 r*1} n e[2C]

       Input: 2D Array of numbers
Uã3    Generate an array of length 3 segments of U
mD{    Map... (D = 2D array of numbers having 3 rows)
Dmã3     Map over each row of D to generate an array of length 3 segments
y        Transpose; make an array of 3x3 subsections
xX{      Map and sum... (x = 3x3 2D array of numbers)
[XXy]      Array of X and X transposed
mZ{        Map...
Zg1 ë2 r*1   Take row 1, take 0th and 2nd elements, reduce with *
}
n          Sort the array
e[2C]      Equals [2,12] element-wise?
           Implicit cast from boolean to number

       Result: 1D array of counts
-x     Sum of the result array

সেখানে উচিত এখনও ক্রস জন্য পরীক্ষা করতে একটি ভাল উপায় হতে ...

— Bubbler
সূত্র

শেষে সমতা পরীক্ষাটি প্রতিস্থাপন করে আপনি একটি বাইট সংরক্ষণ করতে পারেন e[2C]।

— শেগি

আপনি পরিত্রাণ পেতে পারেন 2এ ë2?

— অলিভার

ফ্রিয়ার সিমুলেটর

গ্রিম , 20 বাইট

শামুক , 17 16 বাইট

ব্যাখ্যা

হাস্কেল, 108 102 93 বাইট

পার্ল, 70 বাইট

রেটিনা , 92 83 বাইট

জেলি , 26 বাইট

ব্যাখ্যা

জাভা 8, 135 133 131 বাইট

হুশ , 23 বাইট

ব্যাখ্যা

ডায়ালগ এপিএল , 30 29 28 27 26 বাইট ( এসবিএসসি )

জেলি , 36 বাইট

37 বাইট

পরিষ্কার , 255 ... 162 বাইট

পাইথন 3, 120 118 বাইট

জাপট -x , 39 38 33 বাইট

আনপ্যাকড এবং কীভাবে এটি কাজ করে

জাপট `-x` , 39 38 33 বাইট