내 방법으로 번호 스퀘어하기

Gryphon 08/21/2017. 20 answers, 1.959 views
code-golf number

사람들은 계속해서 숫자의 제곱은 숫자에 곱해진 것이라고 말합니다. 이것은 분명히 거짓입니다. 숫자를 정사각형으로 만드는 올바른 방법은 정사각형으로 만드는 것입니다. 숫자의 자릿수만큼 여러 번 겹쳐서 결과로 얻은 사각형에서 모든 숫자를 수평으로 (즉, 왼쪽에서 오른쪽으로 만) 및 수직으로 (위에서 아래로 만)를 차례로 추가합니다. 숫자 123은 먼저 사각형을 만듭니다.

123
123
123 

그런 다음 사각형에서 모든 행과 열을 가져 와서 함께 추가합니다.

123+123+123+111+222+333 

1035 의 결과가 1035 .

음수의 경우 일반적으로 겹쳐 씁니다 (네거티브 기호가 길이에 포함되지 않도록 digits 수만 계산 함). 그런 다음 수평 수를 일반적으로 (음수 부호로) 읽은 다음에 대한 음수 기호를 무시하십시오. 수직 번호. 그래서 숫자 -144 대해 우리는 사각형을 얻습니다 :

-144
-144
-144 

어느 것이 우리에게 -144-144-144+111+444+444 주 었는데 이것은 567

한 자리 만있는 숫자의 경우 사각형은 항상 두 배로 된 숫자와 같습니다 (가로로 한 번, 세로로 한 번 읽음). 그래서 4 우리를 준다.

4 

그러면 우리에게 4+4 가 생깁니다. 이것은 8 과 같습니다.

소수 부분이있는 digits 경우 정상적으로 스택합니다 ( digits 를 쌓는 횟수로 digits 만 계산되므로 소수점은 계산되지 않음). 세로 숫자를 읽을 때 소수점 기호를 무시하십시오. 예를 들어 244.2 라는 숫자는 우리에게

244.2
244.2
244.2
244.2 

244.2+244.2+244.2+244.2+2222+4444+4444+2222 . 이것은 14308.8 입니다.

분수 또는 복소수는 제곱 할 수 없습니다.

당신의 과제 :

내 방식대로 숫자를 제곱 한 것에 지겨워서 프로세스를 자동화하기로 결정했습니다. float이나 문자열을 선호도에 상관없이 입력으로 사용하여 내 방식대로 결과를 반환하는 프로그램이나 함수를 작성하십시오.

예 :

123    -> 1035
388    -> 3273
9999   -> 79992
0      -> 0
8      -> 16
-6     -> 0
-25    -> 27
-144   -> 567
123.45 -> 167282.25
244.2  -> 14308.8
2      -> 4
-0.45  -> 997.65
0.45   -> 1000.35 

채점 :

내 손이 모든 정사각형을 작성하는 데 갑갑 해지고 컴퓨터가 복사 / 붙여 넣기를 지원하지 않으므로 입력 할 수있는 최소한의 코드를 입력해야합니다 (어떤 이유로 바이트 단위로 측정됩니까?).

5 Comments
Gryphon 07/29/2017
나는 이것이 매우 오랫동안 (하루에 조금은) 샌드 박스에 있지 않다는 것을 알았지 만, 이미 7 개의 upvotes가 있었기 때문에 게시 할 준비가되었다고 생각했습니다.
1 Leaky Nun 07/29/2017
컴퓨터가 이진수로 저장하기 때문에 "123.45"및 "244.2"는 유효한 플로트가 아닙니다. 문제가 10 진수 표현에 의존 할 때까지는 일반적으로 문제가되지 않습니다.
3 Leaky Nun 07/29/2017
@ 그리폰 이것이 실패한 곳입니다. 244.2 는 부동 소수점 숫자가 아닙니다. "244.2" 문자열로 변환 할 수 없습니다.
2 Leaky Nun 07/29/2017
@ 그리폰 (Gryphon) 그러나 이런 행동은 매우 불편합니다.
7 Gryphon 07/29/2017
왜 3 표를 얻었습니까? 11 명의 사람들이 질문에 대답 할 수 있다면, 아마도 꽤 분명하다고 생각합니다!

