Всі ми часто чуємо ідіому "пройти через масив", щоб означати "відображення функції на наступний масив". Однак мені це потрібно (зараз!), Тому я хочу, щоб ти пробігся через масив.

Як я бігаю?

_{Уявіть, що за вами дика зграя вовків}

Бігати по масиву - це як ходити по одному, за винятком того, що ви можете пропустити елементи. Так, іноді безладно, але це (загалом) працює. "Які елементи пропущено?", Ви можете запитати. Ну, це робиться навмання. Давайте пройдемося бігом через масив!

1. Дозвольте eбути поточним елементом.
2. Нехай randomгенерує випадковий поплавок у [0,1). Якщо random() < 0.5ви переходите до наступного елемента, а потім переходите до кроку 1. (Ви можете створити число іншими способами, якщо їх (в ідеалі) однаковий шанс пропустити і залишитися. Наприклад, ви можете використовувати елемент з двочленний набір і виконайте дію на основі результату.)
3. В іншому випадку, ви виконуєте функцію fна e.

Об'єктивна

З огляду на масив / список / рядок, як будь-який Aі номер K, запустіть масив, додавши Kдо кожного члена, до якого звертається. Виведіть / поверніть цей масив. Aміститиме лише невід'ємні цілі числа, і Kлише колись буде невід'ємними цілими числами. Це кодовий гольф , тому виграє найкоротша програма в байтах.

Тестові приклади (приклади)

K, A => possible K'
[1, 2, 3, 4], 0 => [1, 2, 3, 4]
[1, 2, 3, 4], 1 => [1, 3, 3, 5]
[0, 0, 0, 0], 2 => [2, 0, 0, 2]

Піта, 7

m+*O2vz

Спробуйте тут

Використовує випадковий вибір замість порівняння з плаваючою комою, але має бути невідрізним.

Розширення:

m+*O2vz     ## implicitly, a d and Q are added to the end of the program
m+*O2vzdQ   ## Q = eval(input()), z= input()
m           ## map over each element d of Q
 +     d    ## add to d
  *O2vz     ## the product of eval(z) and a random number chosen from [0, 1]

Використання плаваючої точки:

m+*<.5O0vz

Спробуйте тут

Clojure, 41 37 байт

