Kita semua terbiasa dengan tombol telepon sekolah lama, kan? Untuk referensi, berikut ini tampilannya:

Diberikan String yang hanya terdiri dari huruf - huruf ASCII huruf kecil dan spasi tunggal , tugas Anda adalah mengembalikan jumlah ketukan yang harus dibuat untuk mengetikkan String penuh dengan keypad telepon seperti yang di atas.

Bagi mereka yang tidak terbiasa dengan ini, inilah cara kerjanya:

• Kunci dengan digit 2, misalnya, juga memiliki string yang abcditulis di atasnya. Untuk mengetik a, Anda harus menekan tombol ini sekali, karena bAnda harus menekan dua kali dan untuk cAnda harus menekan tiga kali.

• Untuk huruf berurutan yang menggunakan tombol yang sama, Anda harus menunggu 1 detik sebelum menekan lagi. Jadi, jika Anda ingin mengetik cb, Anda harus menekan 3 kali untuk c, tunggu sebentar dan kemudian tekan dua kali b, jadi masih 5 ketukan.

• Hal yang sama berlaku untuk semua tombol lain, kecuali untuk satu ruang, yang hanya membutuhkan 1 tekan. Perhatikan juga bahwa tombol 7dan 9ada empat huruf di atasnya. Algoritma yang sama diterapkan, satu-satunya perbedaan adalah jumlah huruf. String yang terkait dengan setiap tombol dapat ditemukan pada gambar di atas (tetapi huruf kecil), atau dalam daftar berikut, yang berisi semua karakter yang mungkin Anda terima:

  "abc", "def", "ghi", "jkl", "mno", "pqrs", "tuv", "wxyz", " "
  

Uji Kasus

Input -> Output (Penjelasan)

"" -> 0 (tidak ada yang disadap)
"air" -> 8 ("w, a, t" masing-masing membutuhkan 1 keran (pada tombol 9, 2 dan 8), "e" memerlukan 2 keran (pada tombol 3), "r" membutuhkan 3 keran (pada tombol 7 ), 1 + 1 + 1 + 2 + 3 = 8)
"sabun" -> 9 (4 + 3 + 1 + 1)
"candela" -> 13 (3 + 1 + 2 + 1 + 2 + 3 + 1)
"kode golf" -> 20 (3 + 3 + 1 + 2 + 1 (untuk ruang) + 1 + 3 + 3 + 3)
"raja bukit" -> 33 (2 + 3 + 2 + 1 + 1 + 3 + 3 + 1 + 1 + 2 + 2 + 1 + 2 + 3 + 3 + 3)

Spesifikasi

• Aturan I / O standar dan Celah Default berlaku.

• Anda hanya dapat mengambil input dalam tipe String asli bahasa Anda. Output dapat berupa integer atau representasi string dari integer itu.

• Ini adalah kode-golf , jawaban terpendek dalam setiap bahasa menang.

JavaScript (ES6) 77 66 64 60 byte

(Menyimpan beberapa byte berkat @Johan Karlsson dan @Arnauld).

s=>[...s].map(l=>s=~~s+2+'behknquxcfilorvysz'.search(l)/8)|s

f=

s=>[...s].map(l=>s=~~s+2+'behknquxcfilorvysz'.search(l)/8)|s

console.log(f(''));                 //0
console.log(f('water'));            //8
console.log(f('soap'));             //9
console.log(f('candela'));          //13
console.log(f('code golf'));        //20
console.log(f('king of the hill')); //33

05AB1E , 29 26 25 byte

ð¢svA•22ā₂•S£ð«øðδKy.åƶOO

Cobalah online!

Penjelasan

ð¢                         # count spaces in input
  sv                       # for each char y in input
    A                      # push the lowercase alphabet
     •22ā₂•S               # push the base-10 digit list [3,3,3,3,3,4,3,4]
            £              # split the alphabet into pieces of these sizes
             ð«            # append a space to each
               ø           # transpose
                ðδK        # deep remove spaces
                   y.å     # check y for membership of each
                      ƶ    # lift each by their index in the list
                       O   # sum the list
                        O  # sum the stack

Python 2 , 56 byte

Menggunakan algoritma yang sama dengan solusi Javascript @ RickHitchcock

lambda x:sum('behknquxcfilorvysz'.find(c)/8+2for c in x)

Cobalah online!

