Stellen Sie sich vor auf einen Punkt reisen liegend A Meilen entfernt horizontal und B Meilen entfernt vertikal von der aktuellen Position. Oder mit anderen Worten: Reisen von (0, 0)zu Punkt (a, b). Wie weit müssten Sie am Ende reisen? Dies scheint eine einfache Frage zu sein, aber die Antwort hängt davon ab, wen Sie fragen. Wenn Sie eine Krähe sind, und Sie können Reisen in der Luftlinie , die zurückgelegte Strecke nur die ist euklidischen Abstand zu (a, b). Das ist

sqrt(a^2 + b^2)

Aber wenn Sie nur ein langweiliger Mensch sind, möchten Sie nicht wirklich so weit laufen, also müssen Sie ein Taxi nehmen. Die meisten Taxis fahren nicht in gerader Linie in Richtung Ihres Ziels, weil sie im Allgemeinen versuchen, auf den Straßen zu bleiben. Die tatsächliche Entfernung, die Sie am Ende zurücklegen werden, ist also die Summe aus vertikaler und horizontaler Entfernung. Oder die Formel lautet:

abs(a) + abs(b)

Dies wird als Taxidistanz bezeichnet . Dieses Bild zeigt deutlich den Unterschied zwischen den beiden:

Um dorthin zu reisen, (6, 6)kann eine Krähe einfach auf der grünen Linie fliegen, und dies ergibt eine Entfernung von 6 * sqrt(2)oder ungefähr 8,49. Ein Taxi kann den roten, blauen oder gelben Weg nehmen, aber alle fahren 12.

Dies führt zu der eigentlichen Frage, die ich stelle. Wenn eine Krähe und ein Taxi von Punkt (0, 0)zu Punkt fahren (a, b), wie lange dauert der Weg des Taxis? Oder, in mehr Fachjargon,

Bestimmen Sie bei einem zweidimensionalen Vektor die Differenz zwischen der Norm2 des Vektors und der Norm1 des Vektors.

Sie müssen das kürzestmögliche Programm oder eine Funktion schreiben, um diese Frage zu beantworten. Sie können wählen, ob Sie 'a' und 'b' als zwei separate Eingaben oder als Tupel mit zwei Elementen verwenden möchten. Sie können Eingaben und Ausgaben in jedem vernünftigen Format vornehmen. Wenn die Differenz eine nicht ganzzahlige Zahl ist, müssen Sie auf mindestens zwei Dezimalstellen genau sein.

Sie können immer davon ausgehen, dass 'a' und 'b' ganze Zahlen sind und dass sie nicht beide 0 sind. (Obwohl es möglich ist, dass eine von beiden Null ist.)

Wie üblich gelten Standardlücken und versuchen, Ihr Programm so kurz wie möglich zu halten, gezählt in Bytes.

Ich werde jede Antwort, die eine Erklärung der Funktionsweise des Codes enthält, positiv bewerten und alle coolen Tricks demonstrieren, die zum Speichern von Bytes verwendet werden.

Hier sind einige Beispiele, mit denen Sie Ihren Code testen können:

#input    #output
3, 4      2
-3, 4     2
-3, -4    2
6, 6      3.51
42, 0     0
10, 10    5.86
3, 3      1.76

Viel Spaß beim Golfen! :)

Taxi , 7394 3773 Bytes

