Ambil sebuah array yang terdiri dari angka atau array, output jika hanya berisi 2s.

Output harus berupa nilai truey atau falsey (Maaf jika ini menghancurkan jawaban)

Kasus Uji Kebenaran

[2]
[2,2]
[[2],[2,2],2]
[]
[[],[]]

Kasus Uji Falsey

[1]
[22]
[2,2,2,1]
[[1,2],2]

Celah Standar Dilarang.

Aturan IO standar berlaku.

Kode-golf, byte Paling Sedikit menang!

MATL , 3 byte

2=p

Cobalah online!

Secara teknis, ini bisa saja

2=

Karena array yang mengandung elemen nol adalah palsu, tetapi ini tampaknya murah.

Python 2 , 43 40 byte

f=lambda l:l>=[]and all(map(f,l))or l==2

Cobalah online!

Pada saat memposting jawaban ini, masih diperbolehkan per konsensus meta ini untuk menghasilkan output melalui melempar kesalahan / tidak melempar kesalahan. Karenanya jawaban ini pada 26 byte adalah valid:

f=lambda l:l==2or map(f,l)

Cobalah online!

Prolog (SWI) , 43 33 byte

Saya mencium ... rekursi .

Terima kasih kepada Emigna dan Leaky Nun karena telah menghemat 10 byte!

Kode

a([]).
a([X|T]):-(X=2;a(X)),a(T).

Cobalah online! atau Verifikasi semua kasus uji!

Penjelasan:

Untuk pengguna non-Prolog, daftar diformat dengan cara sebagai berikut: [Head | Tail].

Ini Headadalah elemen pertama dari daftar, dan ekor adalah daftar yang tersisa. Uji di sini! . Kasus penting di sini adalah bahwa ekor daftar dengan 1 elemen sama dengan []. Anda dapat mengujinya di sini .

% State that an empty array is truthy.
a([]).

% If the list is not empty (covered by the previous line), we need to check
% whether the Head is equal to 2 or whether the head is truthy.
% After that, we only need to check if the remaining list is truthy.
a([Head | Tail]) :- (Head = 2; a(Head)), a(Tail).

Jelly , 4 byte

F;2E

Cobalah online!

Bagaimana itu bekerja

F;2E
F    flatten
 ;2  append 2
   E all elements are equal

Oktaf, 13 byte

@(x)~any(x-2)

Verifikasi semua kasus uji.

Ini adalah fungsi anonim mengambil satu argumen input x,. Ini mengurangi 2dari semua elemen, memeriksa apakah ada elemen non-nol. Ini meniadakan output untuk mendapatkan trueuntuk kasus-kasus di mana semua nilai adalah nol.

Ini berfungsi karena x-2berfungsi untuk matriks dari semua ukuran, termasuk matriks kosong [],.

x-2 akan cukup jika tidak ada matriks kosong di input.

Matematika , 28 byte

