वायरस बनाम एंटीडोट्स कोड गोल्फ [बंद]

Question

एक आयताकार 2D सरणी है जिसमें 'v' द्वारा निरूपित विषाणु होते हैं, antidote1 को 'a' द्वारा निरूपित किया जाता है, और antidote2 को 'b' द्वारा निरूपित किया जाता है ('v', 'a' और 'b') के अलावा कोई मान नहीं होता है।

एंटीडोट 1 केवल क्षैतिज और ऊर्ध्वाधर दिशाओं में पड़ोसी वायरस को मार सकता है, लेकिन एंटीडोट 2 पड़ोसी (यदि कोई हो) वायरस को क्षैतिज, ऊर्ध्वाधर और विकर्ण दिशाओं में मार सकता है।

एंटीडोट सक्रिय होने के बाद, अंत में कितने वायरस रहेंगे?

उदाहरण:

इनपुट:

vv
vv

आउटपुट: ४

इनपुट:

av
vv

आउटपुट: १

इनपुट:

vvv
vbv
vvv

आउटपुट: 0

इनपुट:

bvb
bav
vab
vvv
vvb
vvv
vvv
bva
vav

आउटपुट: 3

Comments

मैं आपके संपादन की सराहना करता हूं @Grimy - इसके अलावा अच्छी चुनौती :)

— pixma140

@ केविनक्रूजसेन, यह अनियमित आकार का नहीं है।

— किआरा डैन

क्या हम "v", "a", और "b" के बजाय 3 (अलग) मनमाना मान लेते हैं?

— अटारीट

क्या एंटी-वायरस चारों ओर लपेटते हैं (यानी, नीचे पंक्ति में "a" शीर्ष पंक्ति में "v" को हटा देगा)?

— ब्रायन

@ किआरा दान मैं किसी भी 3 विशिष्ट मूल्यों को अनुमति नहीं देने की सलाह दूंगा, क्योंकि यह चुनौती में कुछ चरित्र रखता है, साथ ही पत्रों के कोड बिंदुओं के साथ संभव होशियारी भी।

— lirtosiast

Answer 1

पायथन 3 , 135 बाइट्स

j=''.join
p='j(s)'+4*'.replace("%s%s","%s%s")'%(*'vbbbbvbbavacvaca',)
f=lambda x:j(eval(2*'(eval(p)for s in zip(*'+'x))))')).count('v')

इसे ऑनलाइन आज़माएं!

-2 बाइट्स केविन क्रूज़सेन की बदौलत

व्याख्या

'B' के बगल में पाए जाने पर सभी 'v' को 'b' में बदल देता है। इसके बाद, सभी 'v' को 'c' में बदल देता है यदि 'a' के बगल में पाया जाता है। सरणी के ट्रांसपोज़्ड संस्करण के साथ एक दूसरा पुनरावृत्ति सभी ऊर्ध्वाधर और विकर्ण वायरस को साफ करता है। अंत में, यह 'v की शेष संख्या को लौटाएगा।

---

अधिक पठनीय पुनरावर्ती कार्य (155 बाइट्स) के रूप में

Comments

आप के बाद अंतरिक्ष निकाल सकते हैं y>1else। हालांकि अच्छा दृष्टिकोण। पहले मुझे यकीन नहीं था कि यह विकर्ण से कैसे निपटता है b, लेकिन यह आपके प्रतिस्थापन के कारण ठीक काम करता है। :) मुझसे १।

— केविन क्रूज़सेन

@KevinCruijssen धन्यवाद! विकर्णों की देखभाल 'v' के स्थान पर 'a' से की जाती है, यदि वे 'b' के बगल में हैं। दूसरे पुनरावृत्ति में, आसन्न v को हटा दिया जाता है।

— जित्स

निम्नलिखित इनपुट के लिए, आउटपुट 3 होना चाहिए, लेकिन इसकी वापसी 4: bvb bav vab vvv vvb vvv vvv bva vav

— Kiara Dan

