우리는 모두 구식 전화 키패드에 익숙합니까? 참고로 다음과 같습니다.

소문자 ASCII 문자와 단일 공백 으로 만 구성된 문자열이 주어진 경우 전화 키패드로 전체 문자열을 위와 같이 입력하려면 탭 수를 반환해야합니다.

이에 익숙하지 않은 사람들을 위해 다음과 같이 작동합니다.

• 2예를 들어, 숫자가있는 키 에는 문자열이 abc적혀 있습니다. 을 입력 a하려면이 키를 한 번 b눌러야합니다. 두 번 c눌러야하고 세 번 눌러야합니다.

• 동일한 키에있는 연속 문자의 경우 1 초 후에 다시 눌러야합니다. 따라서을 입력 cb하려면을 3 번 누르고 c잠시 기다린 다음을 두 번 눌러 b5 번 탭해야합니다.

• 한 번만 누르면되는 단일 공백을 제외하고 다른 모든 키에도 동일하게 적용됩니다 . 또한 열쇠 7와 9네 글자가 있습니다. 동일한 알고리즘이 적용되며 문자의 수만 다릅니다. 각 키에 해당하는 문자열은 위의 이미지 (소문자) 또는 다음 목록에서 찾을 수있는 모든 문자가 포함되어 있습니다.

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

테스트 사례

입력-> 출력 (설명)

""-> 0 (아무것도 탭하지 않아야 함)
"물"-> 8 ( "w, a, t"는 각각 1 개의 탭 (키 9, 2 및 8), "e"는 2 개의 탭 (키 3), "r"은 3 개의 탭 (키 7) ), 1 + 1 + 1 + 2 + 3 = 8)
"비누"-> 9 (4 + 3 + 1 + 1)
"칸델라"-> 13 (3 + 1 + 2 + 1 + 2 + 3 + 1)
"코드 골프"-> 20 (3 + 3 + 1 + 2 + 1 (공간) + 1 + 3 + 3 + 3)
"언덕의 왕"-> 33 (2 + 3 + 2 + 1 + 1 + 3 + 3 + 1 + 1 + 2 + 2 + 1 + 2 + 3 + 3 + 3)

명세서

• 표준 I / O 규칙 및 기본 허점이 적용됩니다.

• 언어의 기본 문자열 유형으로 만 입력 할 수 있습니다. 출력은 정수 또는 해당 정수의 문자열 표현 일 수 있습니다.

• 이것은 code-golf 이며 모든 언어에서 가장 짧은 답변 입니다 .

JavaScript (ES6) 77 66 64 60 바이트

(@Johan Karlsson 및 @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 바이트

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

온라인으로 사용해보십시오!

설명

ð¢                         # 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

파이썬 2 , 56 바이트

@RickHitchcock의 Javascript 솔루션 과 동일한 알고리즘을 사용합니다.

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

온라인으로 사용해보십시오!

파이썬 3 , 69 67 65 64 바이트

Mr. Xcoder 덕분에 1 바이트.

Felipe Nardi Batista 덕분에 1 바이트.

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

온라인으로 사용해보십시오!

Dyalog APL, 37 바이트

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

온라인으로 사용해보십시오!

방법?

가져 오기 ⍳문자열에 입력의 모든 문자의 ndex을 'adgjmptw behknqux~cfilorvy~'( s및 z28로 기본 설정됩니다) 9 라운드까지와 합으로, 나누기.

자바 스크립트 (ES6), 71 바이트

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>

문자표를 보지 마십시오! 나는 @LeakyNun의 공식을 이해하지 못해서 내 자신을 생각해 냈습니다.

기음, 211 196 바이트

여기에 첫 번째 제출 ... 아주 오래 걸리고 이것이 효과적인 접근 방법은 아니지만 적어도 효과가 있음을 알았습니다. :)

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;}

언 골프 버전 :

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;
}

하스켈 -74 71 62 바이트

편집 : 필터 대신 목록 이해를 사용하여 3 바이트 제거

편집 : Siracusa, Laikoni 및 Zgarb 덕분에 9 바이트를 절약하십시오!

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

용법

λ> f "candela"
13
λ>

온라인으로 사용해보십시오!

젤리 , 25 바이트

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

온라인으로 사용해보십시오!

클로저, 82 76 바이트

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

오, 그것은 단지에 간단 filter하고 count사용하는 것보다 frequencies. 기발한:

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

문자열은 주어진 문자의 키를 한 번만 몇 번 이상 인코딩 하는지를 인코딩합니다. :)

파이썬 3 , 91 바이트

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

온라인으로 사용해보십시오!

파이썬 3 , 60 바이트

아마도 이것이 파이썬에서 처음으로 골프 였기 때문에 아마도 차선책 일 것입니다.

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

온라인으로 사용해보십시오!

망막 , 46 36 바이트

6 바이트를 절약 해 준 CalculatorFeline에 감사드립니다.

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

온라인으로 사용해보십시오!

자바, 95 73 바이트

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

함수를 람다 식으로 만드는 Kevin Cruijssen에게 감사합니다 ( a유형은 String). 95 바이트는 73 바이트가되었습니다!

람다 식은을 사용하여 각 문자의 프레스 수를 요약합니다 map(). map()이 수학을 사용하여 스트림의 각 문자 (소문자 범위의 ASCII는 97-122 임)를 적절한 값으로 변환합니다 (단순 톱파처럼 보이지만 두 사이클을 모두 고려하는 것은 성가시다) 1+(b<64?0:b+(Math.abs(b-115)<4?4:5))%(3+b/112). 다음 은 해당 모델의 데스 모 그래프입니다.

수학, 83 바이트

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

QBIC , 94 바이트

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

설명

[    |      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

세게 때리다 ,69 68 바이트

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

온라인으로 사용해보십시오!

줄당 하나의 문자를 접고을 사용하여 각 개행을 음역하고 +, 각 공백을 사용 1하고 각 문자를 해당하는 푸시 횟수로 씁니다. bc는 합계를 수행합니다.

C, 92 88 바이트

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 바이트

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

온라인으로 사용해보십시오!

S 와 Z가 없는 알파벳에서 mod-3 인덱스를 찾습니다 . 우주부터 S 및 Z 를 찾을 수 없으므로 인덱스 25 (최대 인덱스보다 하나 이상)가 " "에있어 "공간"에 적합합니다. 그런 다음 각 S 또는 Z에 3을 추가하면 됩니다.

{ 인수가 ⍵ 로 표시되는 익명 함수 :

 ⎕A~'SZ' 대문자 AS 와 Z를 제외한 lphabet

 819⌶ 소문자

 ⍵⍳⍨ 그 주장의 요점은

 ¯1+ 부정적인 것을 추가하다

 3| 모드 -3

 1+ 하나를 추가하십시오 (이것은 모든 0 모드를 3으로 변환합니다)

 (…),  접두사 :

  ⍵∊'sz' 인수가 s 또는 z 인 부울

  3× 3을 곱하다

 +/ 합집합

C (gcc), 75 77 bytes

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

The unprintable string "" is a table of 04 01 02 03 01 02 03 04.

Try it online!

Pip, 100 90 bytes

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

Check each character of the input for a match in each element of b. The index of that match plus 1 gets added to the total.

Try it online!