20 Answers


Erik the Outgolfer 07/29/2017.

05AB1E , 7 바이트

þSDg×+O 

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

설명

þSDg×+O Implicit input
þ       Keep digits
 S      Get chars
  D     Duplicate
   g    Length
    ×   Repeat string(s)
     +  Add (implicit input added to all elements)
      O Sum 
4 comments
3 Jonathan Allan 07/29/2017
당신이 할 수있을 때 우우 설명
1 Jonathan Allan 07/29/2017
또한 단일 선행 0은 -1 <input <1에 대한 입력에 대한 요구 사항입니다 (즉, 0.45와 .45는 서로 다른 입력이지만 동일한 숫자이며 전자 만 허용됩니다)
Erik the Outgolfer 07/29/2017
@JonathanAllan 후자는 어쨌든 처리되지 않습니다.
Erik the Outgolfer 07/29/2017
@ 조나단 앨런 완료.

Jonathan Allan 07/29/2017.

젤리 , 13 12 바이트

fØDẋ€L$ŒV+VS 

문자 목록 (형식이 올바른 십진수, -1 < n < 1 에 대한 요구 사항 인 단일 선행 0)을 허용하고 숫자를 반환하는 모나 딕 링크입니다.

Try it online!

14 바이트를 받아들이고 숫자를 반환합니다 (입력은 +/-10-5 ŒṘ limited로 제한됩니다) : ŒṘfØDẋ€L$ŒV+⁸S .

방법?

fØDẋ€L$ŒV+VS - Link: list of characters         e.g. "-0.45"
 ØD          - yield digit characters                "0123456789"
f            - filter keep                           "045"
      $      - last two links as a monad:
     L       -   length (number of digit characters) 3
   ẋ€        -   repeat list for €ach digit          ["000","444","555"]
       ŒV    - evaluate as Python code (vectorises)  [0,444,555]
          V  - evaluate (the input) as Jelly code    -0.45
         +   - addition (vectorises)                 [-0.45,443.55,554.55]
           S - sum                                   997.65 
4 comments
Erik the Outgolfer 07/29/2017
음, -1로 15 바이트 버전에서 +€+ 로 바꿀 수 있습니다.
Jonathan Allan 07/29/2017
이미 했어, 고마워!
Erik the Outgolfer 07/29/2017
음, 15 바이트 버전이 아닙니다. 편집 : 3 초 너무 일찍 가정 해 ...
Jonathan Allan 07/29/2017
예, 당신이 15 바이트 버전이라고 말한 것을 보았습니다 - 다시 한번 감사드립니다!

nimi 07/29/2017.

Haskell, 59 56 bytes

f s|l<-filter(>'.')s=0.0+sum(read<$>(s<$l)++[c<$l|c<-l]) 

입력은 문자열로 간주됩니다.

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

작동 원리

l<-filter(>'.')s      -- let l be the string of all the numbers of the input string
f s   = 0.0 + sum     -- the result is the sum of (add 0.0 to fix the type to float)
   read<$>            -- turn every string of the following list into a number
   s<$l               -- length of l times the input string followed by
   [c<$l|c<-l]        -- length of l times c for each c in l 

ETHproductions 07/29/2017.

Japt v2 , 16 바이트

o\d
l
¬xpV +V*Ng 

시험 온라인!

설명

o\d    First line: Set U to the result.
o      Keep only the chars in the input that are
 \d      digits. (literally /\d/g)

l    Second line: Set V to the result.
l    U.length

¬xpV +V*Ng    Last line: implicitly output the result.
¬             Split U into chars.
 x            Sum after
  pV            repeating each V times.
     +V*Ng    Add V * first input (the sum of the horizontals) to the result. 

Ian H. 07/31/2017.

C # (.NET 코어), 150 141 133 바이트

