การแปลงตัวเลขจากการแทน Zeckendorf ถึงทศนิยม

Windmill Cookies 10/07/2018. 25 answers, 2.939 views
code-golf fibonacci

เกี่ยวกับการเป็นตัวแทนของ Zeckendorf / หมายเลขฐานฟีโบนักชี

นี่คือระบบตัวเลขซึ่งใช้หมายเลขฟีโบนักชีเป็นฐาน ตัวเลขประกอบด้วย 0 และ 1 และแต่ละ 1 หมายถึงตัวเลขมีหมายเลข Fibonacci ที่สอดคล้องกันและ 0 หมายถึงไม่มี

ตัวอย่างเช่นลองแปลงจำนวนธรรมชาติทั้งหมด <= 10 เป็นเบสฟีโบนักชี

  • 1 จะกลายเป็น 1 เพราะมันคือผลรวมของ 1 ซึ่งเป็นตัวเลขฟีโบนักชี

  • 2 จะกลายเป็น 10 เพราะมันคือผลรวมของ 2 ซึ่งเป็นตัวเลขฟีโบนักชีและมันไม่ต้องการ 1 เพราะเราได้ผลรวมที่ต้องการไปแล้ว

  • 3 จะกลายเป็น 100 เพราะมันคือผลรวมของ 3 ซึ่งเป็นตัวเลขฟีโบนักชีและมันไม่จำเป็นต้อง 2 หรือ 1 เพราะเราได้ผลรวมที่ต้องการแล้ว

  • 4 จะกลายเป็น 101 เพราะเป็นผลรวมของ [3,1] ซึ่งทั้งคู่เป็นตัวเลขฟีโบนักชี
  • 5 จะกลายเป็น 1,000 เพราะมันคือผลรวมของ 5 ซึ่งเป็นตัวเลขฟีโบนักชีและเราไม่ต้องการตัวเลขอื่นใด
  • 6 จะกลายเป็น 1001 เพราะเป็นผลรวมของฟีโบนักชีหมายเลข 5 และ 1
  • 7 จะกลายเป็น 1,010 เพราะเป็นผลรวมของฟีโบนักชีหมายเลข 5 และ 2
  • 8 จะกลายเป็น 10,000 เพราะเป็นหมายเลขฟีโบนักชี
  • 9 จะกลายเป็น 1,0001 เพราะเป็นผลรวมของฟีโบนักชีหมายเลข 8 และ 1
  • 10 จะกลายเป็น 1,1010 เพราะเป็นผลรวมของฟีโบนักชีหมายเลข 8 และ 2

ลองแปลงตัวเลขฐานฟีโบนักชีสุ่มเป็น 10101001010 เป็นทศนิยม: อันดับแรกเราเขียนตัวเลขฟีโบนักชีที่เกี่ยวข้องกัน จากนั้นเราคำนวณผลรวมของตัวเลขที่ต่ำกว่า 1

1   0   1   0   1   0   0   1   0   1   0
 144 89  55  34  21  13  8   5   3   2   1  -> 144+55+21+5+2 = 227. 

อ่านเพิ่มเติมเกี่ยวกับหมายเลขฐาน Fibonacci: ลิงก์ นอกจากนี้ยังมีเครื่องมือที่แปลงจำนวนเต็มปกติเป็นฐานฟีโบนักชี คุณสามารถทดลองกับมัน

ตอนนี้คำถาม:

งานของคุณคือการใช้ตัวเลขในการเป็นตัวแทน Zeckendorf และส่งออกค่าทศนิยม

อินพุตเป็นสตริงที่มีเพียง 0 และ 1 เท่านั้น (แม้ว่าคุณจะสามารถป้อนข้อมูลในแบบที่คุณต้องการ)

เอาท์พุทหนึ่งตัวเลขเป็นทศนิยม

กรณีทดสอบ: (ในรูปแบบอินพุต -> เอาต์พุต)

1001 -> 6
 100101000 -> 73
 1000000000 -> 89
 1001000000100100010 -> 8432
 1010000010001000100001010000 -> 723452 

นี่คือรหัสกอล์ฟดังนั้นคำตอบที่สั้นที่สุดในหน่วยไบต์ชนะ

หมายเหตุ: อินพุตจะไม่ประกอบด้วย 0 นำหน้าหรือ 1 ต่อเนื่อง

25 Answers


JosiahRyanW 10/08/2018.

แท๊กซี่ 2530 2470

-60 ไบต์เนื่องจากการรับรู้ว่าการแพร่กระจายเป็นตัวเลือก

