입력

문자열

산출

줄에있는 모든 정수의 합입니다.

제약

선 ≤500의 1≤Length

샘플 테스트 사례

입력

the 5is 108 seCONd4 a

산출

117

설명

합계 : 5 + 108 + 4 = 117

자바 스크립트, 34 32 바이트

s=>eval(s.match(/\d+/g).join`+`)

모든 숫자를 일치시키고 +5 + 108 + 4로 바꾸어 결과를 평가하십시오.
양의 정수에서만 작동합니다.

Arnauld 덕분에 2 바이트 절약

f=
    s=>eval(s.match(/\d+/g).join`+`)

g=()=>b.innerHTML = f(a.value)
g()

<input id=a value="the 5is 108 seCONd4 a" onkeyup="g()">
<pre id=b>

펄 6 , 14 바이트

{sum m:g/\d+/}

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

모든 일련의 자릿수의 합을 반환하는 익명 코드 블록

05AB1E , 11 6 바이트

þмS¡þO

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

설명:

þм       # Only leave the non-digits of the (implicit) input-string
         #  i.e. "the 5is 108 seCONd4 a" → "the is  seCONd a"
  S      # Split it into a list of characters
         #  → ["t","h","e"," ","i","s"," "," ","s","e","C","O","N","d"," ","a"]
   ¡     # Split the (implicit) input-string by each of these characters
         #  → ["","","","","5","","","108","","","","","","","4","",""]
    þ    # Remove the empty strings by only leaving the digits
         #  → ["5","108","4"]
     O   # And sum these numbers (which is output implicitly)
         #  → 117

R , 64 48 45 바이트

PowerShell 항목을 본 후 나는 이것을 더 골프화 할 수있었습니다.

function(s)eval(parse(,,gsub('\\D+','+0',s)))

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

APL (Dyalog Unicode) , 11 바이트

익명의 암묵적 prefic 기능

+/#⍎¨∊∘⎕D⊆⊢

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

⊢ 논쟁 거리

⊆ 로 분할 (True가 조각이되고 False가 분리기가됩니다)

∊ 회원
∘ 의
⎕D 숫자의 집합

#⍎¨ 루트 네임 스페이스에서 각각 평가

+/ 합집합

레티 나 0.8.2 , 8 바이트

\d+
$*
1

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

• 첫 번째 줄은 모든 숫자와 일치합니다
• 두 번째 줄은 이것을 1로 대체하고 상기 횟수만큼 반복합니다.
• 마지막 줄은 일치하고 문자열에서 총 1의 수를 센다

PowerShell , 29 바이트

($args-replace'\D+','+0')|iex

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

숯 , 5 바이트

ＩΣ⁺ψＳ

온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 설명 : Charcoal의 Sum연산자는 문자열에서 숫자를 자동으로 추출하지만 문자열에 숫자가 아닌 문자가 포함되어 있지 않으면 대신 디지털 합계를 취하므로이를 방지하기 위해 널 바이트를 연결합니다. 그런 다음 결과는 암시 적 출력을 위해 문자열로 캐스트됩니다.

하스켈 , 50 바이트

sum.map read.words.map f
f x|'/'<x,x<':'=x
f _=' '

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

아마도 더 좋은 방법이 있지만 이것이 가장 분명한 방법입니다.

Zsh , 21 바이트