j=''.joinअपने निर्धारित संस्करण में उपयोग करके 164 बाइट्स

— केविन क्रूज़सेन

@KevinCruijssen को एक छोटा भी मिला, लेकिन आपका सुझाव एक और बाइट बचाता है!

— जितेश

Answer 2

जावास्क्रिप्ट (ईएस 7), 108 बाइट्स

वर्णों के मैट्रिक्स के रूप में इनपुट लेता है।

f=m=>(g=(y,X,V)=>m.map(r=>r.map((v,x)=>V?v>f&V>'a'>(x-X)**2+y*y-2?r[x]=n--:0:v<f?g(-y,x,v):n++)|y++))(n=0)|n

इसे ऑनलाइन आज़माएं!

मेरे मूल उत्तर के समान, लेकिन करना V>'a'>(x-X)**2+y*y-2वास्तव में नीचे वर्णित हेक्सा चाल का उपयोग करने से 1 बाइट कम है। ¯ \ _ (ツ) _ / ¯

---

जावास्क्रिप्ट (ईएस 7), 109 बाइट्स

वर्णों के मैट्रिक्स के रूप में इनपुट लेता है।

f=m=>(g=(y,X,V)=>m.map(r=>r.map((v,x)=>V?v>f&(x-X)**2+y*y<V-8?r[x]=n--:0:v<f?g(-y,x,'0x'+v):n++)|y++))(n=0)|n

इसे ऑनलाइन आज़माएं!

कैसे?

Quadrance दो अंक की और के रूप में परिभाषित किया गया है:$A_1=(x_1,y_1)$$A_2=(x_2,y_2)$

$$Q(A_1,A_2)=(x_2−x_1)^2+(y_2−y_1)^2$$

पूर्णांक निर्देशांक को ध्यान में रखते हुए, यह निम्नानुसार है:

$$\begin{matrix} &8&5&4&5&8\\ &5&2&1&2&5\\ &4&1&\bullet&1&4\\ &5&2&1&2&5\\ &8&5&4&5&8 \end{matrix}$$

इसलिए:

• एक प्रकार A A एंटीडोट पर स्थित है, स्थित वायरस को मार यदि$A_1$$A_2$$Q(A_1,A_2)<2$
• एक ग्रुप बी में स्थित मारक पर स्थित एक वायरस को मारने के लिए सक्षम है अगर$A_1$$A_2$$Q(A_1,A_2)<3$

आसानी से, इस विशेष ऊपरी बाउंड ( या ) को हेक्साडेसिमल से एंटीडेट चरित्र को दशमलव में परिवर्तित करके और घटाकर प्राप्त किया जा सकता है :$2$$3$$8$

• $\text{A}_{16} - 8_{10} = 2_{10}$
• $\text{B}_{16} - 8_{10} = 3_{10}$

टिप्पणी की गई

f =                      // named function, because we use it to test if a character
                         // is below or above 'm'
m => (                   // m[] = input matrix
  g = (                  // g is a recursive function taking:
    y,                   //   y = offset between the reference row and the current row
    X,                   //   X = reference column
    V                    //   V = reference value, prefixed with '0x'
  ) =>                   //
    m.map(r =>           // for each row r[] in m[]:
      r.map((v, x) =>    //   for each value v at position x in r[]:
        V ?              //     if V is defined:
          v > f &        //       if v is equal to 'v'
          (x - X) ** 2 + //       and the quadrance between the reference point and
          y * y          //       the current point
          < V - 8 ?      //       is less than the reference value read as hexa minus 8:
            r[x] = n--   //         decrement n and invalidate the current cell
          :              //       else:
            0            //         do nothing
        :                //     else:
          v < f ?        //       if v is either 'a' or 'b':
            g(           //         do a recursive call:
              -y,        //           pass the opposite of y
              x,         //           pass x unchanged
              '0x' + v   //           pass v prefixed with '0x'
            )            //         end of recursive call
          :              //       else:
            n++          //         increment n
      ) | y++            //   end of inner map(); increment y
    )                    // end of outer map()
  )(n = 0)               // initial call to g with y = n = 0
  | n                    // return n