Go to Post Office:w 1 l 1 r 1 l.Pickup a passenger going to Tom's Trims.Pickup a passenger going to Tom's Trims.Go to Tom's Trims:n.[a]Pickup a passenger going to The Babelfishery.Go to The Babelfishery:s 1 l 1 r.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 1 l 2 r.Pickup a passenger going to Addition Alley.Pickup a passenger going to Multiplication Station.1 is waiting at Starchild Numerology.Go to Starchild Numerology:s 2 l 2 r.Pickup a passenger going to Cyclone.Go to Cyclone:w 1 r 4 l.Pickup a passenger going to Addition Alley.Go to Addition Alley:n 2 r 1 r.Pickup a passenger going to The Underground.Go to Cyclone:n 1 l 1 l.Pickup a passenger going to Multiplication Station.Go to The Underground:n 2 r 2 r.Switch to plan "b" if no one is waiting.Pickup a passenger going to Charboil Grill.Go to Charboil Grill:s 2 r 1 l 1 l 2 r.-1 is waiting at Starchild Numerology.Go to Starchild Numerology:e 2 r.Pickup a passenger going to Multiplication Station.Go to The Underground:w 1 r 2 r 1 r 2 l.[b]Go to Multiplication Station:s 1 l 1 r.Go to Tom's Trims:s 1 r 3 r.Switch to plan "c" if no one is waiting.Switch to plan "a".[c]Go to Multiplication Station:s 1 l 3 l.Pickup a passenger going to Cyclone.Pickup a passenger going to Cyclone.Go to Cyclone:s 1 r 2 l 2 r.Pickup a passenger going to Addition Alley.Pickup a passenger going to Cyclone.Pickup a passenger going to Addition Alley.Go to Addition Alley:n 2 r 1 r.Pickup a passenger going to Multiplication Station.-1 is waiting at Starchild Numerology.Go to Starchild Numerology:n 1 l 1 l 1 l 3 l.Pickup a passenger going to Multiplication Station.Go to Multiplication Station:w 1 r 2 r 1 r 4 l.Pickup a passenger going to Rob's Rest.Go to Rob's Rest:s 1 r 2 l 1 l 1 r 1 r.Go to Cyclone:s 1 l 1 l 1 l 1 r.Pickup a passenger going to Cyclone.[d]Pickup a passenger going to Multiplication Station.Pickup a passenger going to Multiplication Station.Go to Multiplication Station:s 1 l 2 r 4 l.Pickup a passenger going to Addition Alley.Go to Cyclone:s 1 r 2 l 2 r.Switch to plan "e" if no one is waiting.Switch to plan "d".[e]Go to Addition Alley:n 2 r 1 r.Pickup a passenger going to Cyclone.99 is waiting at Starchild Numerology.Go to Starchild Numerology:n 1 l 1 l 1 l 3 l.Pickup a passenger going to The Underground.Go to Cyclone:e 1 l 2 r.Pickup a passenger going to Trunkers.Pickup a passenger going to Sunny Skies Park.Go to Sunny Skies Park:n 1 r.Go to Trunkers:s 1 l.[f]Pickup a passenger going to Cyclone.Go to Cyclone:w 2 r.Pickup a passenger going to Divide and Conquer.Pickup a passenger going to Trunkers.Go to Trunkers:s 1 l.Go to Sunny Skies Park:w 1 r.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l.Pickup a passenger going to Divide and Conquer.Go to Zoom Zoom:n.Go to Divide and Conquer:w 1 l 2 r 1 r.Pickup a passenger going to Addition Alley.Go to Cyclone:e 1 l 1 l 2 l.Pickup a passenger going to Addition Alley.Go to Addition Alley:n 2 r 1 r.Pickup a passenger going to Divide and Conquer.2 is waiting at Starchild Numerology.Go to Starchild Numerology:n 1 l 1 l 3 l 2 r.Pickup a passenger going to Divide and Conquer.Go to Divide and Conquer:w 1 r 2 r 1 r 2 l 3 l.Pickup a passenger going to Sunny Skies Park.Go to Sunny Skies Park:e 1 l 1 l 2 l 1 l.Go to The Underground:s 1 l 1 r 2 l.Switch to plan "g" if no one is waiting.Pickup a passenger going to The Underground.Go to Trunkers:s 2 r 1 l.Switch to plan "f".[g]Go to Rob's Rest:n 3 l 2 l 1 l 2 r 1 r.Pickup a passenger going to What's The Difference.Go to Sunny Skies Park:s 1 l 1 l.Pickup a passenger going to What's The Difference.Go to What's The Difference:n 1 r 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:e 3 r.Pickup a passenger going to Post Office.Go to Post Office:n 1 l 1 r.

Probieren Sie es online!

Ingenieur Toast , ein viel erfahrenerer Taxigolfer, beschloss, sich etwas Zeit zu nehmen (wahrscheinlich viel weniger als ich) und mein Taxi-Programm herunterzuspielen, indem er es grundlegend umschrieb. Sie finden meinen alten Antworttext und Links zu meinen alten TIOs im Bearbeitungsverlauf.