(fn[a k](map #(+(*(rand-int 2)k)%)a))

Збив пару байтів, помноживши на 0 або 1 і скинувши "якщо". Кредит більшості інших подаючих!

Желе, 9 8 7 байт

Від 8до 7завдяки @FryAmTheEggman .

+2X’¤¡€

Спробуйте в Інтернеті!

Пояснення

+2X’¤¡€
      €   Map over each argument...
 2X           Choose a random number from {1,2}
   ’          Minus 1
    ¤                (grammar stuff)
     ¡        Repeat that number of times...
+                 Add the second input (to the argument being mapped over).

MATL , 11 байт

tZy1$rEki*+

Використовує випадкові числа з плаваючою комою.

Спробуйте в Інтернеті!

Пояснення

t      % implicit input (array). Duplicate
Zy     % size (array specifying number of rows and columns)
1$r    % random vector between 0 and 1 with that size
Ek     % duplicate, round down: gives 0 or 1 with the same probability
i      % input (number K to be added)
*      % multiply: gives either 0 or K for each element
+      % add element-wise

Japt, 6 байт

®+V*Mq

Перевірте це

Пояснення

Неявне введення масиву Uта цілого числа V. Мапуйте ( ®) через масив і до кожного елемента додайте Vпомножене на Mq, що генерує випадковим чином 0або 1. Неявний вихід результуючого масиву.

Рубін, 28 байт

->a,k{a.map{|e|e+k*rand(2)}}

Джулія, 33 29 27 байт

x->k->x+rand(0:1,endof(x))k

Це анонімна функція, яка приймає масив із внутрішньою анонімною функцією, яка приймає ціле число та повертає масив. Щоб його зателефонувати, призначте його змінній та схожий дзвінок f(x)(k).

Ми генеруємо масив тієї ж довжини, що і вхідний масив, що складається з нулів і вибраних випадковим чином з однаковою ймовірністю. Помножимо це на вхідне ціле число і додамо його до вхідного масиву.

Спробуйте в Інтернеті!

Збережено 2 байти завдяки Деннісу!

Python 2, 60 58 байт

from random import*
lambda a,k:[e+choice([0,k])for e in a]

Ця програма вийшла дійсно простою. Тут не так багато фокусів у гольфі, крім очевидного " from module import*" використання лямбда замість звичайної функції та загальної браку пробілу. Крім цього, це насправді досить ідіоматично. Якби я писав це по-справжньому, я, мабуть, зробив би це дуже схожим чином:

import random
def running_addition(seq, k):
    return [e + random.choice([0, k]) for e in seq]

Або, можливо, щось більш фантазійне:

import random
import operator
import functools

def run_through(seq, func):
    def random_func(arg):
        if random.randint(0, 1):
            return func(arg)
        return arg

    return [random_func(e) for e in seq]

def running_addition(seq, k):
    return run_through(seq, functools.partial(operator.add, k))

Але цього вистачає показово :)

Це стара, 60-байтна версія, коли для використання випадкових операцій float потрібна:

from random import*
lambda a,k:[e+k*(random()<.5)for e in a]

До кожного елемента списку додайте k*(random()<.5). Булеви Python оцінюють до 0 і 1, тому це додає 0 до будь-яких елементів, для яких умова не відповідає дійсності.

random.random()Повернення Python плаває всередині [0, 1), тому мені не потрібно було турбуватися про це.

JavaScript (ES6), 38 байт

solution=

a=>k=>a.map(n=>Math.random()<.5?n:n+k)

document.write("<pre>"+
[ [[1,2,3,4], 0], [[1,2,3,4], 1], [[0,0,0,0], 2], [[4,22,65,32,91,46,18], 42] ]
.map(c=>"["+c[0]+"],"+c[1]+": "+solution(c[0])(c[1])).join`\n`)

PowerShell v2 +, 34 байти

param($a,$k)$a|%{$_+$k*(random 2)}

Бере введення $aі $k, масив та int відповідно. Потім ми пробираємо через масив і кожну ітерацію циклу виводимо поточний елемент плюс $kраз, (random 2)який буде виконуватися Get-Random -Maximum 2(тобто, або a 0або a 1). Усі вони залишилися на конвеєрі та виводяться як масив неявний.

CJam, 10 байт

{f{2mr*+}}

Очікує масив та число на вершині стека в такому порядку та замінює їх на новий масив.

Тестуйте це тут.

php 71 байт

function f($s,$k){foreach($s as $v){$v+=rand(0,2)==0?k:0;echo $v.",";}}

k (12 байт)

{x+y*(#x)?2}

напр

k){x+y*(#x)?2}[0 0 0 0;2]
2 2 2 0

Більш загально, де fможна подати як аргумент для 16 символів

{@[x;&(#x)?2;y]}

напр

k){@[x;&(#x)?2;y]}[0 0 0 0;2+]
0 0 2 0

Python 3 152 110 98 байт

Це моє перше рішення для гольфу з кодом, тому я не знаю жодних хитрощів. Я перевірив це за допомогою основної функції з тестовими кейсами. Розмір файлу - лише ця функція.

from random import*
def a(x,y):
 p=0
 for z in x:
  if random()>.5:x[p]=z+y
  p+=1
 print(x)

Дякуємо @ Cᴏɴᴏʀ O'Bʀɪᴇɴ за пораду щодо видалення пробілів. Додаткова похвала @undergroundmonorail за пораду, яка зберегла 12 байт.

Clojure, 32 байти

#(for[i %](+(*(rand-int 2)%2)i))

Дякуємо, Девід за rand-intідею, напевно коротше за if(>(rand)0.5)підхід. Тут forб'є map.

Октава, 28 байт

@(A,R)R*(rand(size(A))<.5)+A

Зразок запущений на ideone .

05AB1E , 10 байт

Код:

vždɲ*y+})

Спробуйте в Інтернеті! .

Java, 84 байти

int[]r(int[]A,int K){for(int i=0;i<A.length;A[i++]+=Math.random()>.5?0:K);return A;}

Безумовно

int[] r(int[] A, int K) {
    for (int i = 0; 
         i < A.length; 
         A[i++] += Math.random() > .5 ? 0 : K);
    return A;
}

Примітки

• Замислена петля також може бути її тілом, різниці в розмірах немає.
• Вхідний масив модифікований, але оператор не містить обмежень щодо цієї проблеми. Якщо ви будете рахувати модифікований масив як форму "Виведення / повернення", ви можете відшарити ще 9 байт, видаливши return A;. Тип повернення потрібно змінити з int[]на void. Це, однак, не економить додаткові байти, оскільки потрібен додатковий пробіл між voidі r.

Коротша версія (Як зазначено в примітці), 75 байт

void r(int[]A,int K){for(int i=0;i<A.length;)A[i++]+=Math.random()>.5?0:K;}

Вихідні дані

[1, 2, 3, 4], 0 => [1, 2, 3, 4]
[1, 2, 3, 4], 1 => [1, 3, 3, 4]
[1, 2, 3, 4], 2 => [3, 2, 3, 4]
[1, 2, 3, 4], 3 => [4, 5, 3, 7]
[1, 2, 3, 4], 4 => [5, 2, 3, 8]
[1, 2, 3, 4], 5 => [6, 2, 8, 9]

Mathcad, байти

Жодного офіційного рахунку байтів як протоколу підрахунку Mathcad ще не вирішено.

Java 108 107 85 82 байт

void f(int[]s,int k){for(int i:s)System.out.print((i+=Math.random()<.5?k:0)+";");}

14 байт збережено завдяки @TimmyD

Perl 5 , 30 + 1 (-a) = 31 байт

$,=<>;say.5>rand?$_:$_+$,for@F

Спробуйте в Інтернеті!