Comments

धन्यवाद @Arnauld, क्या आप कोड भी समझा सकते हैं?

— कियारा दान

@ करियारदान किया।

— अरनुलद

Answer 3

05AB1E , 33 30 29 बाइट्स

2F.•s¯}˜?•2ô€Â2ä`.:S¶¡øJ»}'v¢

इसे ऑनलाइन आज़माएं या कुछ और परीक्षण मामलों को सत्यापित करें ।

पोर्ट ऑफ @ जेट्स पायथन 3 का उत्तर है , इसलिए उसे सुनिश्चित करना सुनिश्चित करें!
-1 बाइट @ जिटसे को धन्यवाद ।

स्पष्टीकरण:

विरासत संस्करण में स्ट्रिंग-सूची को ज़िप / ट्रांसपोट करने में सक्षम होने का लाभ है, जहां नए संस्करण को एक स्पष्ट Sऔर की आवश्यकता होगी J, क्योंकि यह केवल चरित्र-सूचियों के साथ काम करता है। लेकिन, नया संस्करण अभी भी 3 बाइट्स है जो €Âएक छोटी संकुचित स्ट्रिंग के साथ संयोजन में उपयोग किया जाता है। विरासत संस्करण में, €केवल मानचित्र के अंदर स्टैक पर अंतिम मान रखेगा, लेकिन नए संस्करण में, यह मानचित्र के अंदर स्टैक पर सभी मान रखेगा।

2F                  # Loop 2 times:
  .•s¯}˜?•          #  Push compressed string "vbvabbca"
   2ô               #  Split it into parts of size 2: ["vb","va","bb","ca"]
     €Â             #  Bifurcate (short for duplicate & reverse copy) each:
                    #   ["vb","bv","va","av","bb","bb","ca","ac"]
       2ä           #  Split it into two parts:
                    #   [["vb","bv","va","av"],["bb","bb","ca","ac"]]
         `          #  Push both those lists separated to the stack
          .:        #  Replace all strings once one by one in the (implicit) input-string
            S       #  Then split the entire modified input to a list of characters
             ¶¡     #  Split that list by newlines into sublists of characters
               ø    #  Zip/transpose; swapping rows/columns
                J   #  Join each inner character-list back together to a string again
                 »  #  And join it back together by newlines
}'v¢               '# After the loop: count how many "v" remain

मेरा यह 05AB1E टिप देखें (अनुभाग संपीड़ित तार शब्दकोश का हिस्सा नहीं कैसे? ) को समझने के लिए क्यों .•s¯}˜?•है "vbvabbca"।

Comments