Python 3 , 69 67 65 64 byte

1 byte terima kasih kepada Tn. Xcoder.

1 byte terima kasih kepada Felipe Nardi Batista.

lambda x:sum((ord(i)+~(i>"s"))%3+3*(i in"sz")+(i>" ")for i in x)

Cobalah online!

Dyalog APL, 37 byte

+/⌈9÷⍨'adgjmptw behknqux~cfilorvy~'⍳⍞

Cobalah online!

Bagaimana?

Dapatkan ⍳ndex dari setiap karakter input dalam string 'adgjmptw behknqux~cfilorvy~'( sdan zakan default ke 28), bagi dengan 9, bulatkan dan jumlahkan.

JavaScript (ES6), 71 byte

f=
s=>[...s].map(c=>t+=((c=parseInt(0+c,36))>23?c+3:c&&~-c%3)%7%4+1,t=0)|t

<input oninput=o.textContent=f(this.value)><pre id=o>

Tidak terlihat meja surat! Saya tidak begitu mengerti formula @ LeakyNun jadi saya membuat sendiri.

C, 211 196 byte

Pengajuan pertama di sini ... terlihat cukup panjang dan saya melihat bahwa ini bukan pendekatan yang efisien, tetapi setidaknya berhasil :)

f(char*n){char*k=" abcdefghijklmnopqrstuvwxyz";int t[]={0,3,3,3,3,3,4,3,4};int l=0,s,j,i;while(*n){i=0;while(k[i]){if(k[i]==*n){s=0;for(j=0;s<i-t[j];s+=t[j++]);*n++;l+=(!i?1:i-s);}i++;}}return l;}

Versi tidak disatukan:

int f(char *n){
  char *k=" abcdefghijklmnopqrstuvwxyz";
  int t[]={0,3,3,3,3,3,4,3,4};
  int l=0,s,j,i;
  while(*n){                          // loop through input characters
    i=0;
    while(k[i]){
      if(k[i]==*n){                   // find matching char in k
        s=0;
        for(j=0;s<i-t[j];s+=t[j++]);  // sum up the "key sizes" up to the key found
        *n++;
        l+=(!i?1:i-s);                // key presses are i-s except for space (1)
      }
      i++;
    }
  }
  return l;
}

Haskell - 74 71 62 byte

Sunting: dihapus 3 byte dengan menggunakan pemahaman daftar alih-alih filter

Sunting: Hemat 9 byte berkat Siracusa, Laikoni dan Zgarb!

f=sum.(>>= \x->1:[1|y<-"bcceffhiikllnooqrrsssuvvxyyzzz",y==x])

Pemakaian

λ> f "candela"
13
λ>

Cobalah online!

Jelly , 25 byte

Øaḟ⁾sz©;⁶s3Z®ṭċ@€€⁸×"J$ẎS

Cobalah online!

Clojure, 82 76 byte

#(apply +(for[c %](+(count(filter #{c}"bcceffhiikllnooqrrsssuvvxyyzzz"))1)))

Oh itu lebih sederhana untuk digunakan filterdan countdigunakan frequencies. Asli:

#(apply +(count %)(for[c %](get(frequencies"bcceffhiikllnooqrrsssuvvxyyzzz")c 0)))

String mengkodekan berapa kali lebih dari sekali Anda perlu menekan tombol untuk karakter yang diberikan :)

Python 3 , 91 byte

lambda x:sum(j.find(i)+1for j in' !abc!def!ghi!jkl!mno!pqrs!tuv!wxyz'.split('!')for i in x)

Cobalah online!

Python 3 , 60 byte

Mungkin kurang optimal, karena ini adalah golf pertama saya di Python.