<<<$[${1//[^0-9]/+0}]

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

  ${1           }  # the 5is 108 seCONd4 a
  ${1//[^0-9]/+0}  # +0+0+0+05+0+0+0108+0+0+0+0+0+0+04+0+0
$[${1//[^0-9]/+0}] # 117

불행하게도, bash 0108는 8 진수로 해석되기 때문에 불평합니다 . zsh을하지 않는 (하지 않는 한 setopt octalzeroes)

배쉬, 43 바이트

for n in ${1//[!0-9]/ };{((s+=n));};echo $s

숫자가 아닌 모든 숫자를 공백으로 바꾼 다음 서로 합칩니다.

GammaFunction 덕분에 -5 바이트

파이썬 3 , 63 59 56 바이트

왜 안돼? 의무 정규식 답변. 파이썬 2를 사용하여 6을 도킹 할 수는 있지만 무엇이든 가능합니다. map을 사용하는 대신 eval 접근법을 사용하고 있으므로 더 이상 적용되지 않습니다.

import re;x=lambda y:eval('+'.join(re.findall('\d+',y)))

설명:

import re; # Import regex module
x=lambda y: eval(                                 ) # Run as Python code
                  '+'.join(                     ) # Joined by '+'
                            re.findall('\d+',y) # A list of all matches of regex \d+ in string y

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

자바 10, 66 바이트

이것은에서 람다이다 String에 int.

s->{var r=0;for(var n:s.split("\\D"))r+=new Long("0"+n);return r;}

음의 정수는 지원되지 않습니다. 아마 괜찮습니다.

온라인 시도

감사의 말

• 무지의 구현 덕분에 -3 바이트

루비, 32 27 자

->s{eval s.scan(/\d+/)*?+}

감사의 말

• Conor O 'Brien 덕분에 -5 바이트

Cubix , 17 바이트

?|i.I!/s+q;;>p.O@

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

    ? |
    i .
I ! / s + q ; ;
> p . O @ . . .
    . .
    . .

달려 봐

상당히 간단한 것입니다. Icubix에서는 입력에서 첫 번째 정수를 가져 와서 스택으로 푸시합니다. 이것은 모든 문자를 건너 뛰는 효과가 있습니다. 나머지는 추가를 처리하고 입력의 끝을 감지합니다.

• I! 정수를 입력하고 0을 테스트
• s+q;;0이 아닌 경우 TOS (강제 및 초기 0)를 교환하고 추가하십시오. 결과를 스택 맨 아래로 밀고 상단을 청소하십시오. 처음으로 돌아갑니다.
• /i? 0이면 리디렉션하고 문자 입력을 수행하여 확인하십시오.
• |?;/양수 (문자)가 리플렉션 ?으로 우회전 하면 체커를 통해 다시 밀고 스택에서 팝으로 우회전하여 TOS에 0을 남겨 둡니다. 그런 다음 IP가 기본 루프로 다시 리디렉션됩니다.
• I>p.O@ 음수 (입력 끝)가 왼쪽으로 돌리면 정수 입력을 수행하고 스택의 맨 아래를 맨 위로 가져 와서 출력하고 정지하십시오.

PHP ,40 39 바이트

<?=array_sum(preg_split('(\D)',$argn));

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

php -nFSTDIN에서 입력으로 실행합니다 . 예:

$ echo the 5is 108 seCONd4 a | php -nF sumint.php    
117

하스켈 , 43 바이트

f s|[(n,r)]<-reads s=n+f r|h:t<-s=f t|1>0=0

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

를 사용 reads합니다.

앞서 , 13 바이트

이것은 I단순히 다른 것을 무시하고 숫자처럼 보이는 다음 토큰에 대한 입력 스트림을 스캔 하기 때문에 작동 합니다.

~Ilj~#
 >K+O@

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

QuadR , 9 바이트

+/⍎⍵
\D
 

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

+/ 의 합

⍎ APL로서의 평가

⍵ 의 결과

\D 숫자가 아닌 각 숫자를

 우주

Japt -x , 5 바이트

f/\d+

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

첨부 , 23 바이트

Sum##N=>MatchAll&"\\d+"

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

더 흥미롭지 만 간접적 인 대답 (37 바이트) : {Sum!Reap[ReplaceF[_,/"\\d+",Sow@N]]}

설명

Sum##N=>MatchAll&"\\d+"

형식은 다음과 같습니다.

f##g=>h&x

확장 및 괄호로 묶으면 다음과 같이됩니다.

f ## (g => (h&x))

##두 함수를 함께 구성 =>하고 오른쪽 함수 결과에 대해 왼쪽 함수를 매핑하는 함수를 만들고 함수 &의 측면에 인수를 바인딩합니다. input의 _경우 다음과 같습니다.

{ f[Map[g, h[_, x]]] }

먼저 MatchAll숫자 ( \\d+)를 입력합니다. 그런 다음 N함수를 사용하여 각 런을 실제 정수로 변환 합니다. 마지막으로을 사용하여이 숫자의 합을 취합니다 Sum.

APL (NARS), 문자 13, 바이트 26

{+/⍎¨⍵⊂⍨⍵∊⎕D}

테스트:

  f←{+/⍎¨⍵⊂⍨⍵∊⎕D}
  f 'the 5is 108 seCONd4 a'
117

C # (Visual C # 대화 형 컴파일러), 117111 바이트

a=>System.Text.RegularExpressions.Regex.Replace(a,@"\D+"," ").Split(' ').Select(x=>x==""?0:int.Parse(x)).Sum();

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

펄 5 -p , 17 바이트

s/\d+/$\+=$&/eg}{

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

Japt v2.0a0 -x, 3 바이트

내 (very-WIP) 통역사를위한 또 다른 테스트 드라이브.

q\D

시도 해봐

q\D     :Implicit input of string
q       :Split on
 \D     :  Non-digit characters (/[^0-9]/)
        :Implicitly reduce by addition and output

자바 8, 53130 바이트

정규식 가져 오기의 경우 105 바이트 + 25 바이트

s->{long c=0;for(Matcher m=Pattern.compile("\\d+").matcher(s);m.find();c+=new Long(m.group()));return c;}

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

s->{                                                    // Lambda function
    long c=0;                                           // Sum is zero
    for(Matcher m=Pattern.compile("\\d+").matcher(s);   // Prepare regex matcher
        m.find();                                       // While the string contains unused matches...
        c+=new Long(m.group()));                        // Add those matches to the output
    return c;                                           // Return the output
   }

SNOBOL4 (CSNOBOL4) , 81 바이트

	S =INPUT
D	S SPAN('0123456789') . N REM . S	:F(O)
	O =O + N	:(D)
O	OUTPUT =O
END

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

스위프트, 109 바이트

func s(a:String){var d=0,t=0;a.forEach{(c) in if let e=Int(String(c)){d=d*10+e}else{t+=d;d=0}};t+=d;print(t)}

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

핍 , 6 바이트

$+a@XI

-123음의 정수로 취급 합니다. 온라인으로 사용해보십시오!

  a     Command-line input
   @XI  Regex find all integers (XI is a variable predefined as the regex `-?\d+`)
$+      Fold on +

빼기 부호로 취급하지 않고 하이픈을 무시해야하는 경우 7 바이트에 대해 다음이 작동 합니다 .

$+a@+XD

XD는 사전 설정된 변수입니다 `\d`. +XD정규식 +수정자를 추가하여 1 자리 이상의 숫자와 일치시킵니다.

자바 (JDK) , 98 94 93 바이트

s->java.util.Arrays.stream(s.split("\\D")).filter(t->!t.isEmpty()).mapToLong(Long::new).sum()

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

-4 bytesLong::new대신 에 사용하여 Long::valueOf.
-1 byte정규 표현식을 단축하여 나중에 빈 문자열을 제거하고 분할 할 때 여분의 것을 만듭니다.

설명

s->                            // Lambda (target type is ToLongFunction<String>)
    java.util.Arrays.stream(   // Stream the result of
        s.split("\\D")        // splitting on non-digits
    )
    .filter(t->!t.isEmpty())   // Discard any empty strings
    .mapToLong(Long::new)      // Convert to long
    .sum()                     // Add up the stream's values.