9

挑战

创建一个函数，该函数接受一个数字数组，并从每个元素中减去该数组中尚未从另一个元素中减去的最低元素。

使用最小值后，将无法再次使用。
数组中的数字是十进制数字，不一定是整数。

例：

Input: [6, 4, 7, 8, 9, 2, 1, 4]

Next lowest value:          Output:
[6, 4, 7, 8, 9, 2, 1, 4]    [6, 4, 7, 8, 9, 2, 1, 4]
                   ^         ^
                            6-1 = 5
[6, 4, 7, 8, 9, 2, -, 4]    [5, 4, 7, 8, 9, 2, 1, 4]
                ^               ^
                            4-2 = 2
[6, 4, 7, 8, 9, -, -, 4]    [5, 2, 7, 8, 9, 2, 1, 4]
    ^                              ^
                            7-4 = 3
[6, -, 7, 8, 9, -, -, 4]    [5, 2, 3, 8, 9, 2, 1, 4]
                      ^               ^
                            8-4 = 4
[6, -, 7, 8, 9, -, -, -]    [5, 2, 3, 4, 9, 2, 1, 4]
 ^                                       ^
                            9-6 = 3
[-, -, 7, 8, 9, -, -, -]    [5, 2, 3, 4, 3, 2, 1, 4]
       ^                                    ^
                            2-7 = -5
[-, -, -, 8, 9, -, -, -]    [5, 2, 3, 4, 3,-5, 1, 4]
          ^                                    ^
                            1-8 = -7
[-, -, -, -, 9, -, -, -]    [5, 2, 3, 4, 3,-5,-7, 4]
             ^                                    ^
                            4-9 = -5

Final output: [5, 2, 3, 4, 3, -5, -7, -5]

测试用例

Input: [6, 4, 7, 8, 9, 2, 1, 4] => Output: [5, 2, 3, 4, 3, -5, -7, -5]

Input: [4, 7, 4, 9, -10, 8, 40] => Output: [14, 3, 0, 2, -18, -1, 0]

Input: [0.25, -0.5, 8, 9, -10] => Output: [10.25, 0, 7.75, 1, -19]

Input: [3, 4, 9, 1, 1, 1, -5] => Output: [8, 3, 8, 0, -2, -3, -14]

这是代码高尔夫球，因此以字节为单位的最短答案会获胜。

code-golf number

— 路易斯·费利佩·德·耶稣·穆诺兹
source

4

这可以使用一个逐步示例。目前，该任务需要从测试用例中推断出来。

— Laikoni

1

感谢@Arnauld花时间去做。自昨天以来，我一直无法使用该计算机，因此无法修改示例

— Luis felipe De jesus Munoz

3

是否有特定原因在数组中包含非整数？它没有使挑战变得更有趣，没有排除一些方法，并且在没有非整数类型的语言中提出了一个大问题。

— 丹尼斯

15

果冻，2个字节

_Ṣ

在线尝试！

或尝试所有测试用例

_   # Subtract from...
 Ṣ  # The input array sorted

— 詹姆士
source

5

MATL，3个字节

tS-

在线尝试！

(implicit input as an array)
t                              # duplicate
 S                             # sort
  -                            # element-wise subtract
(implicit output)

— 朱塞佩
source

4

外壳，4个字节

Ṡz-O

在线尝试！

说明

      -- input, e.g. [6,4,7,8,9,2,1,4]
   O  -- sort        [1,2,4,4,6,7,8,9]
Ṡz-   -- element wise difference to input: [6-1,4-2,7-4,8-4,9-6,2-7,1-8,4-9]
      -- return result [5,2,3,4,3,-5,-7,-5]

— 莱科尼
source

这一定是个玩笑..... 4个字节。很棒

— Luis felipe De jesus Munoz

4

Prolog（SWI），93 80 68字节

[H|T]/[A|B]/[X|Y]:-X is H-A,(T=[],Y=T;T/B/Y).
X*Y:-msort(X,S),X/S/Y.

在线尝试！

— 艾米尼亚
source

3

Ruby，32个字符

->a{a.zip(a.sort).map{|x,y|x-y}}

— 历史学家
source

您可以只打印值：-> a {a.zip（a.sort）{| x，y | p xy}}

— GB

3

JavaScript（ES6），44个字节

a=>[...a].map(x=>x-a.sort((a,b)=>b-a).pop())

在线尝试！

已评论

a =>                 // given the input array a[]
  [...a]             // create a copy of a[]
  .map(x =>          // for each integer x in the copy:
    x -              //   update x by ...
    a.sort((a, b) => //     sorting the original array in descending order
      b - a          //     (we only need to sort it once, but it's shorter to do it here)
    ).pop()          //     taking the element at the top of a[] and subtracting it from x
  )                  // end of map()

