คุณกำลังรับn โดยมเมทริกซ์ของจำนวนเต็มที่n, ม> 3 งานของคุณคือค้นหาเมทริกซ์ย่อย3คูณ3ที่มีค่าเฉลี่ยต่ำสุดและส่งออกค่านี้

กฎและคำชี้แจง:

• จำนวนเต็มจะไม่เป็นลบ
• รูปแบบอินพุตและเอาต์พุตเสริม
• ผลลัพธ์จะต้องมีความแม่นยำสูงสุดอย่างน้อย 2 ตำแหน่ง (หากไม่ใช่จำนวนเต็ม)
• เมทริกซ์ย่อยต้องประกอบด้วยแถวและคอลัมน์ที่ต่อเนื่องกัน

กรณีทดสอบ:

35    1    6   26   19   24
 3   32    7   21   23   25
31    9    2   22   27   20
 8   28   33   17   10   15
30    5   34   12   14   16
 4   36   29   13   18   11 

Minimum mean: 14

100    65     2    93
  3    11    31    89
 93    15    95    65
 77    96    72    34

Minimum mean: 46.111

1   1   1   1   1   1   1   1
1   1   1   1   1   1   1   1
1   1   1   1   1   1   1   1
1   1   1   1   1   1   1   1

Minimum mean: 1

4   0   0   5   4
4   5   8   4   1
1   4   9   3   1
0   0   1   3   9
0   3   2   4   8
4   9   5   9   6
1   8   7   2   7
2   1   3   7   9

Minimum mean: 2.2222

นี่คือรหัส - กอล์ฟดังนั้นรหัสที่สั้นที่สุดในแต่ละภาษาชนะ ฉันแนะนำให้คนโพสต์คำตอบในภาษาที่ใช้ไปแล้วแม้ว่าจะไม่สั้นกว่าคำตอบแรก

อ็อกเทฟ 30 ไบต์

@(A)min(mean(im2col(A,[3,3])))

ลองออนไลน์!

เยลลี่ , 11 9 ไบต์

+3\⁺€F÷9Ṃ

ที่บันทึกไว้ 2 ไบต์ขอบคุณที่ @ เดนนิส

ลองออนไลน์!

คำอธิบาย

+3\⁺€F÷9Ṃ  Main link. Input: 2d matrix
+3\        Reduce overlapping sublists of size 3 by addition
   ⁺€      Repeat previous except over each row
     F     Flatten
      ÷9   Divide by 9
        Ṃ  Minimum

อ็อกเทฟ 38 ไบต์

@(M)min(conv2(M,ones(3)/9,'valid')(:))

MATL , 13 9 ไบต์

3thYCYmX<

ท่าเรือคำตอบของ @ rahnema1

ลองออนไลน์!

มันทำงานอย่างไร

พิจารณาการป้อนข้อมูล

[100 65  2 93;
   3 11 31 89;
  93 15 95 65;
  77 96 72 34]

ตัวอย่างเช่น.

3th   % Push [3 3]
      % STACK: [3 3]
YC    % Input matrix implicitly. Convert 3x3 sliding blocks into columns
      % STACK: [100   3  65  11;
                  3  93  11  15;
                 93  77  15  96;
                 65  11   2  31;
                 11  15  31  95;
                 15  96  95  72;
                  2  31  93  89;
                 31  95  89  65;
                 95  72  65  34]
Ym    % Mean of each column
      % STACK: [46.1111 54.7778 51.7778 56.4444]
X<    % Minimum of vector. Display implicitly
      % STACK: [46.1111]

Mathematica, 37 35 ไบต์

ขอบคุณ @MartinEnder สำหรับ 2 ไบต์!