Select[Flatten@#,#!=2&]=={}&

Cobalah online!

Retina , 13 10 byte

Terima kasih kepada Kritixi Lithos untuk menghemat 3 byte.

\W|\b2

^$

Cobalah online!

05AB1E , 4 byte

˜YQP

Cobalah online!

Penjelasan

˜      # flatten list
 YQ    # check each element for equality to 2
   P   # product of list

JavaScript (ES6), 22 19 23 22 byte

a=>!/[^2,]|22/.test(a)

Menguji

f=
a=>!/[^2,]|22/.test(a)
console.log(" "+f([2])+": "+JSON.stringify([2]))
console.log(" "+f([2,2])+": "+JSON.stringify([2,2]))
console.log(" "+f([[2],[2,2],2])+": "+JSON.stringify([[2],[2,2],2]))
console.log(" "+f([])+": "+JSON.stringify([]))
console.log(" "+f([[],[]])+": "+JSON.stringify([[],[]]))
console.log(f([1])+": "+JSON.stringify([1]))
console.log(f([22])+": "+JSON.stringify([22]))
console.log(f([2,2,2,1])+": "+JSON.stringify([2,2,2,1]))
console.log(f([[1,2],2])+": "+JSON.stringify([[1,2],2]))

Mathematica, 15 byte

FreeQ[x_/;x!=2]

Ini juga berfungsi dalam Matematika. Cobalah online!

APL (Dyalog) , 5 byte

∧/2=∊

Cobalah online!

Penjelasan

∧/                         Only
  2=                       2s are equal to
    ∊                      any of the elements in the enlisted form of the right argument

Mathematica, 24 byte

Cases[t=Flatten@#,2]==t&

Fungsi murni kembali Trueatau False. Setelah Flattenmemasukkan array bersarang dan memanggilnya t,Cases[t,2] mengembalikan daftar elemen yang cocok dengan "pola" 2, dan ==tmemeriksa apakah itu seluruh daftar.

Mathematica, 29 byte

(#//.{2->{},{{}..}->{}})=={}&

Tidak sesingkat, tetapi lebih menyenangkan. Mulai dari input #, dua aturan penggantian diterapkan hingga hasilnya berhenti berubah ( //.): pertama, semua 2diganti oleh {}s; dan kemudian daftar mana pun yang entri semua set kosong ( {{}..}) diganti (berulang kali) dengan set kosong. Jika sisanya adalah set kosong ( =={}), kami menang.

Haskell , 36 byte

Fungsi anonim, mengambil a String dan mengembalikan a Bool.

Digunakan sebagai (all((==2).fst).(reads=<<).scanr(:)[]) "[2,2,2,1]"

all((==2).fst).(reads=<<).scanr(:)[]

Cobalah online!

Bagaimana itu bekerja

• Haskell tidak memiliki built-in daftar tipe campuran, jadi kami mengambil string sebagai argumen.
• scanr(:)[] menghasilkan daftar semua sufiks string.
• (reads=<<) mencoba mengurai angka di awal setiap sufiks, menggabungkan keberhasilan menjadi daftar tupel (n,restOfString) .
• all((==2).fst)memeriksa apakah semua angka yang diuraikan adalah 2.

Python 2 , 38 byte

lambda l:l.strip('[],2')==l*('22'in l)

Cobalah online!

Dibawa dalam string tanpa spasi, menghasilkan bool.

Cek apakah menghapus semua karakter '[],2'dari lmemberikan string kosong. Juga periksa bahwa 22itu bukan substring - jika ya, input ldigunakan sebagai pengganti string kosong untuk membandingkan dengan hasil penghapusan, dan yang selalu gagal.

Ruby, 28 23 22 byte - 5 byte disimpan oleh GB

->x{x.flatten-[2]==[]}

Meskipun "rata" sangat panjang, masih lebih pendek daripada solusi berbasis regex atau hal-hal rekursif yang harus menyelamatkan kesalahan dalam kasus dasar. Namun, gabungan set dan array bawaan Ruby, terkadang sangat berguna.

JavaScript (ES6), 26 byte

f=a=>a.map?a.every(f):a==2

Uji kasus

f=a=>a.map?a.every(f):a==2

console.log(f([2]))
console.log(f([2,2]))
console.log(f([[2],[2,2],2]))
console.log(f([]))
console.log(f([[],[]]))

console.log(f([1]))
console.log(f([22]))
console.log(f([2,2,2,1]))
console.log(f([[1,2],2]))

MATL , 4 byte

2-a~

Cobalah online!

Kerusakan:

           % Implicit input
2-         % Push 2 to the stack, and subtract from input
  a        % Any non-zero elements?
    ~      % Negate to get true for cases where all elements are zero.

Yah, kalah besar . Tapi saya menjaga ini, karena saya cukup senang saya mengatur ini sendiri (walaupun tugasnya sangat sederhana).

R, 28 byte

function(x)!any(unlist(x)-2)

unlist(x)mengubah daftar (bersarang) menjadi vektor. Kemudian 2dikurangi dari vektor itu. anymengkonversi (dengan peringatan) numerik menjadi logis dan memeriksa jika ada TRUE. Ini terbalik dengan! dan keluaran.

Ini berfungsi dengan daftar bersarang karena unlist secara default bekerja secara rekursif untuk membatalkan daftar semua entri daftar dari daftar awal.

Ini juga berfungsi dengan daftar kosong, karena unlist(list())menjadi numeric(), vektor numerik kosong. Paksaan dengan anymembuatnya logical(), yang diartikan sebagai FALSEoleh any, dan kemudian dibalik TRUEoleh !.

Python 3 , 55 byte

Tidak selingkuh Menggunakan daftar bersarang sebagai input.

f=lambda a:all(type(x)!=int and f(x)for x in a if x!=2)

Cobalah online!

Jelly , 4 byte

F=2Ạ

Cobalah online!

Sedikit berbeda dari algoritma Leaky.

Penjelasan:

F=2Ạ
F    Flatten
 =2  Check if equal to 2 (vectorizes)
   Ạ Check if there isn't any falsey value

Retina , 14 11 byte

^(\W|2\b)+$

Cobalah online!

05AB1E , 4 byte

2‚˜Ë

Cobalah online!

JavaScript (ES6), 53 50 48 byte

_=>(_+"").split`,`.map(c=>!c?2:c).every(c=>c==2)

Disimpan 5 byte, terima kasih kepada @Shaggy!

Kasus uji:

let f =

_=>(_+"").split`,`.map(c=>!c?2:c).every(c=>c==2)

console.log(f([2]))
console.log(f([2,2]))
console.log(f([[2],[2,2],2]))
console.log(f([]))
console.log(f([[],[]]))

console.log(f([1]))
console.log(f([22]))
console.log(f([2,2,2,1]))
console.log(f([[1,2],2]))

05AB1E , 7 byte

˜DOsg·Q

Cobalah online! atau Coba Semua Tes!

˜D      # Flatten and duplicate
  O     # Sum one copy
   sg·  # Get double the length of the other copy
      Q # Check if they are equal

Java 8, 126 55 27 byte

s->s.matches("(\\W|2\\b)+")

Port dari jawaban Retina @KritixiLithos yang menakjubkan , tidak termasuk ^...$, karena String#matchesselalu cocok dengan seluruh String dan menambahkan^...$ secara implisit.

-2 byte terima kasih kepada Jakob untuk mengingatkan saya tentang ^...$tidak perlu untukString#matches .

Coba di sini.

Python 2 , 44 43 42 byte

Dibawa xsebagai representasi string dari daftar. Ini juga mengasumsikan seperti pada contoh representasi tidak memiliki spasi.

lambda x:set(x)<=set("[],2"*0**("22"in x))

Cobalah online!

Penjelasan

Keduanya mengambil karakter dalam representasi string dari input dan menentukan apakah ada karakter selain [], 2di dalamnya. Mereka melakukan ini dengan melakukan casting ke set dan membandingkan dengan set hanya karakter tersebut. Namun ini gagal jika kita memiliki angka selain 2 yang hanya memiliki angka 2 (misalnya 22 atau 222), untuk menambal kasus ini kita mengalikan string yang digunakan untuk membuat set dengan negasi apakah xmengandung atau tidak "22". Jika berisi itu ini akan menjadi set kosong, jika tidak maka akan sama seperti sebelumnya.

Ohm, 6 byte

∙e]Å2N

Penggunaan CP-437 penyandian.

Penjelasan:

∙e]Å2E
∙e           ■Evaluate the input to form an array
   Å         ■any(              ,             )
  ]          ■    flatten(input)
    2N       ■                   lambda x:x!=2
             ■implict end of any and print

PHP, 46 byte

<?=!preg_match('/:"(?!2")/',serialize($_GET));

PHP <7.0, 29 Bytes

Input sebagai array string yang disandikan JSON

<?=!ereg("22|[013-9]",$argn);

PHP <7.0, 42 Bytes

gunakan fungsi ereg yang sudah tidak digunakan lagi

<?=!ereg("22|[013-9]",json_encode($_GET));

PHP, 50 Bytes

mencetak 1 untuk true dan nothing for false

-1 Byte untuk penghapusan bijaksana lainnya !

atau + 1 Byte untuk true 1, false 0 tambahkan +sebelumnya!

<?=!preg_match('#22|[013-9]#',json_encode($_GET));

Cobalah online!

Pyth, 6 byte

!-.nQ2

Sangat mirip dengan jawaban CJam saya. Saya masih baru di Pyth, jadi tolong beri tahu saya jika ada yang bisa saya mainkan.

Penjelasan:

    Q   Input:     [[[], [2]], [1]]
  .n    Flatten:   [2, 1]
 -   2  Remove 2s: [1]
!       Not:       False