Go to Post Office:w 1 l 1 r 1 l.Pickup a passenger going to Chop Suey.Go to Chop Suey:n 1 r 1 l 4 r 1 l.[B]Switch to plan C if no one is waiting.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 3 l.Pickup a passenger going to Narrow Path Park.Pickup a passenger going to Sunny Skies Park.Go to Zoom Zoom:n.Go to Sunny Skies Park:w 2 l.Go to Narrow Path Park:n 1 r 1 r 1 l 1 r.Go to Chop Suey:e 1 r 1 l 1 r.Switch to plan B.[C]1 is waiting at Starchild Numerology.1 is waiting at Starchild Numerology.Go to Starchild Numerology:n 1 l 3 l 3 l 2 r.Pickup a passenger going to Addition Alley.Pickup a passenger going to Cyclone.Go to Cyclone:w 1 r 4 l.[D]Pickup a passenger going to Addition Alley.Pickup a passenger going to Cyclone.Go to Addition Alley:n 2 r 1 r.Go to Cyclone:n 1 l 1 l.Pickup a passenger going to Multiplication Station.Go to Zoom Zoom:n.Go to Narrow Path Park:w 1 l 1 l 1 r.Switch to plan E if no one is waiting.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:e 1 r.Pickup a passenger going to Multiplication Station.Go to Multiplication Station:n 1 r 2 l.Pickup a passenger going to Joyless Park.Go to Joyless Park:n 2 l 1 r 1 r.Go to Addition Alley:w 1 r 2 l 1 l.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 1 l.Pickup a passenger going to Addition Alley.Switch to plan D.[E]Go to Addition Alley:w 1 l 1 r 1 l.Pickup a passenger going to Riverview Bridge.Go to Riverview Bridge:n 1 r.Go to Joyless Park:e 1 r 2 l.Pickup a passenger going to Addition Alley.[F]Switch to plan G if no one is waiting.Pickup a passenger going to Addition Alley.Go to Fueler Up:w 1 l.Go to Addition Alley:n 3 l 1 l.Pickup a passenger going to Addition Alley.Go to Joyless Park:n 1 r 1 r 2 l.Switch to plan F.[G]Go to Addition Alley:w 1 r 2 l 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:n 1 r 1 r.Pickup a passenger going to Post Office.Go to Post Office:n 1 l 1 r. 

ลองออนไลน์!

เพราะฉันไม่กลับไปที่โรงจอดรถแท็กซี่ในตอนท้ายเจ้านายของฉันจึงยิงฉันออกไปดังนั้นจึงมีข้อผิดพลาด


Jo King 10/08/2018.

Perl 6 , 28 23 ไบต์

 {[+] (1,2,*+*...*)Z*$_} 

ลองออนไลน์!

codeblock ที่ไม่ระบุชื่อที่รับรายการ 1 s และ 0 s ในการสั่งซื้อ LSB และส่งกลับตัวเลข

คำอธิบาย:

 {                     }   # Anonymous codeblock
 [+]                      # The sum of
     (1,2,*+*...*)        # The infinite Fibonacci sequence starting from 1,2
                  Z*      # Zip multiplied by
                    $_    # The input list in LSB form 

nixpower 10/08/2018.

ภาษา Wolfram (Mathematica) , 35 32 29 28 bytes