lambda x:sum((ord(i)-8)%3.15//1+3*(i>'y')+(i>' ')for i in x)

Cobalah online!

Retina , 46 36 byte

Terima kasih kepada CalculatorFeline untuk menghemat 6 byte.

s|z
,c
[cfilorvy]
,b
[behknqux]
,,
.

Cobalah online!

Java, 95 73 byte

a->a.chars().map(b->1+(b<64?0:b+(Math.abs(b-115)<4?4:5))%(3+b/112)).sum()

Terima kasih kepada Kevin Cruijssen karena membuat fungsi ekspresi lambda (di mana atipenya String). 95 byte menjadi 73 byte!

Ekspresi lambda merangkum jumlah pers dari setiap karakter menggunakan map(). map()bertobat masing-masing karakter (ASCII di kisaran huruf kecil adalah 97-122) di sungai dengan nilai yang sesuai (terlihat seperti gelombang gergaji sederhana, namun dengan mempertimbangkan baik 4 siklus menjengkelkan) menggunakan matematika ini: 1+(b<64?0:b+(Math.abs(b-115)<4?4:5))%(3+b/112). Inilah grafik desmos dari model itu.

Mathematica, 83 byte

c=Characters;Tr[Tr@Mod[c@"bc1def1ghi1jkl1mno1pqrstuv1wxyz "~Position~#,4]+1&/@c@#]&

QBIC , 94 byte

[_l;||_SA,a,1|p=p-(instr(@sz`,B)>0)-(instr(@cfilorvy`+C,B)>0)-(instr(@behknqux`+C+D,B)>0)+1}?p

Penjelasan

[    |      FOR a = 1 TO
 _l |         the length of
   ;            the input string (A$)
_SA,a,1|    Take the a'th char of A$ and assign it to B$
p=p         p is our tap-counter, and in each iteration it gets increased by the code below
            which consist of this pattern:
                instr(@xyz`,B)>0    where 
                - instr tests if arg 2 is in arg 1 (it either returns 0 or X where X is the index of a2 in a1)
                - @...` defines the letters we want to test as arg1
                - B is the current letter to count the taps for
            Each of these blocks adds 1 tap to the counter, and each block has the letters of its level
            (4-taps, 3-taps or 2-taps) and the level 'above' it.
    -(instr(@sz`,B)>0)              <-- letters that require 4 taps
    -(instr(@cfilorvy`+C,B)>0)      <-- 3 or 4 taps
    -(instr(@behknqux`+C+D,B)>0)    <-- 2, 3,or 4 taps
    +1                              <-- and always a 1-tap
}           NEXT
?p          PRINT the number of taps

Bash ,69 68 byte

bc<<<`fold -1|tr "\n "adgjmptwbehknquxcfilorvysz +[1*9][2*8][3*8]44`

Cobalah online!

Lipat satu karakter per baris, transliterasikan setiap baris baru dengan +, setiap spasi dengan 1dan setiap huruf dengan jumlah push yang sesuai. bc melakukan penjumlahan.

C, 92 88 byte

c,n;f(char*s){n=0;while(c=*s++)n+=(c=='s')+3*(c>'y')+1+(c+1+(c<'s'))%3-(c<33);return n;}

APL (Dyalog) , 36 byte

{+/(3×⍵∊'sz'),1+3|¯1+⍵⍳⍨819⌶⎕A~'SZ'}

Cobalah online!

Menemukan mod-3 indeks dalam alfabet tanpa S dan Z . Karena ruang, S , dan Z tidak ditemukan, mereka "memiliki" indeks 25 (satu lebih dari indeks maks), yang baik untuk ruang. Kemudian kita hanya perlu menambahkan 3 untuk masing-masing S atau Z .

{ fungsi anonim di mana argumen diwakili oleh ⍵ :

 ⎕A~'SZ'lfabet  huruf besar A , kecuali untuk S dan Z

 819⌶ huruf kecil

 ⍵⍳⍨ yang ɩ ndices argumen bahwa

 ¯1+ tambahkan yang negatif

 3| mod-3

 1+ tambahkan satu (ini mengkonversi semua 0-mod ke 3)

 (... ), tambahkan:

  ⍵∊'sz' Boolean di mana argumennya adalah s atau z

  3× kalikan dengan 3

 +/ jumlah

C (gcc) , 7577 byte

n,b;f(char*a){for(n=0;b=*a++;)n+=b<'s'?--b%3+(b>31):""[b-'s'];a=n;}

String yang tidak dapat dicetak ""adalah tabel dari 04 01 02 03 01 02 03 04.

Cobalah online!

Pip , 100 90 byte

a:qb:["abc""def""ghi""jkl""mno""pqrs""tuv""wxyz"s]Fc,#a{Fd,#b{e:((bd)@?(ac))e<4?i+:e+1x}}i

Periksa setiap karakter input untuk kecocokan di setiap elemen b. Indeks kecocokan itu ditambah 1 akan ditambahkan ke total.

Cobalah online!