Engineer Toasts ungolfed Quadratwurzel-Algorithmus: Probieren Sie es online!

Ungolfed, mit Erklärungen:

[ Crow vs. Taxi ]


[ GET THE NEGATIVE ABSOLUTE VALUES OF BOTH STDINS ]

[Move the stdin values to Tom's Trims b/c:]
[1) Stdin doesn't count as a passenger waiting]
[2) Checking for no one waiting is shorter that keeping tracker of a count for just 2 iterations OR repeating all the code over again]
Go to Post Office:w 1 l 1 r 1 l.
Pickup a passenger going to Tom's Trims.
Pickup a passenger going to Tom's Trims.
Go to Tom's Trims:n.

[a]
[Clone the first waiting value]
[If we've already picked up both, move to the next process]
[Switch to plan "c" if no one is waiting.]
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery:s 1 l 1 r.
Pickup a passenger going to Cyclone.
Go to Cyclone:n 1 l 1 l 2 r.
Pickup a passenger going to Addition Alley.
Pickup a passenger going to Multiplication Station.

[Add one to the value]
1 is waiting at Starchild Numerology.
Go to Starchild Numerology:s 2 l 2 r.
Pickup a passenger going to Cyclone.
Go to Cyclone:w 1 r 4 l.
Pickup a passenger going to Addition Alley.
Go to Addition Alley:n 2 r 1 r.
Pickup a passenger going to The Underground.

[Pick up a clone of that one to feed into Multiplication Station]
Go to Cyclone:n 1 l 1 l.
Pickup a passenger going to Multiplication Station.

[Subtract one and see if that's more than zero]
Go to The Underground:n 2 r 2 r.
Switch to plan "b" if no one is waiting.

[It was more than zero so we make it negative]
[First, though, get rid of the pesky result from The Underground]
Pickup a passenger going to Charboil Grill.
Go to Charboil Grill:s 2 r 1 l 1 l 2 r.
-1 is waiting at Starchild Numerology.
Go to Starchild Numerology:e 2 r.
Pickup a passenger going to Multiplication Station.
Go to The Underground:w 1 r 2 r 1 r 2 l.

[b]
[Make sure it's a negative value and leave it at Multiplication Station]
[Either it was already negative OR we now have -1 as a passenger]
Go to Multiplication Station:s 1 l 1 r.

[Get the next stdin unless we've already gotten them both]
Go to Tom's Trims:s 1 r 3 r.
Switch to plan "c" if no one is waiting.
Switch to plan "a".


[ ADD THE TWO NEGATIVES AND INVERT TO GET THE TAXI DISTANCE]

[c]
[Pickup the two negative absolute values and clone them]
Go to Multiplication Station:s 1 l 3 l.
Pickup a passenger going to Cyclone.
Pickup a passenger going to Cyclone.
Go to Cyclone:s 1 r 2 l 2 r.
Pickup a passenger going to Addition Alley.
Pickup a passenger going to Cyclone.
Pickup a passenger going to Addition Alley.

[Add the two clones values to get the negative Taxi distance]
Go to Addition Alley:n 2 r 1 r.
Pickup a passenger going to Multiplication Station.

[Invert to get the Taxi distance and store it at Rob's Rest]
-1 is waiting at Starchild Numerology.
Go to Starchild Numerology:n 1 l 1 l 1 l 3 l.
Pickup a passenger going to Multiplication Station.
Go to Multiplication Station:w 1 r 2 r 1 r 4 l.
Pickup a passenger going to Rob's Rest.
Go to Rob's Rest:s 1 r 2 l 1 l 1 r 1 r.


[ FIND THE CROW DISTANCE ]
[Uses the Babylonian method: https://en.wikipedia.org/wiki/Methods_of_computing_square_roots#Babylonian_method ]

[Square and Sum the cloned values]
Go to Cyclone:s 1 l 1 l 1 l 1 r.
Pickup a passenger going to Cyclone.
[d]
Pickup a passenger going to Multiplication Station.
Pickup a passenger going to Multiplication Station.
Go to Multiplication Station:s 1 l 2 r 4 l.
Pickup a passenger going to Addition Alley.
Go to Cyclone:s 1 r 2 l 2 r.
Switch to plan "e" if no one is waiting.
Switch to plan "d".
[e]
Go to Addition Alley:n 2 r 1 r.
Pickup a passenger going to Cyclone.

[Pickup our cycle counter]
[It's cheaper to do this than to check each iteration's value as equal to the last]
[Taxi can only handle integers up to 2^31-1 so 99 iterations is sufficient.]
99 is waiting at Starchild Numerology.
Go to Starchild Numerology:n 1 l 1 l 1 l 3 l.
Pickup a passenger going to The Underground.

[Duplicate stdin to be stored as S at Trunkers and as x0 at Sunny Skies Park]
[a & b are always integers so Trunkers won't hurt S and it's close with a short name so it's good for golfing]
Go to Cyclone:e 1 l 2 r.
Pickup a passenger going to Trunkers.
Pickup a passenger going to Sunny Skies Park.
Go to Sunny Skies Park:n 1 r.
Go to Trunkers:s 1 l.

[ This is our starting position for square root:           ]
[  • x at Sunny Skies Park                                 ]
[  • S at Trunkers                                         ]
[  • Taxi at Trunkers                                      ]
[  • The iterator as a passenger going to The Underground  ]

[f]

[Duplicate S so we don't lose it]
Pickup a passenger going to Cyclone.
Go to Cyclone:w 2 r.
Pickup a passenger going to Divide and Conquer.
Pickup a passenger going to Trunkers.
Go to Trunkers:s 1 l.

[Diplicate x for division and addition]
Go to Sunny Skies Park:w 1 r.
Pickup a passenger going to Cyclone.
Go to Cyclone:n 1 l.
Pickup a passenger going to Divide and Conquer.

[Gas will be super important in this loop]
Go to Zoom Zoom:n.

[Perform (x + S/x)/2]
[(/2) turns out to be a few bytes shorter than (*.5), mostly due to place names]
Go to Divide and Conquer:w 1 l 2 r 1 r.
Pickup a passenger going to Addition Alley.
Go to Cyclone:e 1 l 1 l 2 l.
Pickup a passenger going to Addition Alley.
Go to Addition Alley:n 2 r 1 r.
Pickup a passenger going to Divide and Conquer.
2 is waiting at Starchild Numerology.
Go to Starchild Numerology:n 1 l 1 l 3 l 2 r.
Pickup a passenger going to Divide and Conquer.
Go to Divide and Conquer:w 1 r 2 r 1 r 2 l 3 l.
Pickup a passenger going to Sunny Skies Park.
Go to Sunny Skies Park:e 1 l 1 l 2 l 1 l.
[Now we have the next iteration of x]

[Check the iterator]
Go to The Underground:s 1 l 1 r 2 l.
Switch to plan "g" if no one is waiting.
Pickup a passenger going to The Underground.

[Reset the loop]
Go to Trunkers:s 2 r 1 l.
Switch to plan "f".


[ ADD THE NEGATIVE SUM TO THE SQUARE ROOT TO GET THE NEGATIVE DIFFERENCE ]

[g]
Go to Rob's Rest:n 3 l 2 l 1 l 2 r 1 r.
Pickup a passenger going to What's The Difference.
Go to Sunny Skies Park:s 1 l 1 l.
Pickup a passenger going to What's The Difference.
Go to What's The Difference:n 1 r 1 l.
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery:e 3 r.
Pickup a passenger going to Post Office.
Go to Post Office:n 1 l 1 r.

Javascript (ES6), 36 Byte

-1 Byte danke an @dtkaias

(x,y,s=Math.hypot)=>s(x)+s(y)-s(x,y)

Beispielcode-Snippet:

f=

(x,y,s=Math.hypot)=>s(x)+s(y)-s(x,y)

for(i=0;i<7;i++)
  a=[3,-3,-3,6,42,10,3][i],
  b=[4,4,-4,6,0,10,3][i],
  console.log(`f(${a},${b}) = ${f(a,b)}`)

Julia, 20 Bytes

x->norm(x,1)-norm(x)

Nimmt aund bals Liste.

Julias normzweites Argument ist standardmäßig 2 - daher wäre dies gleichbedeutend mit norm(x, 1) - norm(x, 2).

Java 8, 47 Bytes

Golf gespielt:

(a,b)->(a<0?-a:a)+(b<0?-b:b)-Math.sqrt(a*a+b*b)

Dies ist ungefähr so ​​einfach wie es nur geht: Subtrahieren Sie die beiden berechneten Werte, um die Differenz zu ermitteln. Dies verwendet ternäre Logik anstelle vonMath.abs() , um ein Byte pro Auftreten zu speichern. Leider sind die Klammern aus Gründen der Operatorrangfolge erforderlich.

Die Ausgabe ist die von Java double kann. Sie ist auf mehr als zwei Dezimalstellen genau und erfüllt die Genauigkeitsanforderungen der Frage.

Ungolfed:

public class TheCrowVsTheTaxicab {

  public static void main(String[] args) {
    int[][] inputs = new int[][] { { 3, 4 }, { -3, 4 }, { -3, -4 }, { 6, 6, }, { 42, 0 }, { 10, 10 }, { 3, 3 } };
    double[] outputs = new double[] { 2, 2, 2, 3.51, 0, 5.85, 1.76 };

    for (int i = 0; i < inputs.length; ++i) {
      double actual =
        f((a, b) -> (a < 0 ? -a : a) + (b < 0 ? -b : b) - Math.sqrt(a * a + b * b), inputs[i][0], inputs[i][1]);

      System.out.println("Input:    " + inputs[i][0] + ", " + inputs[i][1]);
      System.out.println("Expected: " + outputs[i]);
      System.out.println("Actual:   " + actual);
      System.out.println();
    }
  }

  private static double f(java.util.function.BiFunction<Integer, Integer, Double> f, int a, int b) {
    return f.apply(a, b);
  }
}

Ausgabe:

Input:    3, 4
Expected: 2.0
Actual:   2.0

Input:    -3, 4
Expected: 2.0
Actual:   2.0

Input:    -3, -4
Expected: 2.0
Actual:   2.0

Input:    6, 6
Expected: 3.51
Actual:   3.5147186257614305

Input:    42, 0
Expected: 0.0
Actual:   0.0

Input:    10, 10
Expected: 5.85
Actual:   5.857864376269049

Input:    3, 3
Expected: 1.76
Actual:   1.7573593128807152

Mathematica, 32 Bytes

N[Tr@Abs[a={##1}]-Sqrt@Tr[a^2]]&

oder

Mathematica, 31 Bytes

N[Abs@#+Abs@#2-Sqrt[#^2+#2^2]]&

oder @Nicht der Vorschlag eines Baumes

Mathematica, 26 Bytes

N[Tr@Abs@{##}-Abs[#+I#2]]&

oder @ Alephalphas Vorschlag

Mathematica, 19 Bytes

N[#~Norm~1-Norm@#]&

Dyalog APL, 13 Bytes

+/∘|-.5*⍨+.×⍨

Probieren Sie es online!

Erklärung (Eingabe X):

+/∘|     - Sum of the element-wise absolute value of X
-        - Minus
.5*⍨+.×⍨ - Euclidean distance = sqrt(X . X)

R , 30 Bytes

function(v)norm(v)-norm(v,'f')

Nimmt vals 1-Spalten-Matrix. normberechnet eine bestimmte Norm einer Matrix, wobei die Standardnorm die L1-Norm (Taxi) und fdie L2-Norm ist ('f' für Frobenius / Euklidisch) ist.

Probieren Sie es online!

Python 2 , 40 38 Bytes

-2 Bytes dank Vaultah.

Unterhaltsame Tatsache, 11 Bytes dieses Codes wurden gerade aus der Frage kopiert und abgelegt.

lambda a,b:abs(a)+abs(b)-(a*a+b*b)**.5

Probieren Sie es online!

Japt , 11 9 Bytes

-2 Bytes dank @ETHproductions

Nxa -MhUV

Probieren Sie es online!

Erklärt

Nxa -MhUV   // implicit: U and V are input integers, N = [U,V]

N a         // get absolute value of both inputs
 x          // sum those values
    -MhUV   // subtract hypot(U, V) -> sqrt(U^2 + V^2)

Schema - 58 Bytes.

(define (f a b) (-(+(abs a)(abs b))(sqrt(* a a)(* b b))))

Pyth, 8 Bytes

-s.aMQ.a

Probieren Sie es online aus. Testsuite.

Erläuterung

-s.aMQ.aQ      Q (input) appended implicitly
  .aMQ         absolute values of input vector
 s             sum
-              subtract
      .aQ      norm2 of input vector

APL (Dyalog) , 14 Bytes

Argumentiert in der Form xJy, z3J4

||-2+/∘|9 11○⊢

Probieren Sie es online!

| die Größe von ^Doc

| die Stärke des Arguments

- Minus

2+/ die paarweise Summe

∘ von

| die Größen von

9 11.○⊢ der reale und der imaginäre Teil des Arguments. ^Doc

Ein besonderer Trick beim Golfen war die Verwendung der paarweisen Reduktion ( 2+/), um +/ein No-Op-Left-Argument zu liefern und dabei Klammern zu vermeiden:||-(+/∘|9 11○⊢)

J, 13 Bytes

+/@:|-+/&.:*:

Dies ist eine Funktion, die die Koordinaten als Array verwendet, zB:

   (+/@:|-+/&.:*:) _3 4
2

Erläuterung:

+/             sum
  @:           of
    |          absolutes
     -         minus
      +/       sum
        &.:    under
           *:  square

05AB1E , 7 Bytes

ÄO¹nOt-

Probieren Sie es online!

Erläuterung

Ä        # absolute value of inputs
 O       # sum
  ¹      # push input again
   n     # square
    O    # sum
     t   # sqrt
      -  # subtract

TI-Basic (TI-84 Plus CE), 10 Byte

sum(abs(Ans))-√(sum(Ans2

Programmieren Sie diese Eingabe als Liste mit zwei Ganzzahlen Ans, z. B. aufrufen mit {3,4}:prgmCROW(durch 3,4die Eingabe ersetzen undCROW den Namen des Programms).

Erläuterung:

sum(abs(Ans))-√(sum(Ans2
        Ans               # The input list of two integers
    abs(   )              # Absolute value of each item in the list
sum(        )             # Sum of the list
                    Ans   # The input list of two integers
                       2  # Square of each item in the list
                sum(      # Sum of the list
              √(          # Square root of the sum
             -            # Difference of the two values

MATL , 8 7 Bytes

|sG2&|-

Probieren Sie es online!

Erläuterung

|    % Implicit input: vector of two numbers. Absolute value, element-wise
s    % Sum of vector
G    % Push input again
2    % Push 2
&|   % 2-norm of input
-    % Subtract. Implicit display

Common Lisp, 57 Bytes

(defun g(a b)(+(abs a)(abs b)(-(sqrt(+(* a a)(* b b))))))

Probieren Sie es online!

GNU APL 1.2, 24 Bytes

∇f P
(+/|P)-(+/P*2)*.5
∇

∇f Pdeklariert eine Funktion f, die einen Vektor Pmit den Entfernungen als Argument nimmt (zB[3, 4] )

APL verarbeitet Vektoren, +/|Pwendet also den |Operator ( absFunktion) auf jedes Element im Vektor an und wertet dann +jedes Element aus (addieren Sie also alle Elemente). Dies gibt die Taxidistanz an.

P*2 ergibt einen Vektor, der der gleiche ist wie P mit jedem quadrierten Element . +/P*2zu addieren und dann (mit Klammern für den Vorrang, weil APL von rechts nach links ist) *.5, um die Quadratwurzel zu erhalten. Dies gibt die Krähenentfernung.

Fügen Sie ein zusätzliches Paar Klammern für die Taxidistanz hinzu, um den Unterschied zu berechnen.

∇ um die Funktion zu beenden.

J , 9 8 Bytes

-1 Danke an meinen Kollegen Marshall.

+&|-|@j.

Probieren Sie es online!

Nimmt A als linkes Argument und B als rechtes Argument.

+ die Summe

& von

| die Größen

- Minus

| die Größenordnung

@ von

j. A + B i

Golf-Trick: Kombinieren Sie die Werte zu einer einzigen komplexen Zahl, weil die Diagonale so leicht zu erhalten ist, und halten Sie sie gleichzeitig getrennt, weil die Summe so leicht zu erhalten ist.

Add ++ , 59 57 Bytes

D,f,@@,|@|+
D,g,@@,d*@d*+
_
$f>G>G
V
$g>?>?
S
-G
$f>x>0
O

Probieren Sie es online!

Das hat ewig gedauert, bis ich es gelöst habe. Die endgültige Antwort wird nicht gerundet, da dies in Add ++ nicht möglich ist. So arbeitet das Programm mit den Eingängen -3und -4( ACCist der Akkumulatorwert)

D,        Define a function
  f,      called f
  @@,     that takes 2 arguments (e.g. -3, -4)
     |    absolute value;   STACK = [-3, 4]
     @    reverse stack;    STACK = [4, -3]
     |    absolute value;   STACK = [4, 3]
     +    sum;              STACK = [7]
          implicitly return the top of the stack

D,        Define a function
  g,      called g
  @@,     that takes 2 arguments (e.g. -3, -4)
     d    duplicate;  STACK = [-3, -4, -4]
     *    multiply;   STACK = [-3, 16]
     @    reverse;    STACK = [16, -3]
     d    duplicate;  STACK = [16, -3, -3]
     *    multiply;   STACK = [16, 9]
     +    sum;        STACK = [25]
          implicitly return the top of the stack

_         store the inputs in the second stack;  ACC = 0;  STACK = [-3, -4]
$f>G>G    apply f with -3 and -4 as arguments;   ACC = 7;  STACK = []
V         store ACC in the stack;                ACC = 7;  STACK = [7]
$g>?>?    apply g with -3 and -4 as arguments;   ACC = 25; STACK = [7]
S         square root the ACC;                   ACC = 5;  STACK = [7]
-G        subtract the stack value from the ACC; ACC = -2; STACK = []
$f>x>0    apply f with ACC and 0 as arguments;   ACC = 2;  STACK = []
O         output ACC as a number

PHP> = 7.1, 54 Bytes

[,$x,$y]=$argv;echo abs($x)+abs($y)-sqrt($x**2+$y**2);

PHP Sandbox Online

PHP , 55 Bytes

<?=abs($x=$argv[1])+abs($y=$argv[2])-sqrt($x**2+$y**2);

Probieren Sie es online!

PHP , 60 Bytes

mit einer Funktion anstelle eines vollständigen Programms

function f($x,$y){return abs($x)+abs($y)-sqrt($x**2+$y**2);}

Probieren Sie es online!

Excel VBA, 34 Bytes

Anonyme VBE-Direktfensterfunktion, die die Eingabe aus dem Bereich übernimmt [A1:B1]und die Differenz zwischen den euklidischen und Taxicab-Entfernungen zum VBE-Direktfenster ausgibt.

?[ABS(A1)+ABS(B1)-SQRT(A1^2+B1^2)]

Pari / GP , 26 Bytes

x->normlp(x,1)-normlp(x,2)

Probieren Sie es online!

Gelee , 7 Bytes

²S½ạAS$

Probieren Sie es online!

Format ist eine Liste von zwei Zahlen.

,,,, 18 bytes

Im Wesentlichen ein Port meiner Python-Antwort.

a:↔a:0•2*⇆2*+√↔+↔-

Ruby , 31 Bytes

Erstellt eine komplexe Zahl, mit der die Entfernung berechnet wird.

->x,y{x.abs+y.abs-(x+y*1i).abs}

Probieren Sie es online!

Ruby (2.0.0 - 2.3.0), 57 Byte

x,y=$*.map(&:to_i);puts x.abs+y.abs-Math.sqrt(x**2+y**2)

Dies setzt voraus, dass Eingaben von ARGV, z

ruby -e 'x,y=$*.map(&:to_i);puts x.abs+y.abs-Math.sqrt(x**2+y**2)' -- -3 4

Dies fühlt sich wie ein Betrüger an, da Ruby eine mathematische Bibliothek mit ABS- und SQRT-Funktionen enthält (im Gegensatz zu dem Typ, der seine eigenen ABS- und SQRT-Funktionen geschrieben hat, obwohl ich nichts spezielles gesehen habe, das die Verwendung solcher Funktionen verbietet).

Der erste Trick besteht darin, .mapstattdessen .eachein Byte zu speichern, mithilfe der &:symbolNotation einen von uns to_ifür jedes Element im Array ausgeführten Prozess zuzuordnen und x und y durch Mehrfachzuweisung Werte zuzuweisen.

Eine längere Version wäre:

(x, y) = ARGV.map{ |string| string.to_i }

(Da map ein Array zurückgibt, ist wahrscheinlich die Mehrfachzuweisung der richtige Weg, dies wirft keine zusätzlichen Parameter weg, aber wir nehmen trotzdem nur zwei Eingaben an.)

Dann habe ich einfach alle Leerzeichen in der Gleichung entfernt.

Hier ist eine längere Version, 84 Bytes

$*.map!(&:to_i);puts$*.inject(0){|x,y|x+y.abs}-Math.sqrt($*.inject(0){|x,y|x+y**2})

Das Ziel hier war, mich nicht zu wiederholen, zB schreiben zu müssen xoderabs zweimal zweimal zu quadrierenx**2 + y**2

Es hat nicht funktioniert.

Aber was interessant ist, ist, dass Puts kein Leerzeichen benötigen. Ich denke, der Lexer ist schlau genug, um das Sonderzeichen zu erkennen und zu wissen, dass es sich um eine spezielle Variable handelt.

injectund reducesind Synonyme, Inject hat eine Signatur von

inject(initial) {| memo, obj | block }

In unserem Fall müssen wir die Initiale auf 0 setzen, dann haben wir unseren Akkumulator (dh: memo = 0) und das Objekt aus jeder Iteration.

Der Nachteil dieser Methode ist, dass sie mehr als zwei Eingaben benötigt und entweder summiert oder quadriert, addiert und dann alle Werte im Array sqrt.

Ich denke - obwohl ich keinen Ruby 2.4.0 zum Testen habe -, dass dies auch funktionieren wird, der bei 72 Bytes ankommt:

$*.map!(&:to_i);puts$*.sub{|x,y|x+y.abs}-Math.sqrt($*.sum{|x,y|x+y**2})

Die Standardsumme ist 0 und funktioniert, soweit ich das beurteilen kann, genauso wie Einspritzen / Reduzieren.

Google Sheets, 31 Bytes

Arbeitsblattfunktion, die die Eingabe aus dem Bereich übernimmt [A1:B1]und die Differenz zwischen den euklidischen und den Taxicab-Entfernungen ausgibt

=ABS(A1)+ABS(B1)-SQRT(A1^2+B1^2

Excel, 32 Bytes

Wie oben, jedoch für MS Excel formatiert

=ABS(A1)+ABS(B1)-SQRT(A1^2+B1^2)

Pyth , 7 Bytes

a.aQsa0

Probieren Sie es hier aus

Pyth ,  25  23 Bytes

Dies ist die erste Lösung, meine erste nicht so einfache Pyth-Lösung, und Sie können sehen, wie schlecht ich früher in Pyth Golf gespielt habe :)

K.aswJ.asw-+KJ^+^K2^J2 .5

Probieren Sie es online!

Pip , 15 Bytes

ABa+ABb-RT$+g*g

Übernimmt Eingaben von Befehlszeilenargumenten. Probieren Sie es online!

Erläuterung

Im Pseudocode ist dies abs(a) + abs(b) - sqrt(fold+(g*g)). aund bsind die ersten beiden cmdline-Argumente und gdie Liste der cmdline-Argumente (dh argv). Der *Operator vektorisiert, wie viele Pip-Operatoren, und $+g*gist dasselbe wiea*a + b*b . Der Rest ist ziemlich unkompliziert.

Leider kann ich mit keine Bytes speichern $+ABg, da der Vorrang von Operatoren mit fold noch nicht so funktioniert, wie er sollte. $+sollte eine etwas höhere Priorität haben als binär -, wird aber im Moment als analysiert $+(ABg-RT$+g*g)und gibt die falsche Antwort. Wenn Sie ($+ABg)-RT$+g*gdies tun , werden keine Bytes über der oben genannten, weniger verschleierten Version gespeichert.