Fibonacci[Range@Tr[#!]+1].#& 

ลองออนไลน์!


Jonathan Allan 10/08/2018.

เยลลี่ 5 ไบต์

T‘ÆḞS 

ลิงก์ monadic ยอมรับรายการในรูปแบบ Little-endian (เช่นจาก LSB ทางด้านซ้ายไปยัง MSB ทางด้านขวา)

Try it online!


Haskell , 38 ไบต์

 f=1:scanl(+)2f
sum.zipWith(*)f.reverse 

ลองออนไลน์!

รับอินพุตเป็นรายการ 1s และ 0s

คำอธิบาย


 f=1:scanl(+)2f 

ทำให้รายการของหมายเลขฟีโบนักชีเป็นหนึ่งในตัวแปร f

 sum.zipWith(*)f.reverse 

นำรายการอินพุต reverse รายการมันคูณแต่ละรายการด้วยรายการที่สอดคล้องกันใน f แล้ว sum ผลลัพธ์

Haskell , 30 ไบต์

 f=1:scanl(+)2f
sum.zipWith(*)f 

ลองออนไลน์!

หากเราป้อนข้อมูลด้วยบิตที่สำคัญน้อยที่สุดก่อนอื่นเราไม่จำเป็นต้อง reverse เพื่อให้เราสามารถบันทึกได้ 8 ไบต์


xnor 10/11/2018.

Python 2 , 43 ไบต์

 a=b=0
for x in input():b+=a+x;a=b-a
print b 

ลองออนไลน์!

รับอินพุตเป็นรายการ การอัปเดตเป็นรุ่นที่สั้นกว่าของ a,b=b+x,a+b+x ซึ่งคล้ายกับ Fibonacci update a,b=b,a+b หากคุณไม่สนใจ x


Python 2 , 45 ไบต์

 f=lambda n,a=1,b=1:n and n%10*b+f(n/10,b,a+b) 

ลองออนไลน์!

รับอินพุตเป็นตัวเลขทศนิยม


Steven H. 10/07/2018.

Pyth, 13 ไบต์

ส่วนใหญ่นี้ (8 ไบต์) เป็นเพียงการสร้างตัวเลขฟีโบนักชี

s*V_m=+Z|~YZ1 

ลองด้วยชุดทดสอบนี้!

คำอธิบาย:

s*V_m=+Z|~YZ1QQ     Autofill variables
    m=+Z|~YZ1Q      Generate the first length(input) Fibonacci numbers as follows:
       Z             Start with Z=0
         ~YZ         And Y=[] (update it to Y=Z, return old Y)
        |   1        if Y is [], then replace with 1
      +              Sum Z and Y
     =               Replace Z with sum
    m                Repeat process
             Q       once for each element of the input
   _                Reverse the order of the Fibonacci numbers
 *V                 Vectorize multiplication
s                   Sum 

Bubbler 10/09/2018.

J , 24 21 ไบต์

1#.|.*[:+/@(!~#-])\#\ 

ลองออนไลน์!

รุ่นที่ได้รับ การแก้ไขของโซลูชั่น 25- ไบต์ ของ Galen Ivanov

ใช้ผลรวมแนวทแยงของรูปสามเหลี่ยมของ Pascal ซึ่งเทียบเท่ากับผลรวมของสัมประสิทธิ์ทวินาม

\ $ F_n = \ sum \ limit_ {i = 0} ^ {n} {} _ {ni} C_ {i} \ $

มันทำงานอย่างไร

1#.|.*[:+/@(!~#-])\#\
                       Example input: 1 0 0 1 0
                   #\  Generate 1-based index; 1 2 3 4 5
      [:          \    For each prefix of above... (ex. 1 2 3)
              #-]        Subtract each element from the length (ex. 2 1 0)
           (!~   )       Compute binomial coefficient (ex. 3C0 + 2C1 + 1C2)
        +/@              Sum
                       The result is Fibonacci numbers; 1 2 3 5 8
   |.*                 Multiply with mirrored self; 0 2 0 0 8
1#.                    Sum; 10 

J , 24 ไบต์

3 :'y#.~|.(1+%)^:(<#y)2' 

ลองออนไลน์!

คำกริยาที่ชัดเจน Monadic สร้างฐานผสมที่แสดงถึงฐานฟีโบนักชีจากนั้นป้อนเข้าสู่การแปลงฐาน #. .

มันทำงานอย่างไร

y#.~|.(1+%)^:(<#y)2  Explicit verb, input: y = Fibonacci digit array, n = length of y
      (1+%)          x -> 1 + 1/x
           ^:(<#y)2  Apply the above 0..n-1 times to 2
                     The result looks like 2/1, 3/2, 5/3, 8/5, 13/8, ...
    |.               Reverse
                     Now, if it is fed into #. on the left, the digit values become
                     ...(8/5 * 5/3 * 3/2 * 2/1), (5/3 * 3/2 * 2/1), (3/2 * 2/1), 2/1, 1
                     which is ... 8 5 3 2 1 (Yes, it's Fibonacci.)
y#.~                 Convert y to a number using Fibonacci base 

ทางเลือก

J , 27 ไบต์

}.@(+#{.3#{.)^:(<:@#)@(,&0) 

ลองออนไลน์!

ความคิด:

1  0  0  1  0  1
-1 +1 +1
------------------
    1  1  1  0  1
   -1 +1 +1
------------------
       2  2  0  1
      -2 +2 +2
------------------
          4  2  1
         -4 +4 +4
------------------
             6  5
            -6 +6 +6 <- Add an imaginary digit that has value 1
---------------------
               11  6
              -11+11
---------------------
                  17 <- the answer 

J , 30 ไบต์

0.5<.@+(%:5)%~(-:>:%:5)#.,&0 0 

ลองออนไลน์!

อันนี้ใช้ความพยายามมากที่สุดในการสร้าง ใช้นิพจน์แบบฟอร์มปิดด้วยเคล็ดลับการปัดเศษ ในนิพจน์ค่าที่ 0 และที่ 1 คือ 0 และ 1 ตามลำดับดังนั้นพลังงานหลักที่แท้จริงต้องเริ่มต้นด้วย 2

0.5<.@+(%:5)%~(-:>:%:5)#.,&0 0  Tacit verb.
                         ,&0 0  Add two zeroes at the end
              (-:>:%:5)#.       Convert to a number using base phi (golden ratio)
       (%:5)%~                  Divide by sqrt(5)
0.5<.@+                         Round to nearest integer 

ในขณะที่ข้อผิดพลาด ( ((1-sqrt(5))/2)^n คำ) อาจสร้างขึ้นมันไม่เคยเกิน 0.5 ดังนั้นเคล็ดลับการปัดเศษทำงานได้ถึงอนันต์ ศาสตร์:

\ $ \ max (| error |) = \ frac {1} {\ sqrt {5}} \ sum \ limits_ {1} ^ {\ infty} (\ frac {1- \ sqrt {5}} {2}) ^ {2n} = \ frac {1} {\ sqrt {5}} \ sum \ limit_ {0} ^ {\ infty} (\ frac {1- \ sqrt {5}} {2}) ^ {n} = \ frac {\ sqrt {5} -1} {2 \ sqrt {5}} <\ frac {1} {2} \ $


Brain-Flak , 110 , 102 , 96 , 94 , 78 , 74 ไบต์

([[]]<>((()))){({}()<([({})]({}({})))>)}{}{}({<>{<{}><>({})(<>)}{}<><{}>}) 

ลองออนไลน์!


maxb 10/08/2018.

MathGolf , 8 6 ไบต์

{î)f*+ 

ลองออนไลน์!

คำอธิบาย

{        Start block (foreach in this case)
 î)      Push loop index (1-based) and increment by 1
   f     Get fibonacci number of that index
    *    Multiply with the array value (0 or 1)
     +   Add top two elements of stack. This implicitly pops the loop index the first iteration, which makes the addition become 0+a, where a is the top of the stack. 

บันทึก 1 ไบต์ขอบคุณ JoKing และอีกหนึ่งไบต์ต้องขอบคุณการสั่งซื้อ LSB


Arnav Borborah 10/09/2018.

05AB1E , 11 9 8 ไบต์

vyiNÌÅfO 

ลองออนไลน์!

คำอธิบาย:

v             : For each character in input string (implicit) in LSB order
  yi          : If the current character is truthy (1)
    NÌ        : Add 2 to the current index
       ÅfO    : Add the fibonacci of this number to the stack 
  • -2 bytes : ขอบคุณ @KevinCruijssen สำหรับการชี้ให้เห็นถึงวิธีการขนาดเล็กเพื่อย่อรหัสนี้!
  • -1 byte : ขอบคุณ @JonathanAllan สำหรับการชี้ให้เห็นคำสั่ง LSB สำหรับการป้อนข้อมูล!

JosiahRyanW 10/07/2018.

Python 3 , 63 ไบต์

 a=b=n=1
for i in input()[::-1]:n+=b*int(i);a,b=b,a+b
print(n-1) 

ลองออนไลน์!

รับอินพุตผ่าน STDIN เป็นสตริง


Galen Ivanov 10/08/2018.

สีแดง , 142, 126 106 ไบต์

func[a][b: copy[1 1]reverse a s: 0 n: 1
until[s: b/1 * a/:n + s insert b b/1 + b/2(n: n + 1)> length? a]s] 

ลองออนไลน์!


Multi 10/08/2018.

Stax , 6 ไบต์

çéC◘0â 

เรียกใช้และแก้ไขข้อบกพร่อง

:1F^|5+           #Full program, unpacked, implicit input as array    
:1                #Get indicies of truthy
  F               #Use rest of program to loop through elements
   ^              #Increment current element
    |5+           #Get n-th fib and Add 

ตรงไปตรงมาสวย การสั่งซื้อ LSB


Nitrodon 10/08/2018.

Brain-Flak ขนาด 40 ไบต์

([]){{}([({}<>{})]({}{}))<>([])}<>({}{}) 

ลองออนไลน์!


Rogem 10/08/2018.

C (gcc) , 63 ไบต์

รับอินพุตเป็นอาร์เรย์ 1 และ 0 พร้อมกับความยาวของอาร์เรย์ วิธีนี้เป็นวิธีการวนย้อนหลังค่อนข้างตรงไปข้างหน้า

 f(_,l,a,b,t)int*_;NO 

ลองออนไลน์!


0 ' 10/09/2018.

Prolog (SWI) , 74 ไบต์

\D-->[X,Y],{D is 2*X+Y};[D];a,\D.
a,[A],[B]-->[X,Y,Z],{A is X+Y,B is X+Z}. 

ลองออนไลน์!

รับอินพุตเป็นรายการจำนวนเต็ม 1 และ 0 ด้วยบิตที่สำคัญที่สุดก่อน


Neil 10/07/2018.

เรติน่า 0.8.2 , 23 ไบต์

0?
;
+`1;(1*);
;1$1;1
1 

ลองออนไลน์! ลิงค์นั้นรวมถึงกรณีทดสอบที่เร็วกว่า คำอธิบาย:

0?
; 

แทรกตัวคั่นทุกที่และลบศูนย์ใด ๆ ตัวอย่างเช่น 1001 กลายเป็น ;1;;;1; .

+`1;(1*);
;1$1;1 

แทนที่แต่ละ 1 ซ้ำด้วย 1 ในแต่ละสถานที่สองแห่งถัดไปเนื่องจากผลรวมของค่าของพวกเขาเท่ากับมูลค่าของต้นฉบับ 1 1 s จึงย้ายและสะสมจนกว่าจะถึงสองตำแหน่งสุดท้ายซึ่ง (เนื่องจากตัวคั่นที่เพิ่มใหม่) ตอนนี้ทั้งคู่มีค่า 1

1 

นับ 1


Shaggy 10/07/2018.

Japt -x , 9 ไบต์

Ë*MgUÊa´E 

ลองมัน


Arnauld 10/08/2018.

JavaScript (Node.js) , 41 ไบต์

พอร์ตของ คำตอบของ xnor ใช้อินพุตเป็นตัวอักษร BigInt

 f=(n,a=1n,b=a)=>n&&n%10n*b+f(n/10n,b,a+b) 

ลองออนไลน์!


JavaScript (ES6), 44 ไบต์

รับอินพุตเป็นอาร์เรย์ของอักขระตามลำดับแรกของ LSB

 s=>s.map(k=>t+=k*(z=x,x=y,y+=z),x=t=0,y=1)|t 

ลองออนไลน์!


G B 10/08/2018.

Ruby , 39 ไบต์

 ->nNO 

ลองออนไลน์!


Mego 10/08/2018.

ที่จริงแล้ว 8 ไบต์

;r⌐@░♂FΣ 

ลองออนไลน์!

อินพุตถูกใช้เป็นรายการของบิตในลำดับแรกของ LSB

คำอธิบาย:

;r⌐@░♂FΣ
;r        range(0, len(input))
  ⌐       add 2 to every element in range (range(2, len(input)+2))
   @░     filter: take values in range that correspond to 1s in input
     ♂F   Fibonacci number at index of each element in list (Actually uses the F(0)=F(1)=1 definition, which is why we needed to add 2 earlier)
       Σ  sum 

mazzy 10/08/2018.

Powershell, 68 ไบต์

 param($s)$b=1
$s[$s.Length..0]|%{$a,$b=$b,($a+$b)
$x+=($_-48)*$b}
$x 

สคริปต์ทดสอบ:

 $f = {
param($s)$b=1
$s[$s.Length..0]|%{$a,$b=$b,($a+$b)
$x+=($_-48)*$b}
$x
}

@(
    ,("1001", 6)
    ,("100101000", 73)
    ,("1000000000", 89)
    ,("1001000000100100010", 8432)
    ,("1010000010001000100001010000", 723452)
) | % {
    $s,$e = $_
    $r = &$f $s
    "$($r-eq$e): $r"
} 

เอาท์พุท:

 True: 6
True: 73
True: 89
True: 8432
True: 723452 

Luke Stevens 10/09/2018.

Java (OpenJDK 8) , 65 ไบต์

ค่อนข้างเล็กสำหรับคำตอบของ Java สำหรับฉันฉันมีความสุขกับเรื่องนี้ รับอินพุตเป็นอาร์เรย์ของ ints ที่สั่งซื้อเป็นครั้งแรกของ LSB

 d->{int s=0,f=1,h=1;for(int i:d){s+=i>0?f:0;f=h+(h=f);}return s;} 

ลองออนไลน์!

Ungolfed

 d->{                        // Lambda function that takes array of ints
    int s=0,f=1,h=1;        // Initialise sum and fibonacci vars
    for(int i:d){           // Loop through each input integer
        s+=i>0?f:0;         // If it's 1 add current fibonacci number to sum
        f=h+(h=f);          // Increase fibonacci number 
    }return s;              // return sum
} 

Logern 10/10/2018.

Z80Golf , 34 ไบต์

00000000: dde1 f1b7 2819 fe30 2812 4504 aff5 3cf5  ....(..0(.E...<.
00000010: d1f1 82d5 f510 f9c1 f17c 8067 2c18 e3dd  .........|.g,...
00000020: e5c9                                     .. 

ตัวอย่างกับอินพุต 1001- ลองออนไลน์!

ตัวอย่างกับการป้อนข้อมูล 100101000- ลองออนไลน์!

สภา:

zeck:		; input=push on stack in MSB order (eg top is LSB) output=reg h
pop ix		; save return addr in ix
f:
pop af		; get next digit
or a
jr z, return	; if current digit==0, return
cp 0x30
jr z, skip	; if current digit=='0' (e.g. not '1'), skip loop
ld b, l		; find fib of counter
fib:
	inc b	; 1-indexing for func to work
	xor a	; set a to 0 (1st fibo num)
	push af
	inc a	; set a to 1 (2nd fibo num)
	push af
	fib_loop:
		pop de
		pop af
		add d
		push de
		push af
		djnz fib_loop
pop bc		; get the fibo num just calculated
pop af		; pop just to reset stack frame
ld a, h
add b		; add current fibo number to sum
ld h, a
skip:
inc l		; increment counter reg
jr f		; repeat loop
return:
push ix		; push the return addr to ret to it
ret 

HighResolutionMusic.com - Download Hi-Res Songs

1 AJR

Birthday Party flac

AJR. 2019. Writer: Adam Met;Jack Met;Ryan Met;Peter Ivers;David Lynch.
2 Loote

Your Side Of The Bed flac

Loote. 2018. Writer: ​Jesse Saint John;Jackson Foote;Emma Lov Block.
3 AJR

100 Bad Days flac

AJR. 2019. Writer: Jack Met;Adam Met;Ryan Met.
4 Joe Jonas

Longer Than I Thought flac

Joe Jonas. 2018. Writer: Patrick Nissley;Jackson Foote;Dave Katz.
5 Loote

Out Of My Head flac

Loote. 2018. Writer: Emma Lov Block;Michael Pollack;Jeremy Dussolliet;Jackson Foote.
6 Iselin Solheim

Anyone Out There flac

Iselin Solheim. 2019. Writer: Iselin Solheim;Max Grahn.
7 Loote

Wish I Never Met You flac

Loote. 2018. Writer: Jackson Foote;Alex Peter Koste;Jeremy Dussolliet;Emma Lov Block.
8 Kim Petras

Heart To Break flac

Kim Petras. 2018. Writer: Cirkut;Aaron Joseph;Dr. Luke;Jacob Kasher;Kim Petras.
9 A L E X

Out On The Trampoline At Night flac

A L E X. 2018. Writer: A L E X.
10 A L E X

I Want To Hold Your Hand flac

A L E X. 2018. Writer: A L E X.
11 A L E X

Field flac

A L E X. 2018. Writer: A L E X.
12 A L E X

Save Me flac

A L E X. 2018. Writer: A L E X.
13 Devin

Summer Lover flac

Devin. 2019. Writer: Tommy Lee James;Stuart Crichton;Oliver Heldens;Nile Rodgers;Devin Guisande.
14 A L E X

9 To 5 flac

A L E X. 2018. Writer: A L E X.
15 A L E X

Skirt flac

A L E X. 2018. Writer: A L E X.
16 Florian Picasso

Midnight Sun (Extended Version) flac

Florian Picasso. 2019.
17 Florian Picasso

Midnight Sun flac

Florian Picasso. 2019.
18 21 Savage

Enzo flac

21 Savage. 2019. Writer: YungLunchBox;Sheck Wes;Offset;Gucci Mane;21 Savage;DJ Snake.
19 Tales Of Ratatösk

Battle Of The Doomed Gods 320kbps

Tales Of Ratatösk. 2019.
20 Tales Of Ratatösk

Andro 320kbps

Tales Of Ratatösk. 2019.

Related questions

Hot questions

Language

Popular Tags