— Arnauld
source

3

Java 10，83个字节

a->{var b=a.clone();java.util.Arrays.sort(b);for(int i=0;i<a.length;a[i]-=b[i++]);}

修改输入数组，而不是返回一个新的数组以节省字节。

在线尝试。

说明：

a->{                         // Method with double-array parameter and no return-type
  var b=a.clone();           //  Create a copy of the input-array
  java.util.Arrays.sort(b);  //  Sort this copy
  for(int i=0;i<a.length;    //  Loop over the indices
    a[i]-=                   //   Subtract from the `i`'th item in the input-array:
          b[i++]);}          //    The `i`'th item of the sorted array

— 凯文·克鲁伊森
source

3

R，18个字节

(x=scan())-sort(x)

在线尝试！

会说什么:)

— 杰西
source

3

Python 3，42 40字节

~~lambda a:[b-c for b,c in zip(a,sorted(a))]~~

lambda a:[a.pop(0)-b for b in sorted(a)]

— 甲壳虫
source

使用37个字节map。

— ovs

@ovs解决方案适用于Python3。它返回一个map对象，而不是列表。这是否是比赛要求的灰色地带？也许您可以将其作为自己的答案提交，因为它可能与资格完全不同。

— mypetlion

@ovs规范还指出，输入不一定是ints，所以我将保持原样。

— mypetlion

返回map对象是有效的，但非整数要求使我的建议无效。

— ovs

3

Haskell，34个字节

import Data.List
zipWith(-)<*>sort

在线尝试！

— ovs
source

2

05AB1E，2 个字节

{-

在线尝试或验证所有测试用例。

说明：

{     # Sort the input-array
 -    # Subtract all values in this sorted array from the input-array

— 凯文·克鲁伊森
source

2

Common Lisp，46个字节

(lambda(x)(mapcar #'- x(sort(copy-seq x)#'<)))

在线尝试！

— 伦佐
source

2

椰子，23字节

a->map((-),a,sorted(a))

在线尝试！

— ovs
source

2

Perl 6、15个字节

{@^a Z-@a.sort}

在线尝试！

接受一个列表并返回列表的匿名函数。

— 乔·金
source

1

Japt，9个字节

íNc n
®r-

在线尝试！

— 奥立佛
source

1

Stax，5 个字节

ÿ◙┘¿N

运行并调试

为了显示其工作原理，这是解压后的带注释版本。

m       for each element execute, then pop and print:
  xo    sort the original input
  i@    index into array using iteration index
  -     subtract

运行这个

— 递归的
source

1

J，4个字节

-/:~

在线尝试！

说明：

从参数中减去-排序后的/:~参数

— 加伦·伊万诺夫（Galen Ivanov）
source

1

Japt，8 6字节

c í-Un

在这里尝试

说明

           :Implicit input of array U
c          :Flatten (simply creates a 2nd copy of the array because JavaScript's sort mutates the original array)
  í        :Interleave
    Un     :U sorted
   -       :Reduce each pair by subtraction

— 毛茸茸
source

1

SmileBASIC，49个字节

DEF R A
DIM B[0]COPY B,A
SORT B
ARYOP 1,A,A,B
END

输入数组被修改到位。

ARYOP一次对整个阵列执行操作。在这种情况下，减去B从A并存储结果A。

— 12Me21
source

1

朱莉娅0.6，12字节

A->A-sort(A)

在线尝试！

— sundar-恢复莫妮卡
source

0

PHP，86字节

function f($a){$b=$a;sort($b);return array_map(function($x,$y){return $y-$x;},$b,$a);}

在线尝试！

— 路易斯·费利佩·德·耶稣·穆诺兹
source

0

Tcl，49个字节

proc S L {lmap n $L m [lsort -r $L] {expr $n-$m}}

在线尝试！

— 塞尔吉奥
source

使用最低值减少

果冻，2个字节

MATL，3个字节

外壳，4个字节

Prolog（SWI），93 80 68字节

Ruby，32个字符

JavaScript（ES6），44个字节

已评论

Java 10，83个字节

R，18个字节

Python 3，42 40字节

Haskell，34个字节

05AB1E，2 个字节

Common Lisp，46个字节

椰子，23字节

Perl 6、15个字节

Japt，9个字节

Stax，5 个字节

J，4个字节

说明：

Japt，8 6字节

说明

SmileBASIC，49个字节

朱莉娅0.6，12字节

PHP，86字节

Tcl，49个字节