आप की जरूरत नहीं है bc=> baअगर आप लागू bv=> baसे पहले av=> ac। इस प्रकार .•6øнãI•(`bvavbaac 'का संकुचित रूप) 2 बाइट्स की बचत के लिए पर्याप्त है।

— ग्रैमी

@Grimy यह अंतिम परीक्षण मामले के लिए 3 के बजाय 1 में परिणाम देता है ।

— केविन क्रूज़सेन

@KevinCruijssen तीन के बजाय दो प्रतिस्थापन कदम सभी के बाद चाल करने के लिए लगता है

— Jitse

@ जीत धन्यवाद। संपीड़न स्ट्रिंग 2 बाइट्स छोटी है, लेकिन मुझे अब इसकी .:जगह (सभी को एक बार बदलना) चाहिए :(सभी को तब तक प्रतिस्थापित करते रहें जब तक कि यह अब नहीं है)। अभी भी -1, हालांकि। :) मुझे बताने के लिए धन्यवाद।

— केविन क्रूज़सेन

Answer 4

जावा 10, 211 209 बाइट्स

m->{int i=m.length,j,c=0,f,t,I,J;for(;i-->0;)for(j=m[i].length;j-->0;c+=m[i][j]>98?f/9:0)for(f=t=9;t-->0;)try{f-=m[I=i+t/3-1][J=j+t%3-1]==98||Math.abs(I-i+J-j)==1&m[I][J]<98?1:0;}catch(Exception e){}return c;}

ऑल सिंगल ईइट्स चैलेंज के लिए मेरे जवाब में संशोधन ।
-2 बाइट्स @ceilingcat की बदौलत ।

इसे ऑनलाइन आज़माएं।

स्पष्टीकरण:

m->{                           // Method with char-matrix parameter & int return-type
  int i=m.length,              //  Amount of rows
      j,                       //  Amount of columns
      c=0,                     //  Virus-counter, starting at 0
      f,                       //  Flag-integer
      t,I,J;                   //  Temp-integers
  for(;i-->0;)                 //  Loop over the rows of the matrix
    for(j=m[i].length;j-->0    //   Inner loop over the columns
        ;c+=                   //     After every iteration: increase the counter by:
            m[i][j]>98         //      If the current cell contains a 'v'
             f/9               //      And the flag is 9:
                               //       Increase the counter by 1
            :0)                //      Else: leave the counter unchanged by adding 0
      for(f=t=9;               //    Reset the flag to 9
          t-->0;)              //    Loop `t` in the range (9, 0]:
         try{f-=               //     Decrease the flag by:
           m[I=i+t/3-1]        //      If `t` is 0, 1, or 2: Look at the previous row
                               //      Else-if `t` is 6, 7, or 8: Look at the next row
                               //      Else (`t` is 3, 4, or 5): Look at the current row
            [J=j+t%3-1]        //      If `t` is 0, 3, or 6: Look at the previous column
                               //      Else-if `t` is 2, 5, or 8: Look at the next column
                               //      Else (`t` is 1, 4, or 7): Look at the current column
            ==98               //      And if this cell contains a 'b'
            ||Math.abs(I-i+J-j)==1
                               //      Or if a vertical/horizontal adjacent cell
              &m[I][J]<98?     //      contains an 'a'
               1               //       Decrease the flag by 1
            :0;                //      Else: leave the flag unchanged by decreasing with 0
         }catch(Exception e){} //     Catch and ignore any ArrayIndexOutOfBoundsExceptions,
                               //     which is shorter than manual checks
  return c;}                   //  And finally return the virus-counter as result

Answer 5

चारकोल , 39 बाइट्स

ＷＳ⊞υι≔⪫υ⸿θＰθ≔⁰ηＦθ«≧⁺›⁼ιv⁺№ＫＭb№ＫＶaηι»⎚Ｉη

इसे ऑनलाइन आज़माएं! लिंक कोड के वर्बोज़ संस्करण के लिए है। स्पष्टीकरण:

ＷＳ⊞υι≔⪫υ⸿θＰθ

\rवर्णों के साथ इनपुट स्ट्रिंग्स में शामिल हों और परिणाम को कैनवास पर आकर्षित करें।

≔⁰η

लाइव वर्जिन की संख्या को साफ़ करें।

Ｆθ«

इनपुट में वर्णों पर लूप।

≧⁺›⁼ιv⁺№ＫＭb№ＫＶaη

यदि वर्तमान वर्ण एक वायरस है और bकिसी भी दिशा में या as orthogonally में आसन्न s नहीं हैं, तो लाइव virii की संख्या में वृद्धि होगी।

ι»

अगले चरित्र के साथ दोहराएं।

⎚Ｉη

कैनवास को साफ़ करें और लाइव वर्जिन की कुल संख्या प्रिंट करें।

Answer 6

पर्ल ( -00lp), 82 बाइट्स

Regex का उपयोग बदलने के लिए vअंतरिक्ष से, तो गिनती vरों

/.
/;$,="(|..{@-})";$;="(|.{@-,@+})";$_=s/(a$,|b$;)\Kv|v(?=$,a|$;b)/ /s?redo:y/v//

TIO