Min@BlockMap[Mean@*Mean,#,{3,3},1]&

คำอธิบาย

Min@BlockMap[Mean@*Mean,#,{3,3},1]&
    BlockMap[                    ]&  (* BlockMap function *)
                        #            (* Divide the input *)
                          {3,3}      (* Into 3x3 matrices *)
                                1    (* With offset 1 *)
             Mean@*Mean              (* And apply the Mean function twice to
                                        each submatrix *)
Min                                  (* Find the minimum value *)

Python 2 , 93 81 80 79 ไบต์

f=lambda M:M[2:]and min(sum(sum(zip(*M[:3])[:3],()))/9,f(M[1:]),f(zip(*M)[1:]))

ลองออนไลน์!

มันทำงานอย่างไร

Fเป็นฟังก์ชันเวียนที่จะนำรายชื่อของ tuples (หรืออื่น ๆ ที่จัดทำดัชนี 2D ใด ๆ iterable ที่แสดงถึงเมทริกซ์M ) และซ้ำคำนวณต่ำสุดของค่าเฉลี่ยของ3 × 3 submatrix ในมุมซ้ายบนและฉนำมาใช้ซ้ำเพื่อMโดยไม่ต้อง แถวแรกและMโดยไม่มีคอลัมน์แรก

f(M) ทำดังต่อไปนี้

• ถ้าMมีน้อยกว่าสามแถวM[2:]เป็นรายการว่างเปล่าซึ่งfส่งคืน

  โปรดทราบว่าเนื่องจากn> 3ในการเรียกใช้ครั้งแรกการเริ่มต้นไม่สามารถส่งคืนรายการว่างได้

• หากMมีสามแถวขึ้นไปM[2:]จะไม่ว่างเปล่าและเป็นจริงดังนั้นรหัสทางด้านขวาของandจะถูกเรียกใช้งานจะส่งกลับค่าขั้นต่ำสามค่าต่อไปนี้

  min(sum(sum(zip(*M[:3])[:3],()))/9

  M[:3]ผลตอบแทนถัวเฉลี่ยสามแถวแรกของM , zip(*...)transposes แถวและคอลัมน์ (ผลผลิตรายการ tuples ก), sum(...,())เชื่อม tuples ทั้งหมด (งานนี้เพราะ+เป็นเรียงต่อกัน) และsum(...)/9คำนวณค่าเฉลี่ยของรายการที่เกิดจากเก้าจำนวนเต็ม

  f(M[1:])

  ใช้fกับMแบบเรียกซ้ำโดยลบแถวแรกออก

  f(zip(*M)[1:])

  สลับแถวและคอลัมน์ลบแถวแรกของผลลัพธ์ (ดังนั้นคอลัมน์แรกของMและใช้fซ้ำกับผลลัพธ์ซ้ำ

โปรดทราบว่าเลเยอร์ที่ลบไปก่อนหน้านี้ในการเรียกซ้ำจะเป็นแถวเสมอดังนั้นการทดสอบว่าMมีแถวเพียงพอหรือไม่ก็จะเพียงพอเสมอ ..

ในที่สุดเราอาจคาดหวังว่าการโทรซ้ำแบบเรียกคืนบางครั้งอาจ[]เป็นปัญหา อย่างไรก็ตามใน Python 2เมื่อใดก็ตามที่nเป็นตัวเลขและAคือ iterable การเปรียบเทียบn < Aจะส่งกลับค่าTrueดังนั้นการคำนวณอย่างน้อยหนึ่งหมายเลขขึ้นไปและ iterables หนึ่งหรือมากกว่านั้นจะส่งกลับตัวเลขที่ต่ำที่สุดเสมอ

J , 21 ไบต์

[:<./@,9%~3+/\3+/\"1]

ลองออนไลน์!

วิธีการที่เหมาะสมในการดำเนินงานใน subarrays ใน J คือการใช้สาม ( _3รูปแบบ) ของการตัด;.ที่x (u;._3) yหมายถึงการใช้คำกริยาuในแต่ละ subarray เต็มรูปแบบของขนาดของอาร์เรย์x yโซลูชันที่ใช้ที่ต้องการเพียง 1 ไบต์ แต่จะมีประสิทธิภาพมากกว่าในอาร์เรย์ขนาดใหญ่กว่า

[:<./@,9%~3 3+/@,;._3]

ลองออนไลน์!

คำอธิบาย

[:<./@,9%~3+/\3+/\"1]  Input: 2d array M
                    ]  Identity. Get M
                  "1   For each row
              3  \       For each overlapping sublist of size 3
               +/          Reduce by addition
          3  \         For each overlapping 2d array of height 3
           +/            Reduce by addition
       9%~             Divide by 9
[:    ,                Flatten it
  <./@                 Reduce by minimum

เยลลี่ขนาด 18 ไบต์

พลาดกลลวงที่ใช้ไมล์เป็นคำตอบในการใช้การลด n-wise แบบสะสมนอกจากนี้บรรทัดแรกทั้งหมดสามารถถูกแทนที่ด้วย+3\11

ẆµL=3µÐfS€
ÇÇ€FṂ÷9

ลองออนไลน์!

สำรวจรายการย่อยที่อยู่ติดกันทั้งหมดตัวกรองเพื่อเก็บเฉพาะความยาว 3 และผลรวม (เวกเตอร์ที่) จากนั้นทำซ้ำสำหรับแต่ละรายการผลลัพธ์เพื่อให้ได้ผลรวมของเมทริกซ์ย่อย 3 ทั้งหมด 3 และในที่สุดจะทำให้แบนเหล่านั้นเป็นรายการเดียว หารด้วย 9 (จำนวนองค์ประกอบที่สร้างผลรวมขั้นต่ำนี้)

Pyth, 19 ไบต์

chSsMsMs.:R3C.:R3Q9

โปรแกรมที่รับอินพุตของรายการรายการและพิมพ์ผลลัพธ์

ชุดทดสอบ

มันทำงานอย่างไร

[คำอธิบายมาในภายหลัง]

Python 3 , 111 103 ไบต์

lambda m,r=range:min(sum(sum(m[y+i][x:x+3])for i in r(3))/9for x in r(len(m[0])-3)for y in r(len(m)-3))

ลองออนไลน์!

Python 2, 96 ไบต์

h=lambda a:[map(sum,zip(*s))for s in zip(a,a[1:],a[2:])]
lambda a:min(map(min,h(zip(*h(a)))))/9.

กรณีทดสอบที่Repl.it

ฟังก์ชั่นที่ไม่มีชื่อการรับรายการa- แถวของเมทริกซ์

ฟังก์ชั่นตัวช่วยhซิปผ่านชิ้นส่วนที่อยู่ติดกันสามชิ้นและแมปฟังก์ชันผลรวมข้ามzip(*s)แต่ละส่วน ซึ่งจะส่งผลในการสรุปความสูงทั้งหมดสามชิ้นของคอลัมน์เดี่ยว

ฟังก์ชันที่ไม่มีชื่อเรียกฟังก์ชันผู้ช่วยสลับและเรียกฟังก์ชันผู้ช่วยอีกครั้งในผลลัพธ์จากนั้นค้นหาค่าต่ำสุดของแต่ละค่าและค่าต่ำสุดของผลลัพธ์จากนั้นหารด้วย9.เพื่อให้ได้ค่าเฉลี่ย

JavaScript (ES6), 107 98 96 ไบต์

Mฟังก์ชั่นที่คำนวณผลรวมของแฝดมากกว่าแถวแล้วเรียกตัวเองที่จะทำในสิ่งเดียวกันซ้ำคอลัมน์การติดตามค่าต่ำสุด

f=m=>m.map((r,y)=>r.map((v,x)=>M=(z[x<<9|y]=v+=r[x+1]+r[x+2])<M?v:M),z=[M=1/0])&&m[1]?f([z]):M/9

JS นั้นค่อนข้างละเอียดสำหรับสิ่งของประเภทนั้นและขาดzip()วิธีการเนทีฟ ฉันใช้เวลาค่อนข้างนานในการบันทึกเพียงโหลจำนวนมากกว่าวิธีการที่ไร้เดียงสามากขึ้น (แต่วิธีที่สั้นกว่าอาจมีอยู่)

รุ่นที่ไม่ใช่แบบเรียกซ้ำ 103 ไบต์

บันทึก 2 ไบต์ด้วยความช่วยเหลือของ Neil

m=>m.map((r,y)=>y>1?r.map((v,x)=>[..."12345678"].map(i=>v+=m[y-i%3][x+i/3|0])&&(M=v<M?v:M)):M=1/0)&&M/9

กรณีทดสอบ

f=m=>m.map((r,y)=>r.map((v,x)=>M=(z[x<<9|y]=v+=r[x+1]+r[x+2])<M?v:M),z=[M=1/0])&&m[1]?f([z]):M/9

console.log(f([
  [ 35,  1,  6, 26, 19, 24 ],
  [  3, 32,  7, 21, 23, 25 ],
  [ 31,  9,  2, 22, 27, 20 ],
  [  8, 28, 33, 17, 10, 15 ],
  [ 30,  5, 34, 12, 14, 16 ],
  [  4, 36, 29, 13, 18, 11 ]
]));

console.log(f([
  [ 100, 65,  2, 93 ],
  [   3, 11, 31, 89 ],
  [  93, 15, 95, 65 ],
  [  77, 96, 72, 34 ]
]));

console.log(f([
  [ 1, 1, 1, 1, 1, 1, 1, 1 ],
  [ 1, 1, 1, 1, 1, 1, 1, 1 ],
  [ 1, 1, 1, 1, 1, 1, 1, 1 ],
  [ 1, 1, 1, 1, 1, 1, 1, 1 ]
]));

console.log(f([
  [ 4, 0, 0, 5, 4 ],
  [ 4, 5, 8, 4, 1 ],
  [ 1, 4, 9, 3, 1 ],
  [ 0, 0, 1, 3, 9 ],
  [ 0, 3, 2, 4, 8 ],
  [ 4, 9, 5, 9, 6 ],
  [ 1, 8, 7, 2, 7 ],
  [ 2, 1, 3, 7, 9 ]
]));

05AB1E , 21 16 ไบต์

2FvyŒ3ùO})ø}˜9/W

ลองออนไลน์!

คำอธิบาย

2F         }       # 2 times do:
  v     }          # for each row in the matrix
   yŒ3ù            # get all sublists of size 3
       O           # reduce by addition
         )ø        # transpose matrix
            ˜      # flatten the matrix to a list
             9/    # divide each by 9
               W   # get the minimum

Haskell , 87 ไบต์

import Data.List
t(a:b:c:d)=a+b+c:t(b:c:d);t _=[]
s=(/9).minimum.(t=<<).transpose.map t

ลองออนไลน์!