Saved 9 bytes thanks to @TheLethalCoder
@TheLethalCoder 덕분에 또 다른 8 바이트를 저장했습니다.

a=>{var c=(a+"").Replace(".","").Replace("-","");int i=0,l=c.Length;var r=a*l;for(;i 

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

문자열을 입력으로 가져 와서 '제곱 된'숫자를 부동 소수점으로 출력합니다.


이 코드는 다음 알고리즘을 따릅니다.

  1. 입력으로부터 새로운 문자열을 생성하지만 소수점과 기호는 없으므로 길이와 열 수를 얻을 수 있습니다.

  2. 포인트 1에서 생성 된 문자열의 길이에 대한 입력 시간을 계산합니다.

  3. 'square'의 각 열에 대해 열 번호와 행 길이가있는 새 문자열을 만들어 결과에 추가합니다.

예:

입력 : -135.5

  1. 소수점과 기호를 대치하면 길이가 4 문자열 1355 가됩니다.
  2. 입력 시간 4 : -135.5 * 4 = -542 .
  3. 이제 각 열에 대해 새 문자열을 만들고 구문 분석 한 다음 결과에 추가합니다.
    1111 , 3333 , 5555 , 5555 .

이 숫자를 합하면 15012 . 이는 우리 프로그램이 출력하는 것입니다.

5 comments
1 Dada 07/31/2017
사이트에 오신 것을 환영하며, 좋은 첫 번째 답변 (특히 설명을 높이 평가합니다!)!
Ian H. 07/31/2017
@Dada 감사합니다! 힘들다. 나는 string.Replace() 와 같은 것들로부터 얻은 바이트들로 인해 약간 불만 string.Replace() . 그러나 나는 그것이 작동하는 유일한 방법이라고 생각한다!
TheLethalCoder 07/31/2017
il 을 float로 설정하여 바이트를 절약 할 수 있습니다.
Ian H. 07/31/2017
@ TheLethalCoder 그뿐 아니라 슬프게도 색인 생성은 부동 소수점에서는 작동하지 않으며 .Length 는 암시 적으로 float로 변환 될 수 없습니다.
1 TheLethalCoder 07/31/2017
a=>{var c=a.Replace(".","").Replace("-","");int i=0,l=c.Length;var r=float.Parse(a)*l;for(;i 141 바이트. float 로 입력을 가져 와서 n+"" 문자열로 캐스팅하면 저장할 수는 있지만 체크하지 않았습니다.

Erik the Outgolfer 07/29/2017.

Brachylog , 23 바이트

{∋ịṫ}ᶠ⟨≡zl⟩j₎ᵐ;[?]zcịᵐ+ 

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

Brachylog는 수레와 잘 어울리지 않습니다 ...

설명:

{∋ịṫ}ᶠ⟨≡zl⟩j₎ᵐ;[?]zcịᵐ+ Takes string (quoted) input, with '-' for the negative sign
     ᶠ                  Return all outputs (digit filter)
{   }                    Predicate (is digit?)
 ∋                        An element of ? (input)
  ị                       Convert to number (fails if '-' or '.')
   ṫ                      Convert back to string (needed later on)
      ⟨   ⟩             Fork
       ≡                 Identity
         l               Length
                        with
        z                Zip
             ᵐ          Map
            ₎            Subscript (optional argument)
           j              Juxtapose (repeat) (this is where we need strings)
              ;         Pair with literal
               [ ]       List
                ?         ?
                  z     Zip
                   c    Concatenate (concatenate elements)
                     ᵐ  Map
                    ị    Convert to number
                      + Add (sum elements) 

Zgarb 07/29/2017.

껍데기 , 15 바이트

§+ȯṁrfΛ±TṁrSR#± 

문자열을 받아 숫자를 반환합니다. 온라인으로 사용해보십시오!

설명

기본 제공 파싱 함수 r 이 기본 값을 반환하는 대신 유효하지 않은 입력에 대해 구문 분석 오류를 제공한다는 것은 다소 짜증이납니다. 즉, 숫자가 아닌 열로 명시 적으로 필터링해야합니다. 형식이 잘못된 입력에서 0을 반환하면 fΛ± 삭제하고 3 바이트를 절약 할 수 있습니다.

§+ȯṁrfΛ±TṁrSR#±  Implicit input, e.g. "-23"
             #±  Count of digits: 2
           SR    Repeat that many times: ["-23","-23"]
         ṁr      Read each row (parse as number) and take sum of results: -46
  ȯṁrfΛ±T        This part is also applied to the result of SR.
        T        Transpose: ["--","22","33"]
     fΛ±         Keep the rows that contain only digits: ["22","33"]
   ṁr            Parse each row as number and take sum: 55
§+               Add the two sums: 9 

Mr. Xcoder 07/29/2017.

파이썬 3 , 95 94 87 85 84 바이트

 def f(i):l=[x for x in i if"/" 

테스트 스위트 .

파이썬 3 , 78 바이트

 lambda x:sum(float(i*len(z))for z in[[i for i in str(x)if"/" 

테스트 스위트.

두 번째 접근법은 @ officialaimm의 해결책에서 영감을 얻은 Python 3 포트입니다.


ThePirateBay 07/31/2017.

자바 스크립트, 75 62 바이트

a=>(b=a.match(/\d/g)).map(b=>a+=+b.repeat(c),a*=c=b.length)&&a 

온라인으로 사용해보기

-2 bytes thanks to Arnauld
-5 bytes thanks to Shaggy (함수가 숫자를 받아야하지만 지금은 다른 많은 답변도 문자열을받습니다.)


Xcali 08/05/2017.

펄 5 , 37 33 + 1 (-p) = 38 34 바이트

 $_*=@n=/\d/g;for$\(@n){$_+=$\x@n} 

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

4 바이트를 면도하기 위해 Dom의 코드에서 몇 가지 트릭을 사용했습니다.

Explained:

 @n=/\d/g;    # extract digits from input
$_*=@n;      # multiply input by number of digits
for$\(@n){   # for each digit:
  $_+=       # add to the input
  $\x@n}     # this digit, repeated as many times as there were digits
             # taking advantage of Perl's ability to switch between strings
             # and numbers at any point 
3 comments
Dom Hastings 07/31/2017
매우 유사한 접근법으로 시작했지만 $ \를 사용하여 몇 바이트를 가져와 루프를 빠져 나와 온라인으로 시도해보십시오!
Xcali 08/05/2017
내 면도를 위해 당신에게서 영감을 받았습니다. 너의 끝에있는 "} {"구조는 무엇입니까? 나는 그 것에 익숙하지 않다.
Dom Hastings 08/05/2017
그것은이 사이트에서 배운 것입니다. 기본적으로 -n-p 는 코드 주위에 글자 그대로 while(){...} 감싸므로 }{ 그것에서 벗어납니다. 이렇게하면 $_ 이 (가) 해제되지만 변수로 $\ 를 사용하면 $\ 가 모든 인쇄물에 추가되므로 여전히 인쇄됩니다. 당신은 그 안에 숫자 나 무언가를 저장하고 $_ 무시할 수있는 것을 의미합니다. 그게 큰 설명 이었는지는 모르지만 Perl 스레드 에서 골프를 치기위한 팁을 확인해보십시오. 더 잘 설명 할 것입니다. 그래도 기꺼이 당신의 점수를 도왔습니다!

Erik the Outgolfer 07/29/2017.

젤리 , 17 바이트

ŒṘfØDẋ€L©$ŒV;ẋ®$S 

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


Erik the Outgolfer 07/29/2017.

Pyth, 18 바이트

s+RvQsM*RF_lB@jkUT 

여기에서 사용해보십시오.


Mr. Xcoder 07/29/2017.

Pyth , 21 20 바이트

K@jkUTQ+smv*lKdK*lKv 

테스트 스위트.

@ EriktheOutgolfer의 대답 과 완전히 다른 접근 방식을 사용하여 채팅에서 1 바이트 골프를 치는데 도움이되었습니다 (22 ~ 21 세).


설명

  K@jkutq+s.ev*lKbK*lKv   K @ jkUTQ - 숫자를 필터링하여 변수 K에 할당합니다.           m - Map.  변수 d를 사용하여 숫자를 반복합니다.             v - 평가 (부동으로 변환).              * lKd - 각 문자열 자리수에 K의 길이를 곱합니다.          s - 합계         + - 합계                   * lKvQ - 숫자에 숫자의 길이를 곱합니다. String 

officialaimm 07/30/2017.

Python 2 , 81 74 바이트

-7 bytes thanks to @Mr. Xcoder -7 bytes thanks to @Mr. Xcoder : '/'

  • 정수 또는 부동 소수를 취하고 float를 반환합니다.
 lambda x:sum(float(i*len(z))for z in[[i for i in`x`if"/" 

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

설명:

123.45123.45 으로 주어집니다. [i for i in`x`if"/"[i for i in`x`if"/" 화 된 정수 ['1','2','3','4','5'] 의 목록을 제공합니다. 이제 우리는 [123.45,'1','2','3','4','5'] 를 반복하고, 각 요소에 len(z) 곱하고, 여기에서 5 를 반복하고 각각을 a로 변환합니다. Float (따라서 문자열도 그에 따라 변환됩니다), [617.25,11111.0,22222.0,33333.0,44444.0,55555.0] 합니다. 마지막으로 sum(...) 계산하고 167282.25167282.25 .

4 comments
Mr. Xcoder 07/29/2017
78 바이트 . i.isdigit()"/" 바꿉니다 "/"
1 Mr. Xcoder 07/29/2017
74 바이트 . 사실 i.isdigit()"/" 바꿀 수 있습니다 . - 숫자보다 낮은 ASCII 코드를 가지고 있고, 그 사이에 adn / 이 있습니다.
officialaimm 07/29/2017
@ Mr.Xcoder 정말 고마워!
Mr. Xcoder 07/29/2017
천만에요. 내 대답에 대한 대안으로 Python 3에 포팅했습니다.

Bruce Forte 07/30/2017.

옥타브 , 100 82 바이트

할당이 반환 값을 갖고 나를 18 바이트 절약한다는 것을 가르쳐 주신 고맙습니다. @TomCarpenter!

 @(v)(n=nnz(s=strrep(num2str(abs(v)),'.','')-'0'))*v+sum(sum(s'*logspace(0,n-1,n))) 

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

비자극 / 설명

 function f=g(v)
  s=strrep(num2str(abs(v)),'.','')-'0';  % number to vector of digits (ignore . and -)
  n=nnz(s);                              % length of that vector
  f=n*v+sum(sum(s'*logspace(0,n-1,n)))   % add the number n times and sum the columns of the square
end 

이것이 작동하는 방식은 기본적으로 숫자 자체를 n 번 추가 한 다음 열의 합을 더하는 것입니다. Summing s' * logspace(0,n-1,n) 는 열 합계를 얻습니다. 예를 들어 v=-123.4 이면 행렬은 다음과 같습니다.

 [ 1     10    100   1000;
  2     20    200   2000;
  3     30    300   3000;
  4     40    400   4000 ] 

그래서 우리는 단지 그것을 sum 할 필요가 있습니다.

1 comments
1 Tom Carpenter 07/30/2017
) 18 바이트를 익명 함수 @(v)(n=nnz(s=strrep(num2str(abs(v)),'.','')-'0'))*v+sum(sum(‌​s'*logspace(0,n-1,n)‌​)) . 온라인으로 사용해보십시오!

Mr. Xcoder 07/30/2017.

스위프트 4 , 139 134 바이트

 func f(s:String){let k=s.filter{"/"<$0};print(Float(s)!*Float(k.count)+k.map{Float(String(repeating:$0,count:k.count))!}.reduce(0,+))} 

테스트 스위트.


설명

  • func f(s:String) - 명시 적 String 매개 변수가있는 함수 f 를 정의합니다.

  • let k=s.filter{"/"<$0} - 숫자를 let k=s.filter{"/"<$0} . 모든 자릿수보다 작은 ASCII 값을 갖고, / 는 그 사이에 . , 및 0 . 따라서 파이썬의 대답 에서처럼 "/" 가 현재 문자보다 작은 지 확인했습니다.

  • print(...) - 결과를 인쇄합니다.

  • Float(s)!*Float(k.count) - 문자열과 자릿수를 모두 Float(s)!*Float(k.count) 변환하고 곱합니다 (Swift는 Float 및 Int 곱셈을 허용하지 않습니다 :()). 따라서 x 번을 추가합니다. 여기서 x 는 포함 된 자릿수입니다.

  • k.mapNO maps over k with the current value $0 . - k.map{} 은 현재 값 $0 k 를 매핑합니다. String(repeating:$0,count:k.count) 은 각 자릿수를 취하고 x 자릿수와 Float(...)! 의 String을 만듭니다 Float(...)! 부동 소수점 숫자로 변환합니다.

  • .reduce(0,+) - 위 목록의 합계를 구합니다.

  • 마지막으로 두 결과를 더합니다.


예를 들어 봅시다!

우리의 문자열이 "0.45" 라고 가정 "0.45" . 첫째로, 우리는 숫자를 걸러 내기 때문에 0, 4, 5 로 남겨 0, 4, 5 . "0.45" 를 Float로 변환하고 0.45 * 3 = 1.35 자릿수로 곱합니다. 그런 다음 각 숫자를 가져 와서 사각형의 너비 (몇 자리인지) 0, 4, 5 -> 000, 444, 555 채울 때까지 해당 숫자를 반복하는 문자열로 0, 4, 5 -> 000, 444, 555 . 000 + 444 + 555 = 999 입니다. 그런 다음 결과를 함께 추가합니다 : 1.35 + 999 = 1000.35 .


TheLethalCoder 07/31/2017.

C #, 139 137 바이트

 using System.Linq;n=>{var d=(n+"").Where(char.IsDigit);return d.Sum(i=>int.Parse(new string(i,d.Count())))+new int[d.Count()].Sum(_=>n);} 

Saved 2 bytes thanks to @Ian H.

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

전체 / 서식있는 버전 :

 namespace System.Linq
{
    class P
    {
        static void Main()
        {
            Func f = n =>            {
                var d = (n + "").Where(char.IsDigit);
                return d.Sum(i => int.Parse(new string(i, d.Count()))) + new int[d.Count()].Sum(_ => n);
            };

            Console.WriteLine(f(123));
            Console.WriteLine(f(-144));
            Console.WriteLine(f(4));
            Console.WriteLine(f(244.2));

            Console.ReadLine();
        }
    }
} 
2 comments
Ian H. 07/31/2017
var d=(n+ ... 대신 var d=(n+ ... 을 사용하여 처음에 2 바이트를 절약 할 수 있습니다.
TheLethalCoder 07/31/2017
@IanH. 모든 공간을 삭제하는 것을 잊었습니다. -_- 그것이 지원 요청을하는 동안 응답을 얻는 것입니다.

Jenny_mathy 08/09/2017.

Mathematica, 107 바이트

(t=Length[s=#&@@RealDigits[#]//.{a___, 0}:>{a}];If[IntegerPart@#==0,t++];t#+Tr[FromDigits@Table[#,t]&/@s])& 

Titus 08/11/2017.

PHP, 78 88 +1 바이트

 for($e=preg_match_all("#\d#",$n=$argn);~$c=$n[$i++];)$s+=str_repeat($c,$e);echo$s+$n*$e; 

-nR 하여 파이프로 실행하십시오.

PHP 7.1에서 경고를 내놓을 수 있습니다. Repeace $c,$e$c>0?$c:0,$e 를 수정하십시오.


C McAvoy 07/31/2017.

파이썬 3 , 68 70 73 77 바이트

 lambda n:sum(float(n)+int(_*sum(x>"/"for x in n))for _ in n if"/"<_) 

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

모든 자릿수를 반복하고 전체 자릿수만큼 반복하여 정수로 만들고 n 추가합니다. 이 방식으로 n 은 합계의 수평 부분과 수직 부분 인 숫자 반복을 추가하여 d 배가됩니다. 원래 str.isdigit 사용했지만 >"/" ,이 스레드의 다른 사용자 덕분에 많은 바이트를 절약 할 수있었습니다. n 을 문자열로 취하여 2 바이트를 저장하지만 출력이 더 복잡합니다.

 lambda n:sum(n+int(_*sum(x>"/"for x in str(n)))for _ in str(n)if"/"<_) 

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


HighResolutionMusic.com - Download Hi-Res Songs

1 (G)I-DLE

POP/STARS flac

(G)I-DLE. 2018. Writer: Riot Music Team;Harloe.
2 Ariana Grande

​Thank U, Next flac

Ariana Grande. 2018. Writer: Crazy Mike;Scootie;Victoria Monét;Tayla Parx;TBHits;Ariana Grande.
3 Imagine Dragons

Bad Liar flac

Imagine Dragons. 2018. Writer: Jorgen Odegard;Daniel Platzman;Ben McKee;Wayne Sermon;Aja Volkman;Dan Reynolds.
4 Clean Bandit

Baby flac

Clean Bandit. 2018. Writer: Jack Patterson;Kamille;Jason Evigan;Matthew Knott;Marina;Luis Fonsi.
5 Backstreet Boys

Chances flac

Backstreet Boys. 2018.
6 BTS

Waste It On Me flac

BTS. 2018. Writer: Steve Aoki;Jeff Halavacs;Ryan Ogren;Michael Gazzo;Nate Cyphert;Sean Foreman;RM.
7 Fitz And The Tantrums

HandClap flac

Fitz And The Tantrums. 2017. Writer: Fitz And The Tantrums;Eric Frederic;Sam Hollander.
8 BlackPink

Kiss And Make Up flac

BlackPink. 2018. Writer: Soke;Kny Factory;Billboard;Chelcee Grimes;Teddy Park;Marc Vincent;Dua Lipa.
9 Lady Gaga

I'll Never Love Again flac

Lady Gaga. 2018. Writer: Benjamin Rice;Lady Gaga.
10 Diplo

Close To Me flac

Diplo. 2018. Writer: Ellie Goulding;Savan Kotecha;Peter Svensson;Ilya;Swae Lee;Diplo.
11 Halsey

Without Me flac

Halsey. 2018. Writer: Halsey;Delacey;Louis Bell;Amy Allen;Justin Timberlake;Timbaland;Scott Storch.
12 Imagine Dragons

Machine flac

Imagine Dragons. 2018. Writer: Wayne Sermon;Daniel Platzman;Dan Reynolds;Ben McKee;Alex Da Kid.
13 Little Mix

The Cure flac

Little Mix. 2018. Writer: Pete Kelleher;Camille Purcell;Tom Barnes;Ben Kohn.
14 Bradley Cooper

Always Remember Us This Way flac

Bradley Cooper. 2018. Writer: Lady Gaga;Dave Cobb.
15 Calum Scott

No Matter What flac

Calum Scott. 2018. Writer: Toby Gad;Calum Scott.
16 Frida Sundemo

Apologize flac

Frida Sundemo. 2018.
17 Little Mix

Woman Like Me flac

Little Mix. 2018. Writer: Nicki Minaj;Steve Mac;Ed Sheeran;Jess Glynne.
18 Kelly Clarkson

Never Enough flac

Kelly Clarkson. 2018. Writer: Benj Pasek;Justin Paul.
19 Ashley Tisdale

Voices In My Head flac

Ashley Tisdale. 2018. Writer: John Feldmann;Ashley Tisdale.
20 Haley Reinhart

Something Strange flac

Haley Reinhart. 2018.

Related questions

Hot questions

Language

Popular Tags